Go to the source code of this file.
|
subroutine | calc_trd_s (lTRD_S) |
|
subroutine | calc_cg_trd_s (IJK, M, ltrD_s) |
|
subroutine | get_face_vel_solids (IJK, M, us_e, usw, usn, uss, ust, u |
|
subroutine | calc_deriv_vel_solids (IJK, M, lVelGradS, lRateStrainS) |
|
subroutine | calc_cg_deriv_vel_solids (IJK, M, lVelGradS, lRateStrain |
|
subroutine calc_cg_deriv_vel_solids |
( |
integer, intent(in) |
IJK, |
|
|
integer, intent(in) |
M, |
|
|
double precision, dimension(3,3), intent(out) |
lVelGradS, |
|
|
|
lRateStrain |
|
) |
| |
subroutine calc_cg_trd_s |
( |
integer, intent(in) |
IJK, |
|
|
integer, intent(in) |
M, |
|
|
double precision, dimension(dimension_3, dimension_m! ), intent(inout) |
ltrD_s |
|
) |
| |
subroutine calc_deriv_vel_solids |
( |
integer, intent(in) |
IJK, |
|
|
integer, intent(in) |
M, |
|
|
double precision, dimension(3,3), intent(out) |
lVelGradS, |
|
|
double precision, dimension(3,3), intent(out) |
lRateStrainS |
|
) |
| |
subroutine calc_trd_s |
( |
double precision, dimension(dimension_3, dimension_m), intent(out) |
lTRD_S | ) |
|
subroutine get_face_vel_solids |
( |
integer, intent(in) |
IJK, |
|
|
integer, intent(in) |
M, |
|
|
double precision, intent(out) |
us_e, |
|
|
double precision, intent(out) |
usw, |
|
|
double precision, intent(out) |
usn, |
|
|
double precision, intent(out) |
uss, |
|
|
double precision, intent(out) |
ust, |
|
|
|
u |
|
) |
| |