GRASP
|
Functions/Subroutines | |
subroutine | nine0 (J1, J2, J3, L1, L2, L3, K1, K2, K3, AA) |
subroutine nine0 | ( | integer | J1, |
integer | J2, | ||
integer | J3, | ||
integer | L1, | ||
integer | L2, | ||
integer | L3, | ||
integer | K1, | ||
integer | K2, | ||
integer | K3, | ||
real(double), intent(out) | AA | ||
) |