This module provides subroutines to initialize, allocate and finalize fstr_solid, and to read the cards of solid analysis into it. Boundary conditions are appended, and the contact pairs already read are checked and initialized, independently of the input file format. header_name is the card name shown in error messages. A blank name of amplitude or rotation center means that it is not given. More...

Functions/Subroutines
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, solution_type)
	Initialize elements info in static calculation. More...

recursive subroutine	fstr_solid_physic_val_finalize (phys)

subroutine	fstr_solid_finalize (fstrSOLID)
	Finalizer of fstr_solid. More...

subroutine	fstr_setup_step (ctrl, P)
	Read in !STEP ! More...

subroutine	fstr_setup_step_convergence (stepinfo, cpname, cnvparam, istep)
	Fix the convergence criteria of a step from !STEP and the !CONVERG_PARAM it refers to. More...

subroutine	fstr_setup_step_links (fstrPARAM, fstrSOLID, fstrDYNAMIC, istep, tp_name, ainc_name, cnv_name)
	Links step_ctrl(istep), whose step is already read, to !TIME_POINTS, !AUTOINC_PARAM and !CONVERG_PARAM given by name, and keeps the !DYNAMIC time increment for a fixed increment. More...

subroutine	fstr_setup_write_flags (ctrl, P)
	Read in !WRITE before fstr_setup_prepare and set fg_result and fg_visual. More...

subroutine	fstr_setup_write_store (ctrl, P)
	Read in !WRITE after fstr_setup_prepare and store the output controls. fg_result and fg_visual are set by fstr_setup_WRITE_flags before fstr_setup_prepare. More...

subroutine	fstr_setup_couple (ctrl, P)
	Read in !COUPLE ! More...

subroutine	fstr_setup_element_activation (ctrl, P)
	Read in !ELEMENT_ACTIVATION. More...

subroutine	fstr_setup_static (ctrl, P)
	Read in !STATIC(old) ! More...

subroutine	fstr_setup_boundary (ctrl, P)
	Read in !BOUNDARY ! More...

subroutine	fstr_setup_cload (ctrl, P)
	Read in !CLOAD ! More...

subroutine	fstr_setup_dload (ctrl, P)
	Read in !DLOAD. More...

subroutine	fstr_setup_temperature (ctrl, P)
	Read in !TEMPERATURE ! More...

subroutine	fstr_setup_spring (ctrl, P)
	Read in !SPRING ! More...

subroutine	fstr_setup_velocity (ctrl, P)
	Read in !VELOCITY ! More...

subroutine	fstr_setup_acceleration (ctrl, P)
	Read in !ACCELERATION ! More...

subroutine	fstr_setup_solid_nastran (ctrl, hecMESH, fstrSOLID)

subroutine	fstr_setup_contact (ctrl, P)
	Read in !CONTACT ! More...

subroutine	fstr_setup_embed (ctrl, P)
	Read in !EMBED ! More...

subroutine	fstr_setup_istep (ctrl, P)
	Read in !ISTEP ! More...

subroutine	fstr_setup_step_store (ctrl, P)
	Read in !STEP ! More...

subroutine	fstr_setup_section (ctrl, P)
	Read in !SECTION ! More...

subroutine	fstr_setup_elemopt (ctrl, P)
	Read in !ELEMOPT ! More...

subroutine	fstr_setup_material (ctrl, P)
	Read in !MATERIAL ! More...

integer(kind=kint) function	fstr_setup_current_material (ctrl, P)
	Material of the last !MATERIAL, for a material card. Stops at a material card given before the first !MATERIAL. More...

subroutine	fstr_setup_elastic (ctrl, P)
	Read in !ELASTIC ! More...

subroutine	fstr_setup_plastic (ctrl, P)
	Read in !PLASTIC ! More...

subroutine	fstr_setup_hyperelastic (ctrl, P)
	Read in !HYPERELASTIC ! More...

subroutine	fstr_setup_viscoelastic (ctrl, P)
	Read in !VISCOELASTIC ! More...

subroutine	fstr_setup_trs (ctrl, P)
	Read in !TRS ! More...

subroutine	fstr_setup_creep (ctrl, P)
	Read in !CREEP ! More...

subroutine	fstr_setup_density (ctrl, P)
	Read in !DENSITY ! More...

subroutine	fstr_setup_expansion_coeff (ctrl, P)
	Read in !EXPANSION_COEF ! More...

subroutine	fstr_setup_damping (ctrl, P)
	Read in !DAMPING ! More...

subroutine	fstr_setup_fluid (ctrl, P)
	Read in !FLUID ! More...

subroutine	fstr_setup_spring_d (ctrl, P)
	Read in !SPRING_D ! More...

subroutine	fstr_setup_spring_a (ctrl, P)
	Read in !SPRING_A ! More...

subroutine	fstr_setup_dashpot_d (ctrl, P)
	Read in !DASHPOT_D ! More...

subroutine	fstr_setup_dashpot_a (ctrl, P)
	Read in !DASHPOT_A ! More...

subroutine	fstr_setup_user_material (ctrl, P)
	Read in !USER_MATERIAL ! More...

subroutine	fstr_setup_output_res (ctrl, P)
	Read in !OUTPUT_RES ! More...

subroutine	fstr_setup_output_vis (ctrl, P)
	Read in !OUTPUT_VIS ! More...

subroutine	fstr_setup_uload (ctrl, P)
	Read in !ULOAD ! More...

subroutine	fstr_solid_append_boundary (hecMESH, fstrSOLID, header_name, gid, istot, rotc_name, amp_name, n, grp_names, dof_ids, dof_ide, vals)
	Append !BOUNDARY ! More...

subroutine	fstr_solid_append_cload (hecMESH, fstrSOLID, header_name, gid, rotc_name, amp_name, n, grp_names, dofs, vals)
	Append !CLOAD ! More...

subroutine	fstr_expand_dload_array (array, old_size, new_size)
	Reset !DLOAD ! More...

subroutine	fstr_solid_append_dload (hecMESH, fstrSOLID, header_name, gid, follow, amp_name, n, grp_names, lids, params)
	Append !DLOAD ! More...

subroutine	fstr_solid_append_temperature (hecMESH, fstrSOLID, header_name, gid, n, grp_names, vals)
	Append !TEMPERATURE ! More...

subroutine	fstr_solid_append_spring (hecMESH, fstrSOLID, header_name, gid, incremental, amp_name, n, grp_names, dofs, vals)
	Append !SPRING ! More...

subroutine	fstr_solid_append_velocity (hecMESH, fstrSOLID, fstrDYNAMIC, header_name, gid, vtype, rotc_name, amp_name, n, grp_names, dof_ids, dof_ide, vals)
	Append !VELOCITY ! More...

subroutine	fstr_solid_append_acceleration (hecMESH, fstrSOLID, fstrDYNAMIC, header_name, gid, atype, amp_name, n, grp_names, dof_ids, dof_ide, vals)
	Append !ACCELERATION ! More...

subroutine	fstr_solid_append_couple (hecMESH, fstrSOLID, fstrPARAM, header_name, n, grp_names)
	Append !COUPLE ! More...

subroutine	fstr_solid_append_element_activation (hecMESH, fstrSOLID, header_name, gid, amp_name, eps, measure, state, n, grp_names, thlow, thup)
	Append !ELEMENT_ACTIVATION ! More...

subroutine	fstr_solid_init_contacts (hecMESH, fstrSOLID, fstrPARAM, is, n, cparam_name, smoothing)
	Initialize !CONTACT ! More...

subroutine	fstr_solid_init_embeds (hecMESH, fstrSOLID, fstrPARAM, is, n, cparam_name, smoothing)
	Initialize !EMBED ! More...

Detailed Description

This module provides subroutines to initialize, allocate and finalize fstr_solid, and to read the cards of solid analysis into it. Boundary conditions are appended, and the contact pairs already read are checked and initialized, independently of the input file format. header_name is the card name shown in error messages. A blank name of amplitude or rotation center means that it is not given.

Function/Subroutine Documentation

◆ fstr_element_init()

subroutine m_fstr_solid_setup::fstr_element_init	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		integer(kind=kint), intent(in)	solution_type
	)

Initialize elements info in static calculation.

Definition at line 320 of file fstr_solid_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_solid_setup::fstr_expand_dload_array	(	real(kind=kreal), dimension(:,:), pointer	array,
		integer(kind=kint)	old_size,
		integer(kind=kint)	new_size
	)

Reset !DLOAD !

Definition at line 2365 of file fstr_solid_setup.f90.

Here is the caller graph for this function:

◆ fstr_setup_acceleration()

subroutine m_fstr_solid_setup::fstr_setup_acceleration	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !ACCELERATION !

Definition at line 1476 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_boundary()

subroutine m_fstr_solid_setup::fstr_setup_boundary	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !BOUNDARY !

Definition at line 1179 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_cload()

subroutine m_fstr_solid_setup::fstr_setup_cload	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !CLOAD !

Definition at line 1239 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_contact()

subroutine m_fstr_solid_setup::fstr_setup_contact	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !CONTACT !

Definition at line 1533 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_couple()

subroutine m_fstr_solid_setup::fstr_setup_couple	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !COUPLE !

Definition at line 1071 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_creep()

subroutine m_fstr_solid_setup::fstr_setup_creep	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !CREEP !

Definition at line 1905 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_current_material()

integer(kind=kint) function m_fstr_solid_setup::fstr_setup_current_material	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Material of the last !MATERIAL, for a material card. Stops at a material card given before the first !MATERIAL.

Definition at line 1761 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_damping()

subroutine m_fstr_solid_setup::fstr_setup_damping	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !DAMPING !

Definition at line 1972 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_dashpot_a()

subroutine m_fstr_solid_setup::fstr_setup_dashpot_a	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !DASHPOT_A !

Definition at line 2094 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_dashpot_d()

subroutine m_fstr_solid_setup::fstr_setup_dashpot_d	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !DASHPOT_D !

Definition at line 2069 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_density()

subroutine m_fstr_solid_setup::fstr_setup_density	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !DENSITY !

Definition at line 1929 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_dload()

subroutine m_fstr_solid_setup::fstr_setup_dload	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !DLOAD.

Definition at line 1286 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_elastic()

subroutine m_fstr_solid_setup::fstr_setup_elastic	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !ELASTIC !

Definition at line 1780 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_element_activation()

subroutine m_fstr_solid_setup::fstr_setup_element_activation	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !ELEMENT_ACTIVATION.

Definition at line 1099 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_elemopt()

subroutine m_fstr_solid_setup::fstr_setup_elemopt	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !ELEMOPT !

Definition at line 1689 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_embed()

subroutine m_fstr_solid_setup::fstr_setup_embed	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !EMBED !

Definition at line 1566 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_expansion_coeff()

subroutine m_fstr_solid_setup::fstr_setup_expansion_coeff	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !EXPANSION_COEF !

Definition at line 1950 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_fluid()

subroutine m_fstr_solid_setup::fstr_setup_fluid	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !FLUID !

Definition at line 1994 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_hyperelastic()

subroutine m_fstr_solid_setup::fstr_setup_hyperelastic	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !HYPERELASTIC !

Definition at line 1830 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_istep()

subroutine m_fstr_solid_setup::fstr_setup_istep	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !ISTEP !

Definition at line 1594 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_material()

subroutine m_fstr_solid_setup::fstr_setup_material	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !MATERIAL !

PSTATEcid is set to the material of this card, and PSTATEcache to the material expected next.

Definition at line 1711 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_output_res()

subroutine m_fstr_solid_setup::fstr_setup_output_res	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !OUTPUT_RES !

Definition at line 2142 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_output_vis()

subroutine m_fstr_solid_setup::fstr_setup_output_vis	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !OUTPUT_VIS !

Definition at line 2173 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_plastic()

subroutine m_fstr_solid_setup::fstr_setup_plastic	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !PLASTIC !

Definition at line 1805 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_section()

subroutine m_fstr_solid_setup::fstr_setup_section	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !SECTION !

Definition at line 1666 of file fstr_solid_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_solid_setup::fstr_setup_solid_nastran	(	integer(kind=kint)	ctrl,
		type (hecmwst_local_mesh)	hecMESH,
		type (fstr_solid )	fstrSOLID
	)

Definition at line 1521 of file fstr_solid_setup.f90.

Here is the call graph for this function:

◆ fstr_setup_spring()

subroutine m_fstr_solid_setup::fstr_setup_spring	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !SPRING !

Definition at line 1376 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_spring_a()

subroutine m_fstr_solid_setup::fstr_setup_spring_a	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !SPRING_A !

Definition at line 2044 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_spring_d()

subroutine m_fstr_solid_setup::fstr_setup_spring_d	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !SPRING_D !

Definition at line 2019 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_static()

subroutine m_fstr_solid_setup::fstr_setup_static	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !STATIC(old) !

Definition at line 1134 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_step()

subroutine m_fstr_solid_setup::fstr_setup_step	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !STEP !

Definition at line 919 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_step_convergence()

subroutine m_fstr_solid_setup::fstr_setup_step_convergence	(	type( step_info ), intent(inout)	stepinfo,
		character(len=*), intent(in)	cpname,
		type( tparamconverg ), dimension(0:), intent(in)	cnvparam,
		integer(kind=kint), intent(in)	istep
	)

Fix the convergence criteria of a step from !STEP and the !CONVERG_PARAM it refers to.

Parameters

[in,out]	stepinfo	step info
[in]	cpname	CONVERGPARAM of !STEP
[in]	cnvparam	!CONVERG_PARAM read so far; 0 gives none
[in]	istep	step number

Definition at line 937 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_step_links()

subroutine m_fstr_solid_setup::fstr_setup_step_links	(	type(fstr_param)	fstrPARAM,
		type(fstr_solid)	fstrSOLID,
		type(fstr_dynamic)	fstrDYNAMIC,
		integer(kind=kint), intent(in)	istep,
		character(len=*), intent(in)	tp_name,
		character(len=*), intent(in)	ainc_name,
		character(len=*), intent(in)	cnv_name
	)

Links step_ctrl(istep), whose step is already read, to !TIME_POINTS, !AUTOINC_PARAM and !CONVERG_PARAM given by name, and keeps the !DYNAMIC time increment for a fixed increment.

Parameters

[in]	istep	step number
[in]	tp_name	name of !TIME_POINTS
[in]	ainc_name	name of !AUTOINC_PARAM
[in]	cnv_name	name of !CONVERG_PARAM

Definition at line 972 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_step_store()

subroutine m_fstr_solid_setup::fstr_setup_step_store	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !STEP !

Read in !STEP of !VERSION 1 or later after fstr_setup_prepare and store the step.

Definition at line 1637 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_temperature()

subroutine m_fstr_solid_setup::fstr_setup_temperature	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !TEMPERATURE !

Definition at line 1333 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_trs()

subroutine m_fstr_solid_setup::fstr_setup_trs	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !TRS !

Definition at line 1878 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_uload()

subroutine m_fstr_solid_setup::fstr_setup_uload	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !ULOAD !

Definition at line 2204 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_user_material()

subroutine m_fstr_solid_setup::fstr_setup_user_material	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !USER_MATERIAL !

Definition at line 2119 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_velocity()

subroutine m_fstr_solid_setup::fstr_setup_velocity	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !VELOCITY !

Definition at line 1420 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_viscoelastic()

subroutine m_fstr_solid_setup::fstr_setup_viscoelastic	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !VISCOELASTIC !

Definition at line 1854 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_setup_write_flags()

subroutine m_fstr_solid_setup::fstr_setup_write_flags	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !WRITE before fstr_setup_prepare and set fg_result and fg_visual.

Definition at line 1011 of file fstr_solid_setup.f90.

Here is the caller graph for this function:

◆ fstr_setup_write_store()

subroutine m_fstr_solid_setup::fstr_setup_write_store	(	integer(kind=kint)	ctrl,
		type(fstr_param_pack)	P
	)

Read in !WRITE after fstr_setup_prepare and store the output controls. fg_result and fg_visual are set by fstr_setup_WRITE_flags before fstr_setup_prepare.

Definition at line 1026 of file fstr_solid_setup.f90.

Here is the caller graph for this function:

◆ fstr_smoothed_element_calcmaxcon()

subroutine m_fstr_solid_setup::fstr_smoothed_element_calcmaxcon	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID
	)

Definition at line 300 of file fstr_solid_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_solid_setup::fstr_smoothed_element_init	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID
	)

Definition at line 269 of file fstr_solid_setup.f90.

Here is the caller graph for this function:

◆ fstr_solid_alloc()

subroutine m_fstr_solid_setup::fstr_solid_alloc	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID
	)

Initializer of structure fstr_solid.

Definition at line 76 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_acceleration()

subroutine m_fstr_solid_setup::fstr_solid_append_acceleration	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		type(fstr_dynamic)	fstrDYNAMIC,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		integer(kind=kint), intent(in)	atype,
		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)	dof_ids,
		integer(kind=kint), dimension(:), intent(in)	dof_ide,
		real(kind=kreal), dimension(:), intent(in)	vals
	)

Append !ACCELERATION !

atype is one value shared by all the ACCELERATION conditions; each call with n > 0 overwrites it.

Definition at line 2594 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_boundary()

subroutine m_fstr_solid_setup::fstr_solid_append_boundary	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		integer(kind=kint), intent(in)	istot,
		character(len=hecmw_name_len), intent(in)	rotc_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)	dof_ids,
		integer(kind=kint), dimension(:), intent(in)	dof_ide,
		real(kind=kreal), dimension(:), intent(in)	vals
	)

Append !BOUNDARY !

With n = 0, only the group of rotation center is counted.

Definition at line 2220 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_cload()

subroutine m_fstr_solid_setup::fstr_solid_append_cload	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		character(len=hecmw_name_len), intent(in)	rotc_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)	dofs,
		real(kind=kreal), dimension(:), intent(in)	vals
	)

Append !CLOAD !

With n = 0, only the group of rotation center is counted.

Definition at line 2289 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_couple()

subroutine m_fstr_solid_setup::fstr_solid_append_couple	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		type(fstr_param)	fstrPARAM,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	n,
		character(len=hecmw_name_len), dimension(:), intent(in)	grp_names
	)

Append !COUPLE !

Definition at line 2648 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_dload()

subroutine m_fstr_solid_setup::fstr_solid_append_dload	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		integer(kind=kint), intent(in)	follow,
		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)	lids,
		real(kind=kreal), dimension(0:,:), intent(in)	params
	)

Append !DLOAD !

follow is one value shared by all the DLOAD conditions; each call with n > 0 overwrites it.

Definition at line 2397 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_element_activation()

subroutine m_fstr_solid_setup::fstr_solid_append_element_activation	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		character(len=hecmw_name_len), intent(in)	amp_name,
		real(kind=kreal), intent(in)	eps,
		integer(kind=kint), intent(in)	measure,
		integer(kind=kint), intent(in)	state,
		integer(kind=kint), intent(in)	n,
		character(len=hecmw_name_len), dimension(:), intent(in)	grp_names,
		real(kind=kreal), dimension(:), intent(in)	thlow,
		real(kind=kreal), dimension(:), intent(in)	thup
	)

Append !ELEMENT_ACTIVATION !

Definition at line 2676 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_spring()

subroutine m_fstr_solid_setup::fstr_solid_append_spring	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		integer(kind=kint), intent(in)	incremental,
		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)	dofs,
		real(kind=kreal), dimension(:), intent(in)	vals
	)

Append !SPRING !

Definition at line 2477 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_temperature()

subroutine m_fstr_solid_setup::fstr_solid_append_temperature	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		integer(kind=kint), intent(in)	n,
		character(len=hecmw_name_len), dimension(:), intent(in)	grp_names,
		real(kind=kreal), dimension(:), intent(in)	vals
	)

Append !TEMPERATURE !

Not used for the temperature read from a result (TEMP_irres > 0).

Definition at line 2446 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_append_velocity()

subroutine m_fstr_solid_setup::fstr_solid_append_velocity	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID,
		type(fstr_dynamic)	fstrDYNAMIC,
		character(len=*), intent(in)	header_name,
		integer(kind=kint), intent(in)	gid,
		integer(kind=kint), intent(in)	vtype,
		character(len=hecmw_name_len), intent(in)	rotc_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)	dof_ids,
		integer(kind=kint), dimension(:), intent(in)	dof_ide,
		real(kind=kreal), dimension(:), intent(in)	vals
	)

Append !VELOCITY !

With n = 0, only the group of rotation center is counted. vtype is one value shared by all the VELOCITY conditions; each call with n > 0 overwrites it.

Definition at line 2522 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_finalize()

subroutine m_fstr_solid_setup::fstr_solid_finalize ( type(fstr_solid) fstrSOLID )

Finalizer of fstr_solid.

Definition at line 452 of file fstr_solid_setup.f90.

Here is the call graph for this function:

◆ fstr_solid_init()

subroutine m_fstr_solid_setup::fstr_solid_init	(	type(hecmwst_local_mesh), target	hecMESH,
		type(fstr_solid)	fstrSOLID
	)

Initializer of structure fstr_solid.

Definition at line 37 of file fstr_solid_setup.f90.

◆ fstr_solid_init_contacts()

subroutine m_fstr_solid_setup::fstr_solid_init_contacts	(	type(hecmwst_local_mesh), pointer	hecMESH,
		type(fstr_solid)	fstrSOLID,
		type(fstr_param)	fstrPARAM,
		integer(kind=kint), intent(in)	is,
		integer(kind=kint), intent(in)	n,
		character(len=hecmw_name_len), intent(in)	cparam_name,
		integer(kind=kint), intent(in)	smoothing
	)

Initialize !CONTACT !

Checks and initializes contacts(is+1:is+n), whose pairs are already read. cparam_name is the name of !CONTACT_PARAM; the default parameters are used if it is not found.

Definition at line 2729 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_init_embeds()

subroutine m_fstr_solid_setup::fstr_solid_init_embeds	(	type(hecmwst_local_mesh), pointer	hecMESH,
		type(fstr_solid)	fstrSOLID,
		type(fstr_param)	fstrPARAM,
		integer(kind=kint), intent(in)	is,
		integer(kind=kint), intent(in)	n,
		character(len=hecmw_name_len), intent(in)	cparam_name,
		integer(kind=kint), intent(in)	smoothing
	)

Initialize !EMBED !

Checks and initializes embeds(is+1:is+n), whose pairs are already read. cparam_name is the name of !CONTACT_PARAM; the default parameters are used if it is not found.

Definition at line 2857 of file fstr_solid_setup.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fstr_solid_physic_val_finalize()

recursive subroutine m_fstr_solid_setup::fstr_solid_physic_val_finalize ( type(fstr_solid_physic_val) phys )

Definition at line 409 of file fstr_solid_setup.f90.

Here is the caller graph for this function:

Functions/Subroutines

Detailed Description

Function/Subroutine Documentation

◆ fstr_element_init()

◆ fstr_expand_dload_array()

◆ fstr_setup_acceleration()

◆ fstr_setup_boundary()

◆ fstr_setup_cload()

◆ fstr_setup_contact()

◆ fstr_setup_couple()

◆ fstr_setup_creep()

◆ fstr_setup_current_material()

◆ fstr_setup_damping()

◆ fstr_setup_dashpot_a()

◆ fstr_setup_dashpot_d()

◆ fstr_setup_density()

◆ fstr_setup_dload()

◆ fstr_setup_elastic()

◆ fstr_setup_element_activation()

◆ fstr_setup_elemopt()

◆ fstr_setup_embed()

◆ fstr_setup_expansion_coeff()

◆ fstr_setup_fluid()

◆ fstr_setup_hyperelastic()

◆ fstr_setup_istep()

◆ fstr_setup_material()

◆ fstr_setup_output_res()

◆ fstr_setup_output_vis()

◆ fstr_setup_plastic()

◆ fstr_setup_section()

◆ fstr_setup_solid_nastran()

◆ fstr_setup_spring()

◆ fstr_setup_spring_a()

◆ fstr_setup_spring_d()

◆ fstr_setup_static()

◆ fstr_setup_step()

◆ fstr_setup_step_convergence()

◆ fstr_setup_step_links()

◆ fstr_setup_step_store()

◆ fstr_setup_temperature()

◆ fstr_setup_trs()

◆ fstr_setup_uload()

◆ fstr_setup_user_material()

◆ fstr_setup_velocity()

◆ fstr_setup_viscoelastic()

◆ fstr_setup_write_flags()

◆ fstr_setup_write_store()

◆ fstr_smoothed_element_calcmaxcon()

◆ fstr_smoothed_element_init()

◆ fstr_solid_alloc()

◆ fstr_solid_append_acceleration()

◆ fstr_solid_append_boundary()

◆ fstr_solid_append_cload()

◆ fstr_solid_append_couple()

◆ fstr_solid_append_dload()

◆ fstr_solid_append_element_activation()

◆ fstr_solid_append_spring()

◆ fstr_solid_append_temperature()

◆ fstr_solid_append_velocity()

◆ fstr_solid_finalize()

◆ fstr_solid_init()

◆ fstr_solid_init_contacts()

◆ fstr_solid_init_embeds()

◆ fstr_solid_physic_val_finalize()