FrontISTR  5.7.0
Large-scale structural analysis program with finit element method
m_fstr_setup Module Reference

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...
 

Detailed Description

This module provides functions to read in data from control file and do necessary preparation for following calculation.

Function/Subroutine Documentation

◆ fstr_convert_contact_type()

subroutine m_fstr_setup::fstr_convert_contact_type ( type(hecmwst_local_mesh), pointer  hecMESH)

Convert SURF-SURF contact to NODE-SURF contact !

Parameters
hecmeshmesh definition

Definition at line 3752 of file fstr_setup.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_dynamic_alloc()

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.

Here is the caller graph for this function:

◆ fstr_dynamic_finalize()

subroutine m_fstr_setup::fstr_dynamic_finalize ( type(fstr_dynamic fstrDYNAMIC)

Finalizer of fstr_solid.

Definition at line 1666 of file fstr_setup.f90.

Here is the caller graph for this function:

◆ fstr_dynamic_init()

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.

Here is the caller graph for this function:

◆ fstr_eigen_init()

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.

Here is the caller graph for this function:

◆ fstr_element_init()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_expand_dload_array()

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.

Here is the caller graph for this function:

◆ fstr_heat_init()

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.

Here is the caller graph for this function:

◆ fstr_setup()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_acceleration()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_amplitude()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_boundary()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_cflux()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_cload()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_contactalgo()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_couple()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_dflux()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_dload()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_dynamic()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_echo()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_eigen()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_film()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_fixtemp()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_heat()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_initial()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_mpc()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_nonlinear_solver()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_orientation()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_output_sstype()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_post()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_post_phys_alloc()

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.

Here is the caller graph for this function:

◆ fstr_setup_radiate()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_reftemp()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_restart()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_sfilm()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_sflux()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_solid_nastran()

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.

◆ fstr_setup_solution()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_solver()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_spring()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_sradiate()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_static()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_step()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_temperature()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_velocity()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_setup_write()

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.

Here is the call graph for this function:

◆ fstr_smoothed_element_calcmaxcon()

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.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_smoothed_element_init()

subroutine m_fstr_setup::fstr_smoothed_element_init ( type(hecmwst_local_mesh), target  hecMESH,
type(fstr_solid fstrSOLID 
)

Definition at line 1143 of file fstr_setup.f90.

Here is the caller graph for this function:

◆ fstr_solid_alloc()

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.

Here is the caller graph for this function:

◆ fstr_solid_finalize()

subroutine m_fstr_setup::fstr_solid_finalize ( type(fstr_solid fstrSOLID)

Finalizer of fstr_solid.

Definition at line 1268 of file fstr_setup.f90.

Here is the call graph for this function:
Here is the caller graph for this function:

◆ fstr_solid_init()

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.

Here is the caller graph for this function: