![]() |
FrontISTR 5.2.0
Large-scale structural analysis program with finit element method
|
This module provides functions to read in data from control file and do neccessary preparation for following calculation. More...
Data Types | |
type | fstr_param_pack |
Package of all data needs to initilize. More... | |
Functions/Subroutines | |
subroutine | fstr_setup (cntl_filename, hecmesh, fstrparam, fstrsolid, fstreig, fstrheat, fstrdynamic, fstrcpl, fstrfreq) |
Read in and initialize control data ! | |
subroutine | fstr_solid_init (hecmesh, fstrsolid) |
Initializer of structure fstr_solid. | |
subroutine | fstr_solid_alloc (hecmesh, fstrsolid) |
Initializer of structure fstr_solid. | |
subroutine | fstr_element_init (hecmesh, fstrsolid) |
Initialize elements info in static calculation. | |
subroutine | fstr_solid_finalize (fstrsolid) |
Finalizer of fstr_solid. | |
subroutine | fstr_heat_init (fstrheat) |
Initial setting of heat analysis. | |
subroutine | fstr_eigen_init (fstreig) |
Initial setting of eigen ca;culation. | |
subroutine | fstr_dynamic_init (fstrdynamic) |
Initial setting of dynamic calculation. | |
subroutine | fstr_dynamic_alloc (hecmesh, fstrdynamic) |
Initial setting of dynamic calculation. | |
subroutine | fstr_dynamic_finalize (fstrdynamic) |
Finalizer of fstr_solid. | |
subroutine | fstr_setup_post_phys_alloc (phys, ndof, n_node, n_elem) |
Initial setting of postprecessor. | |
subroutine | fstr_setup_post (ctrl, p) |
subroutine | fstr_setup_solution (ctrl, counter, p) |
Read in !SOLUTION ! | |
subroutine | fstr_setup_solver (ctrl, counter, p) |
Read in !SOLVER ! | |
integer function | fstr_setup_orientation (ctrl, hecmesh, cnt, coordsys) |
Read in !ORIENTATION. | |
subroutine | fstr_setup_step (ctrl, counter, p) |
Read in !STEP ! | |
integer(kind=kint) function | fstr_setup_initial (ctrl, cond, hecmesh) |
subroutine | fstr_setup_write (ctrl, counter, p) |
Read in !WRITE ! | |
subroutine | fstr_setup_echo (ctrl, counter, p) |
Read in !ECHO ! | |
subroutine | fstr_setup_restart (ctrl, nout, version) |
Read in !RESTART ! | |
subroutine | fstr_setup_couple (ctrl, counter, p) |
Read in !COUPLE ! | |
subroutine | fstr_setup_static (ctrl, counter, p) |
Read in !STATIC(old) ! | |
subroutine | fstr_setup_boundary (ctrl, counter, p) |
Read in !BOUNDARY ! | |
subroutine | fstr_setup_cload (ctrl, counter, p) |
Read in !CLOAD ! | |
subroutine | fstr_expand_dload_array (array, old_size, new_size) |
Read !FLOAD ! | |
subroutine | fstr_setup_dload (ctrl, counter, p) |
Read in !DLOAD. | |
subroutine | fstr_setup_temperature (ctrl, counter, p) |
Read in !TEMPERATURE ! | |
subroutine | fstr_setup_spring (ctrl, counter, p) |
Read in !SPRING ! | |
subroutine | fstr_setup_reftemp (ctrl, counter, p) |
Read in !REFTEMP ! | |
subroutine | fstr_setup_heat (ctrl, counter, p) |
Read in !HEAT ! | |
subroutine | fstr_setup_fixtemp (ctrl, counter, p) |
Read in !FIXTEMP ! | |
subroutine | fstr_setup_cflux (ctrl, counter, p) |
Read in !CFLUX ! | |
subroutine | fstr_setup_dflux (ctrl, counter, p) |
Read in !DFLUX ! | |
subroutine | fstr_setup_sflux (ctrl, counter, p) |
Read in !SFLUX ! | |
subroutine | fstr_setup_film (ctrl, counter, p) |
Read in !FILM ! | |
subroutine | fstr_setup_sfilm (ctrl, counter, p) |
Read in !SFILM ! | |
subroutine | fstr_setup_radiate (ctrl, counter, p) |
Read in !RADIATE ! | |
subroutine | fstr_setup_sradiate (ctrl, counter, p) |
Read in !SRADIATE ! | |
subroutine | fstr_setup_eigen (ctrl, counter, p) |
Read in !EIGEN ! | |
subroutine | fstr_setup_dynamic (ctrl, counter, p) |
Read in !DYNAMIC ! | |
subroutine | fstr_setup_velocity (ctrl, counter, p) |
Read in !VELOCITY ! | |
subroutine | fstr_setup_acceleration (ctrl, counter, p) |
Read in !ACCELERATION ! | |
subroutine | fstr_setup_mpc (ctrl, counter, p) |
Read in !MPC ! | |
subroutine | fstr_setup_solid_nastran (ctrl, hecmesh, fstrsolid) |
subroutine | fstr_setup_contactalgo (ctrl, p) |
Read in !CONTACT ! | |
subroutine | fstr_setup_output_sstype (ctrl, p) |
Read in !OUTPUT_SSTYPE ! | |
subroutine | fstr_convert_contact_type (hecmesh) |
Convert SURF-SURF contact to NODE-SURF contact ! | |
This module provides functions to read in data from control file and do neccessary preparation for following calculation.
subroutine m_fstr_setup::fstr_convert_contact_type | ( | type(hecmwst_local_mesh), pointer | hecmesh | ) |
Convert SURF-SURF contact to NODE-SURF contact !
hecmesh | mesh definition |
Definition at line 3483 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_dynamic_alloc | ( | type(hecmwst_local_mesh), target | hecmesh, |
type(fstr_dynamic) | fstrdynamic | ||
) |
Initial setting of dynamic calculation.
Definition at line 1369 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_dynamic_finalize | ( | type(fstr_dynamic) | fstrdynamic | ) |
Finalizer of fstr_solid.
Definition at line 1450 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_dynamic_init | ( | type(fstr_dynamic) | fstrdynamic | ) |
Initial setting of dynamic calculation.
Definition at line 1338 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_eigen_init | ( | type(fstr_eigen) | fstreig | ) |
Initial setting of eigen ca;culation.
Definition at line 1325 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_element_init | ( | type(hecmwst_local_mesh), target | hecmesh, |
type(fstr_solid) | fstrsolid | ||
) |
Initialize elements info in static calculation.
Definition at line 1006 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_expand_dload_array | ( | real(kind=kreal), dimension(:,:), pointer | array, |
integer(kind=kint) | old_size, | ||
integer(kind=kint) | new_size | ||
) |
Read !FLOAD !
Reset !DLOAD !
Definition at line 2182 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_heat_init | ( | type(fstr_heat) | fstrheat | ) |
Initial setting of heat analysis.
Definition at line 1308 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup | ( | character(len=hecmw_filename_len) | cntl_filename, |
type(hecmwst_local_mesh), target | hecmesh, | ||
type(fstr_param), target | fstrparam, | ||
type(fstr_solid), target | fstrsolid, | ||
type(fstr_eigen), target | fstreig, | ||
type(fstr_heat), target | fstrheat, | ||
type(fstr_dynamic), target | fstrdynamic, | ||
type(fstr_couple), target | fstrcpl, | ||
type(fstr_freqanalysis), target | fstrfreq | ||
) |
Read in and initialize control data !
Definition at line 42 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_acceleration | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !ACCELERATION !
Definition at line 3313 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_boundary | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !BOUNDARY !
Definition at line 2004 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_cflux | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !CFLUX !
Definition at line 2566 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_cload | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !CLOAD !
Definition at line 2103 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_contactalgo | ( | integer(kind=kint) | ctrl, |
type(fstr_param_pack) | p | ||
) |
Read in !CONTACT !
Definition at line 3446 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_couple | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !COUPLE !
Definition at line 1917 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_dflux | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !DFLUX !
Definition at line 2651 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_dload | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !DLOAD.
Definition at line 2211 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_dynamic | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !DYNAMIC !
Definition at line 3203 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_echo | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !ECHO !
Definition at line 1879 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_eigen | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !EIGEN !
Definition at line 3181 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_film | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !FILM !
Definition at line 2816 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_fixtemp | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack), target | p | ||
) |
Read in !FIXTEMP !
Definition at line 2479 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_heat | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !HEAT !
Definition at line 2410 of file fstr_setup.f90.
integer(kind=kint) function m_fstr_setup::fstr_setup_initial | ( | integer(kind=kint) | ctrl, |
type( tinitialcondition ) | cond, | ||
type(hecmwst_local_mesh) | hecmesh | ||
) |
Definition at line 1779 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_mpc | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack), target | p | ||
) |
Read in !MPC !
Definition at line 3383 of file fstr_setup.f90.
integer function m_fstr_setup::fstr_setup_orientation | ( | integer(kind=kint) | ctrl, |
type( hecmwst_local_mesh ) | hecmesh, | ||
integer | cnt, | ||
type( tlocalcoordsys ) | coordsys | ||
) |
Read in !ORIENTATION.
Definition at line 1678 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_output_sstype | ( | integer(kind=kint) | ctrl, |
type(fstr_param_pack) | p | ||
) |
Read in !OUTPUT_SSTYPE !
Definition at line 3464 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_post | ( | integer(kind=kint) | ctrl, |
type(fstr_param_pack) | p | ||
) |
Definition at line 1517 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_post_phys_alloc | ( | type(fstr_solid_physic_val), pointer | phys, |
integer(kind=kint) | ndof, | ||
integer(kind=kint) | n_node, | ||
integer(kind=kint) | n_elem | ||
) |
Initial setting of postprecessor.
Definition at line 1503 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_radiate | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !RADIATE !
Definition at line 2998 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_reftemp | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !REFTEMP !
Definition at line 2388 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_restart | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | nout, | ||
integer(kind=kint) | version | ||
) |
Read in !RESTART !
Definition at line 1897 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_sfilm | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !SFILM !
Definition at line 2915 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_sflux | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !SFLUX !
Definition at line 2741 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_solid_nastran | ( | integer(kind=kint) | ctrl, |
type (hecmwst_local_mesh) | hecmesh, | ||
type (fstr_solid ) | fstrsolid | ||
) |
Definition at line 3433 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_solution | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !SOLUTION !
Definition at line 1596 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_solver | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack), target | p | ||
) |
Read in !SOLVER !
Definition at line 1613 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_spring | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !SPRING !
Definition at line 2335 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_sradiate | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !SRADIATE !
Definition at line 3096 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_static | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !STATIC(old) !
Definition at line 1961 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_step | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !STEP !
Definition at line 1761 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_temperature | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !TEMPERATURE !
Definition at line 2279 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_velocity | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !VELOCITY !
Definition at line 3247 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_write | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | p | ||
) |
Read in !WRITE !
Definition at line 1858 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_solid_alloc | ( | type(hecmwst_local_mesh), target | hecmesh, |
type(fstr_solid) | fstrsolid | ||
) |
Initializer of structure fstr_solid.
Definition at line 925 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_solid_finalize | ( | type(fstr_solid) | fstrsolid | ) |
Finalizer of fstr_solid.
Definition at line 1069 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_solid_init | ( | type(hecmwst_local_mesh), target | hecmesh, |
type(fstr_solid) | fstrsolid | ||
) |
Initializer of structure fstr_solid.
Definition at line 894 of file fstr_setup.f90.