![]() |
FrontISTR
5.7.0
Large-scale structural analysis program with finit element method
|
This module provides functions to read in data from control file and do necessary preparation for following calculation. More...
Data Types | |
type | fstr_param_pack |
Package of all data needs to initialize. More... | |
Functions/Subroutines | |
subroutine | fstr_setup (cntl_filename, hecMESH, fstrPARAM, fstrSOLID, fstrEIG, fstrHEAT, fstrDYNAMIC, fstrCPL, fstrFREQ) |
Read in and initialize control data ! More... | |
subroutine | fstr_solid_init (hecMESH, fstrSOLID) |
Initializer of structure fstr_solid. More... | |
subroutine | fstr_solid_alloc (hecMESH, fstrSOLID) |
Initializer of structure fstr_solid. More... | |
subroutine | fstr_smoothed_element_init (hecMESH, fstrSOLID) |
subroutine | fstr_smoothed_element_calcmaxcon (hecMESH, fstrSOLID) |
subroutine | fstr_element_init (hecMESH, fstrSOLID) |
Initialize elements info in static calculation. More... | |
subroutine | fstr_solid_finalize (fstrSOLID) |
Finalizer of fstr_solid. More... | |
subroutine | fstr_heat_init (fstrHEAT) |
Initial setting of heat analysis. More... | |
subroutine | fstr_eigen_init (fstrEIG) |
Initial setting of eigen ca;culation. More... | |
subroutine | fstr_dynamic_init (fstrDYNAMIC) |
Initial setting of dynamic calculation. More... | |
subroutine | fstr_dynamic_alloc (hecMESH, fstrDYNAMIC) |
Initial setting of dynamic calculation. More... | |
subroutine | fstr_dynamic_finalize (fstrDYNAMIC) |
Finalizer of fstr_solid. More... | |
subroutine | fstr_setup_post_phys_alloc (phys, NDOF, n_node, n_elem) |
Initial setting of postprecessor. More... | |
subroutine | fstr_setup_post (ctrl, P) |
subroutine | fstr_setup_solution (ctrl, counter, P) |
Read in !SOLUTION ! More... | |
subroutine | fstr_setup_nonlinear_solver (ctrl, counter, P) |
Read in !NONLINEAR_SOLVER ! More... | |
subroutine | fstr_setup_solver (ctrl, counter, P) |
Read in !SOLVER ! More... | |
integer function | fstr_setup_orientation (ctrl, hecMESH, cnt, coordsys) |
Read in !ORIENTATION. More... | |
subroutine | fstr_setup_step (ctrl, counter, P) |
Read in !STEP ! More... | |
integer(kind=kint) function | fstr_setup_initial (ctrl, cond, hecMESH) |
subroutine | fstr_setup_write (ctrl, counter, P) |
Read in !WRITE ! More... | |
subroutine | fstr_setup_echo (ctrl, counter, P) |
Read in !ECHO ! More... | |
subroutine | fstr_setup_restart (ctrl, nout, version) |
Read in !RESTART ! More... | |
subroutine | fstr_setup_couple (ctrl, counter, P) |
Read in !COUPLE ! More... | |
subroutine | fstr_setup_amplitude (ctrl, P) |
Read in !AMPLITUDE ! More... | |
subroutine | fstr_setup_static (ctrl, counter, P) |
Read in !STATIC(old) ! More... | |
subroutine | fstr_setup_boundary (ctrl, counter, P) |
Read in !BOUNDARY ! More... | |
subroutine | fstr_setup_cload (ctrl, counter, P) |
Read in !CLOAD ! More... | |
subroutine | fstr_expand_dload_array (array, old_size, new_size) |
Read !FLOAD ! More... | |
subroutine | fstr_setup_dload (ctrl, counter, P) |
Read in !DLOAD. More... | |
subroutine | fstr_setup_temperature (ctrl, counter, P) |
Read in !TEMPERATURE ! More... | |
subroutine | fstr_setup_spring (ctrl, counter, P) |
Read in !SPRING ! More... | |
subroutine | fstr_setup_reftemp (ctrl, counter, P) |
Read in !REFTEMP ! More... | |
subroutine | fstr_setup_heat (ctrl, counter, P) |
Read in !HEAT ! More... | |
subroutine | fstr_setup_fixtemp (ctrl, counter, P) |
Read in !FIXTEMP ! More... | |
subroutine | fstr_setup_cflux (ctrl, counter, P) |
Read in !CFLUX ! More... | |
subroutine | fstr_setup_dflux (ctrl, counter, P) |
Read in !DFLUX ! More... | |
subroutine | fstr_setup_sflux (ctrl, counter, P) |
Read in !SFLUX ! More... | |
subroutine | fstr_setup_film (ctrl, counter, P) |
Read in !FILM ! More... | |
subroutine | fstr_setup_sfilm (ctrl, counter, P) |
Read in !SFILM ! More... | |
subroutine | fstr_setup_radiate (ctrl, counter, P) |
Read in !RADIATE ! More... | |
subroutine | fstr_setup_sradiate (ctrl, counter, P) |
Read in !SRADIATE ! More... | |
subroutine | fstr_setup_eigen (ctrl, counter, P) |
Read in !EIGEN ! More... | |
subroutine | fstr_setup_dynamic (ctrl, counter, P) |
Read in !DYNAMIC ! More... | |
subroutine | fstr_setup_velocity (ctrl, counter, P) |
Read in !VELOCITY ! More... | |
subroutine | fstr_setup_acceleration (ctrl, counter, P) |
Read in !ACCELERATION ! More... | |
subroutine | fstr_setup_mpc (ctrl, counter, P) |
Read in !MPC ! More... | |
subroutine | fstr_setup_solid_nastran (ctrl, hecMESH, fstrSOLID) |
subroutine | fstr_setup_contactalgo (ctrl, P) |
Read in !CONTACT ! More... | |
subroutine | fstr_setup_output_sstype (ctrl, P) |
Read in !OUTPUT_SSTYPE ! More... | |
subroutine | fstr_convert_contact_type (hecMESH) |
Convert SURF-SURF contact to NODE-SURF contact ! More... | |
This module provides functions to read in data from control file and do necessary 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 3752 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 1585 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_dynamic_finalize | ( | type(fstr_dynamic) | fstrDYNAMIC | ) |
Finalizer of fstr_solid.
Definition at line 1666 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_dynamic_init | ( | type(fstr_dynamic) | fstrDYNAMIC | ) |
Initial setting of dynamic calculation.
Definition at line 1554 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 1541 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 1192 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 2450 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_heat_init | ( | type(fstr_heat) | fstrHEAT | ) |
Initial setting of heat analysis.
Definition at line 1523 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 45 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 3582 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_amplitude | ( | integer(kind=kint) | ctrl, |
type(fstr_param_pack) | P | ||
) |
Read in !AMPLITUDE !
Definition at line 2187 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 2261 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 2835 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 2371 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 3715 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 2148 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 2920 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 2479 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 3472 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 2110 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 3450 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 3085 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 2748 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 2678 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 2010 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 3652 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_nonlinear_solver | ( | integer(kind=kint) | ctrl, |
integer(kind=kint) | counter, | ||
type(fstr_param_pack) | P | ||
) |
Read in !NONLINEAR_SOLVER !
Definition at line 1830 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 1909 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 3733 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_setup_post | ( | integer(kind=kint) | ctrl, |
type(fstr_param_pack) | P | ||
) |
Definition at line 1734 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 1719 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 3267 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 2656 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 2128 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 3184 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 3010 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 3702 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 1813 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 1847 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 2603 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 3365 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 2218 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 1992 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 2547 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 3516 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 2089 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_smoothed_element_calcmaxcon | ( | type(hecmwst_local_mesh), target | hecMESH, |
type(fstr_solid) | fstrSOLID | ||
) |
Definition at line 1170 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_smoothed_element_init | ( | type(hecmwst_local_mesh), target | hecMESH, |
type(fstr_solid) | fstrSOLID | ||
) |
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 1039 of file fstr_setup.f90.
subroutine m_fstr_setup::fstr_solid_finalize | ( | type(fstr_solid) | fstrSOLID | ) |
Finalizer of fstr_solid.
Definition at line 1268 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 1007 of file fstr_setup.f90.