FrontISTR  5.9.0
Large-scale structural analysis program with finit element method
m_dynamic_mat_ass_bc_vl Module Reference

This module contains functions to set velocity boundary condition in dynamic analysis. More...

Functions/Subroutines

subroutine gather_rotvel_info (hecMESH, fstrSOLID, fstrDYNAMIC, t_curr, ndof, rinfo, cstep)
 Gather rotational velocity information (!VELOCITY, ROT_CENTER=) into rinfo. For each velocity BC with ROT_CENTER, the given DOF values are the angular velocity vector components (rad/s), multiplied by the amplitude at t_curr. More...
 
subroutine get_rotcenter_coord (hecMESH, fstrSOLID, ig, ndof, ccoord)
 Return the current-configuration coordinate of the rotation center node group. More...
 
subroutine dynamic_mat_ass_bc_vl (cstep, hecMESH, hecMAT, fstrSOLID, fstrDYNAMIC, fstrPARAM, hecLagMAT, t_curr, iter, conMAT)
 This subrouitne set velocity boundary condition in dynamic analysis. More...
 
subroutine dynamic_bc_init_vl (hecMESH, hecMAT, fstrSOLID, fstrDYNAMIC, t_curr)
 This function sets initial condition of velocity. More...
 
subroutine dynamic_explicit_ass_vl (hecMESH, hecMAT, fstrSOLID, fstrDYNAMIC, t_curr, iter)
 

Detailed Description

This module contains functions to set velocity boundary condition in dynamic analysis.

Function/Subroutine Documentation

◆ dynamic_bc_init_vl()

subroutine m_dynamic_mat_ass_bc_vl::dynamic_bc_init_vl ( type(hecmwst_local_mesh hecMESH,
type(hecmwst_matrix hecMAT,
type(fstr_solid fstrSOLID,
type(fstr_dynamic fstrDYNAMIC,
real(kind=kreal)  t_curr 
)

This function sets initial condition of velocity.

Definition at line 318 of file dynamic_mat_ass_bc_vl.f90.

Here is the call graph for this function:

◆ dynamic_explicit_ass_vl()

subroutine m_dynamic_mat_ass_bc_vl::dynamic_explicit_ass_vl ( type(hecmwst_local_mesh hecMESH,
type(hecmwst_matrix hecMAT,
type(fstr_solid fstrSOLID,
type(fstr_dynamic fstrDYNAMIC,
real(kind=kreal)  t_curr,
integer, optional  iter 
)

Definition at line 400 of file dynamic_mat_ass_bc_vl.f90.

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

◆ dynamic_mat_ass_bc_vl()

subroutine m_dynamic_mat_ass_bc_vl::dynamic_mat_ass_bc_vl ( integer(kind=kint)  cstep,
type(hecmwst_local_mesh hecMESH,
type(hecmwst_matrix hecMAT,
type(fstr_solid fstrSOLID,
type(fstr_dynamic fstrDYNAMIC,
type(fstr_param fstrPARAM,
type(hecmwst_matrix_lagrange hecLagMAT,
real(kind=kreal)  t_curr,
integer, optional  iter,
type(hecmwst_matrix), optional  conMAT 
)

This subrouitne set velocity boundary condition in dynamic analysis.

Parameters
fstrparamanalysis control parameters
heclagmattype hecmwST_matrix_lagrange

Definition at line 88 of file dynamic_mat_ass_bc_vl.f90.

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

◆ gather_rotvel_info()

subroutine m_dynamic_mat_ass_bc_vl::gather_rotvel_info ( type(hecmwst_local_mesh hecMESH,
type(fstr_solid fstrSOLID,
type(fstr_dynamic fstrDYNAMIC,
real(kind=kreal), intent(in)  t_curr,
integer(kind=kint), intent(in)  ndof,
type(trotinfo rinfo,
integer(kind=kint), optional  cstep 
)

Gather rotational velocity information (!VELOCITY, ROT_CENTER=) into rinfo. For each velocity BC with ROT_CENTER, the given DOF values are the angular velocity vector components (rad/s), multiplied by the amplitude at t_curr.

Definition at line 14 of file dynamic_mat_ass_bc_vl.f90.

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

◆ get_rotcenter_coord()

subroutine m_dynamic_mat_ass_bc_vl::get_rotcenter_coord ( type(hecmwst_local_mesh hecMESH,
type(fstr_solid fstrSOLID,
integer(kind=kint), intent(in)  ig,
integer(kind=kint), intent(in)  ndof,
real(kind=kreal), dimension(3), intent(out)  ccoord 
)

Return the current-configuration coordinate of the rotation center node group.

Definition at line 64 of file dynamic_mat_ass_bc_vl.f90.

Here is the caller graph for this function: