Toggle navigation
plantFEM
Contents
Source Files
Modules
Procedures
Derived Types
Programs
Source Files
Modules
Procedures
Derived Types
Programs
GetNormalGap
Subroutine
MIT
33 statements
Source File
ContactMechanicsClass.f90
ContactMechanicsClass
GetNormalGap
Contents
None
public subroutine GetNormalGap(xs, xm, gap)
Arguments
Type
Intent
Optional
Attributes
Name
real(kind=real64),
intent(in)
::
xs
(:)
real(kind=real64),
intent(in)
::
xm
(:,:)
real(kind=real64),
intent(out)
::
gap
Contents
None