Go to the source code of this file.
Functions/Subroutines | |
subroutine | tractpressloaddef (R_ex, numnp, InterfaceNumElems, InterfaceNumNodes, InterfaceElemConn, MapNode, LwrBnd, UppBnd, coor, Disp, MapSFElVolEl, ElConnVol, iElType, NumElVol, TractPress) |
subroutine tractpressloaddef | ( | real*8, dimension(1:3*numnp) | R_ex, |
integer | numnp, | ||
integer | InterfaceNumElems, | ||
integer | InterfaceNumNodes, | ||
integer, dimension(1:uppbnd,1:interfacenumelems) | InterfaceElemConn, | ||
integer, dimension(1:interfacenumnodes) | MapNode, | ||
integer | LwrBnd, | ||
integer | UppBnd, | ||
real*8, dimension(1:3,1:numnp) | coor, | ||
real*8, dimension(1:3*numnp) | Disp, | ||
integer, dimension(1:numelvol) | MapSFElVolEl, | ||
integer, dimension(1:ieltype,1:numelvol) | ElConnVol, | ||
integer | iElType, | ||
integer | NumElVol, | ||
real*8 | TractPress | ||
) |
Definition at line 53 of file MP/Source/TractPressLoadDef.f90.