GRASP
|
Functions/Subroutines | |
subroutine | reco4 (JA1, JA2, JA3, JA4, K1, K2, K3, K4, KA, IRE, IAT, RECC) |
subroutine reco4 | ( | integer, intent(in) | JA1, |
integer, intent(in) | JA2, | ||
integer, intent(in) | JA3, | ||
integer, intent(in) | JA4, | ||
integer, intent(in) | K1, | ||
integer, intent(in) | K2, | ||
integer, intent(in) | K3, | ||
integer, intent(in) | K4, | ||
integer, intent(in) | KA, | ||
integer, intent(in) | IRE, | ||
integer, intent(out) | IAT, | ||
real(double), intent(out) | RECC | ||
) |