| GRASP
    | 
| Functions/Subroutines | |
| subroutine | w1jjg (K1, QM1, QM2, IK, BK, ID, BD, WW) | 
| subroutine w1jjg | ( | integer, intent(in) | K1, | 
| real(double), intent(in) | QM1, | ||
| real(double), intent(in) | QM2, | ||
| integer, dimension(7), intent(in) | IK, | ||
| real(double), dimension(3), intent(in) | BK, | ||
| integer, dimension(7), intent(in) | ID, | ||
| real(double), dimension(3), intent(in) | BD, | ||
| real(double), intent(out) | WW | ||
| ) | 


 1.8.13
 1.8.13