![]() |
FrontISTR
6.0.0
Large-scale structural analysis program with finit element method
|
This module provides subroutines to initialize fstr_heat and to read the cards of heat analysis into it. Boundary conditions are appended independently of the input file format. header_name is the card name shown in error messages. A blank name of amplitude means that it is not given. More...
Functions/Subroutines | |
| subroutine | fstr_heat_init (fstrHEAT) |
| Initial setting of heat analysis. More... | |
| subroutine | fstr_setup_heat (ctrl, P) |
| Read in !HEAT ! More... | |
| subroutine | fstr_setup_fixtemp (ctrl, P) |
| Read in !FIXTEMP ! More... | |
| subroutine | fstr_setup_cflux (ctrl, P) |
| Read in !CFLUX ! More... | |
| subroutine | fstr_setup_dflux (ctrl, P) |
| Read in !DFLUX ! More... | |
| subroutine | fstr_setup_sflux (ctrl, P) |
| Read in !SFLUX ! More... | |
| subroutine | fstr_setup_film (ctrl, P) |
| Read in !FILM ! More... | |
| subroutine | fstr_setup_sfilm (ctrl, P) |
| Read in !SFILM ! More... | |
| subroutine | fstr_setup_radiate (ctrl, P) |
| Read in !RADIATE ! More... | |
| subroutine | fstr_setup_sradiate (ctrl, P) |
| Read in !SRADIATE ! More... | |
| subroutine | fstr_setup_weld_line (ctrl, P) |
| Read in !WELD_LINE ! More... | |
| subroutine | fstr_heat_append_fixtemp (hecMESH, fstrPARAM, fstrHEAT, header_name, amp_name, n, grp_names, vals) |
| Append !FIXTEMP ! More... | |
| subroutine | fstr_heat_append_cflux (hecMESH, fstrHEAT, header_name, amp_name, n, grp_names, vals) |
| Append !CFLUX ! More... | |
| subroutine | fstr_heat_append_dflux (hecMESH, fstrHEAT, header_name, amp_name, n, grp_names, load_types, vals) |
| Append !DFLUX ! More... | |
| subroutine | fstr_heat_append_sflux (hecMESH, fstrHEAT, header_name, amp_name, n, grp_names, vals) |
| Append !SFLUX ! More... | |
| subroutine | fstr_heat_append_film (hecMESH, fstrHEAT, header_name, amp_name1, amp_name2, n, grp_names, load_types, vals, sinks) |
| Append !FILM ! More... | |
| subroutine | fstr_heat_append_sfilm (hecMESH, fstrHEAT, header_name, amp_name1, amp_name2, n, grp_names, vals, sinks) |
| Append !SFILM ! More... | |
| subroutine | fstr_heat_append_radiate (hecMESH, fstrHEAT, header_name, amp_name1, amp_name2, n, grp_names, load_types, vals, sinks) |
| Append !RADIATE ! More... | |
| subroutine | fstr_heat_append_sradiate (hecMESH, fstrHEAT, header_name, amp_name1, amp_name2, n, grp_names, vals, sinks) |
| Append !SRADIATE ! More... | |
This module provides subroutines to initialize fstr_heat and to read the cards of heat analysis into it. Boundary conditions are appended independently of the input file format. header_name is the card name shown in error messages. A blank name of amplitude means that it is not given.
| subroutine m_fstr_heat_setup::fstr_heat_append_cflux | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| real(kind=kreal), dimension(:), intent(in) | vals | ||
| ) |
Append !CFLUX !
Definition at line 518 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_append_dflux | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| integer(kind=kint), dimension(:), intent(in) | load_types, | ||
| real(kind=kreal), dimension(:), intent(in) | vals | ||
| ) |
Append !DFLUX !
Definition at line 583 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_append_film | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name1, | ||
| character(len=hecmw_name_len), intent(in) | amp_name2, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| integer(kind=kint), dimension(:), intent(in) | load_types, | ||
| real(kind=kreal), dimension(:), intent(in) | vals, | ||
| real(kind=kreal), dimension(:), intent(in) | sinks | ||
| ) |
Append !FILM !
Definition at line 706 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_append_fixtemp | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_param), target | fstrPARAM, | ||
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| real(kind=kreal), dimension(:), intent(in) | vals | ||
| ) |
Append !FIXTEMP !
Definition at line 448 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_append_radiate | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name1, | ||
| character(len=hecmw_name_len), intent(in) | amp_name2, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| integer(kind=kint), dimension(:), intent(in) | load_types, | ||
| real(kind=kreal), dimension(:), intent(in) | vals, | ||
| real(kind=kreal), dimension(:), intent(in) | sinks | ||
| ) |
Append !RADIATE !
Definition at line 838 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_append_sfilm | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name1, | ||
| character(len=hecmw_name_len), intent(in) | amp_name2, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| real(kind=kreal), dimension(:), intent(in) | vals, | ||
| real(kind=kreal), dimension(:), intent(in) | sinks | ||
| ) |
Append !SFILM !
Definition at line 778 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_append_sflux | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| real(kind=kreal), dimension(:), intent(in) | vals | ||
| ) |
Append !SFLUX !
Definition at line 651 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_append_sradiate | ( | type(hecmwst_local_mesh), target | hecMESH, |
| type(fstr_heat) | fstrHEAT, | ||
| character(len=*), intent(in) | header_name, | ||
| character(len=hecmw_name_len), intent(in) | amp_name1, | ||
| character(len=hecmw_name_len), intent(in) | amp_name2, | ||
| integer(kind=kint), intent(in) | n, | ||
| character(len=hecmw_name_len), dimension(:), intent(in) | grp_names, | ||
| real(kind=kreal), dimension(:), intent(in) | vals, | ||
| real(kind=kreal), dimension(:), intent(in) | sinks | ||
| ) |
Append !SRADIATE !
Definition at line 910 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_heat_init | ( | type(fstr_heat) | fstrHEAT | ) |
Initial setting of heat analysis.
Definition at line 36 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_cflux | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !CFLUX !
Definition at line 159 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_dflux | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !DFLUX !
Definition at line 193 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_film | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !FILM !
Definition at line 264 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_fixtemp | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !FIXTEMP !
Definition at line 126 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_heat | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !HEAT !
Definition at line 57 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_radiate | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !RADIATE !
Definition at line 346 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_sfilm | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !SFILM !
Definition at line 307 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_sflux | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !SFLUX !
Definition at line 230 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_sradiate | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !SRADIATE !
Definition at line 388 of file fstr_heat_setup.f90.
| subroutine m_fstr_heat_setup::fstr_setup_weld_line | ( | integer(kind=kint) | ctrl, |
| type(fstr_param_pack) | P | ||
| ) |
Read in !WELD_LINE !
Definition at line 424 of file fstr_heat_setup.f90.