GRASP
Functions/Subroutines
awp1jjg.f90 File Reference

Functions/Subroutines

subroutine awp1jjg (K1, BK2, QM1, QM2, QM3, IK, BK, ID, BD, AW)
 

Function/Subroutine Documentation

◆ awp1jjg()

subroutine awp1jjg ( integer, intent(in K1,
real(double), intent(in BK2,
real(double), intent(in QM1,
real(double), intent(in QM2,
real(double), intent(in QM3,
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 AW 
)
Here is the call graph for this function:
Here is the caller graph for this function: