![]() |
FrontISTR
5.9.0
Large-scale structural analysis program with finit element method
|
MPC (Multi-Point Constraint) processing for contact analysis. More...
Functions/Subroutines | |
| subroutine, public | contact2mpcval (cstate, etype, nnode, mpcval) |
| subroutine, public | l_contact2mpc (contact, mpcs, nmpc) |
| subroutine, public | l_tied2mpc (contact, mpcs, nmpc) |
| Rigid connect condition to equation conditions. More... | |
| subroutine, public | fstr_contact2mpc (contacts, mpcs) |
| Contact states to equation conditions. More... | |
| subroutine, public | fstr_del_contactmpc (mpcs) |
| Delete mpcs derived from contact conditions. More... | |
| subroutine, public | fstr_write_mpc (file, mpcs) |
| Print out mpc conditions. More... | |
MPC (Multi-Point Constraint) processing for contact analysis.
This module provides internal functions to convert contact constraints to MPC form. All functions are private and used only within mContact module.
| subroutine, public m_fstr_contact_mpc::contact2mpcval | ( | type(tcontactstate), intent(in) | cstate, |
| integer, intent(in) | etype, | ||
| integer, intent(in) | nnode, | ||
| real(kind=kreal), dimension(nnode*3 + 4), intent(out) | mpcval | ||
| ) |
| [in] | cstate | contact state |
| [in] | etype | type of contacting surface |
| [in] | nnode | number of elemental nodes |
| [out] | mpcval | MPC constraint |
Definition at line 28 of file fstr_contact_mpc.f90.
| subroutine, public m_fstr_contact_mpc::fstr_contact2mpc | ( | type( tcontact ), dimension(:), intent(in) | contacts, |
| type( hecmwst_mpc ), intent(inout) | mpcs | ||
| ) |
Contact states to equation conditions.
| [in] | contacts | current contact state |
| [in,out] | mpcs | to who mpc be appended |
Definition at line 122 of file fstr_contact_mpc.f90.
| subroutine, public m_fstr_contact_mpc::fstr_del_contactmpc | ( | type( hecmwst_mpc ), intent(inout) | mpcs | ) |
Delete mpcs derived from contact conditions.
| [in,out] | mpcs | mpcs to be modified |
Definition at line 144 of file fstr_contact_mpc.f90.
| subroutine, public m_fstr_contact_mpc::fstr_write_mpc | ( | integer(kind=kint), intent(in) | file, |
| type( hecmwst_mpc ), intent(in) | mpcs | ||
| ) |
Print out mpc conditions.
| [in] | file | file number |
| [in] | mpcs | mpcs to be printed |
Definition at line 151 of file fstr_contact_mpc.f90.
| subroutine, public m_fstr_contact_mpc::l_contact2mpc | ( | type( tcontact ), intent(in) | contact, |
| type( hecmwst_mpc ), intent(inout) | mpcs, | ||
| integer(kind=kint), intent(out) | nmpc | ||
| ) |
| [in] | contact | current contact state |
| [in,out] | mpcs | to who mpc be appended |
| [out] | nmpc | number of mpc conditions appended |
Definition at line 47 of file fstr_contact_mpc.f90.
| subroutine, public m_fstr_contact_mpc::l_tied2mpc | ( | type( tcontact ), intent(in) | contact, |
| type( hecmwst_mpc ), intent(inout) | mpcs, | ||
| integer(kind=kint), intent(out) | nmpc | ||
| ) |
Rigid connect condition to equation conditions.
| [in] | contact | current contact state |
| [in,out] | mpcs | to who mpc be appended |
| [out] | nmpc | number of mpc conditions appended |
Definition at line 93 of file fstr_contact_mpc.f90.