FEDEM Solver
R8.0
Source code of the dynamics solver
|
Public Member Functions | |
subroutine | maxshear (N, Pval, Pdir, Shear, Sdir) |
subroutine ffatensortransformsinterface::maxshear::maxshear | ( | integer, intent(in) | N, |
real(dp), dimension(*), intent(in) | Pval, | ||
real(dp), dimension(*), intent(in) | Pdir, | ||
real(dp), intent(out) | Shear, | ||
real(dp), dimension(*), intent(out) | Sdir | ||
) |