GRASP
Functions/Subroutines
w1jjg.f90 File Reference

Functions/Subroutines

subroutine w1jjg (K1, QM1, QM2, IK, BK, ID, BD, WW)
 

Function/Subroutine Documentation

◆ w1jjg()

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 
)
Here is the call graph for this function:
Here is the caller graph for this function: