FrontISTR 5.2.0
Large-scale structural analysis program with finit element method
Loading...
Searching...
No Matches
m_fstr_residual Module Reference

This module provides function to calcualte residual of nodal force. More...

Functions/Subroutines

subroutine, public fstr_update_ndforce (cstep, hecmesh, hecmat, fstrsolid, conmat)
 
subroutine, public fstr_update_ndforce_spc (cstep, hecmesh, fstrsolid, b)
 
real(kind=kreal) function, public fstr_get_residual (force, hecmesh)
 Calculate magnitude of a real vector.
 
real(kind=kreal) function fstr_get_energy (force, displacement, hecmesh)
 Calculate magnitude of a real vector.
 
real(kind=kreal) function, public fstr_get_norm_contact (flag, hecmesh, hecmat, fstrsolid, fstrmat)
 Calculate square norm.
 
real(kind=kreal) function, public fstr_get_norm_para_contact (hecmat, fstrmat, conmat, hecmesh)
 
real(kind=kreal) function, public fstr_get_x_norm_contact (hecmat, fstrmat, hecmesh)
 

Detailed Description

This module provides function to calcualte residual of nodal force.

Function/Subroutine Documentation

◆ fstr_get_energy()

real(kind=kreal) function m_fstr_residual::fstr_get_energy ( real(kind=kreal), dimension(:), intent(in)  force,
real(kind=kreal), dimension(:), intent(in)  displacement,
type(hecmwst_local_mesh), intent(in)  hecmesh 
)

Calculate magnitude of a real vector.

Parameters
[in]hecmeshmesh information

Definition at line 153 of file fstr_Residual.f90.

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

◆ fstr_get_norm_contact()

real(kind=kreal) function, public m_fstr_residual::fstr_get_norm_contact ( character(len=13)  flag,
type(hecmwst_local_mesh), intent(in)  hecmesh,
type(hecmwst_matrix), intent(in)  hecmat,
type(fstr_solid), intent(in)  fstrsolid,
type(fstrst_matrix_contact_lagrange), intent(in)  fstrmat 
)

Calculate square norm.

Parameters
[in]hecmeshmesh information

Definition at line 163 of file fstr_Residual.f90.

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

◆ fstr_get_norm_para_contact()

real(kind=kreal) function, public m_fstr_residual::fstr_get_norm_para_contact ( type(hecmwst_matrix), intent(in)  hecmat,
type(fstrst_matrix_contact_lagrange), intent(in)  fstrmat,
type(hecmwst_matrix), intent(in)  conmat,
type(hecmwst_local_mesh), intent(in)  hecmesh 
)

Definition at line 190 of file fstr_Residual.f90.

Here is the caller graph for this function:

◆ fstr_get_residual()

real(kind=kreal) function, public m_fstr_residual::fstr_get_residual ( real(kind=kreal), dimension(:), intent(in)  force,
type(hecmwst_local_mesh), intent(in)  hecmesh 
)

Calculate magnitude of a real vector.

Parameters
[in]hecmeshmesh information

Definition at line 143 of file fstr_Residual.f90.

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

◆ fstr_get_x_norm_contact()

real(kind=kreal) function, public m_fstr_residual::fstr_get_x_norm_contact ( type(hecmwst_matrix), intent(in)  hecmat,
type(fstrst_matrix_contact_lagrange), intent(in)  fstrmat,
type(hecmwst_local_mesh), intent(in)  hecmesh 
)

Definition at line 256 of file fstr_Residual.f90.

Here is the caller graph for this function:

◆ fstr_update_ndforce()

subroutine, public m_fstr_residual::fstr_update_ndforce ( integer(kind=kint), intent(in)  cstep,
type(hecmwst_local_mesh), intent(in)  hecmesh,
type(hecmwst_matrix), intent(inout)  hecmat,
type(fstr_solid), intent(inout)  fstrsolid,
type(hecmwst_matrix), intent(inout), optional  conmat 
)
Parameters
[in]cstepIn this subroutine, nodal force arose from prescribed displacement constarints are cleared and nodal force residual is calculated. Those constraints considered here includes:
  1. nodal displacement
  2. equation (or mpc)
[in]cstepcurrent step
[in]hecmeshmesh information
[in,out]hecmatlinear equation, its right side modified here
[in,out]fstrsolidwe need boundary conditions of curr step

Definition at line 23 of file fstr_Residual.f90.

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

◆ fstr_update_ndforce_spc()

subroutine, public m_fstr_residual::fstr_update_ndforce_spc ( integer(kind=kint), intent(in)  cstep,
type(hecmwst_local_mesh), intent(in)  hecmesh,
type(fstr_solid), intent(in)  fstrsolid,
real(kind=kreal), dimension(:), intent(inout)  b 
)
Parameters
[in]cstepcurrent step
[in]hecmeshmesh information
[in]fstrsolidwe need boundary conditions of curr step
[in,out]bright hand side

Definition at line 103 of file fstr_Residual.f90.

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