GRASP rci-qed
|
Functions/Subroutines | |
real(kind(0.0d0)) function | skint (RAC, IA, IC, RBD, IB, ID, K, IW) |
real(kind(0.0d0)) function skint | ( | real(double), dimension(nnnp), intent(in) | RAC, |
integer | IA, | ||
integer | IC, | ||
real(double), dimension(nnnp), intent(in) | RBD, | ||
integer | IB, | ||
integer | ID, | ||
integer, intent(in) | K, | ||
integer, intent(in) | IW | ||
) |