GRASP
Functions/Subroutines
wj1.f90 File Reference

Functions/Subroutines

subroutine wj1 (IK, BK, ID, BD, K2, QM1, QM2, WJ)
 

Function/Subroutine Documentation

◆ wj1()

subroutine wj1 ( 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,
integer, intent(in K2,
real(double), intent(in QM1,
real(double), intent(in QM2,
real(double), intent(out WJ 
)
Here is the call graph for this function:
Here is the caller graph for this function: