| 
    GRASP
    
   | 
 
Functions/Subroutines | |
| subroutine | alcnsa (JJA, JJB, HB1, HB2, HC1, HC2, HM1, HM2, LAB, NPTR, NSDIM, IMODE) | 
| subroutine alcnsa | ( | integer, dimension(:), pointer | JJA, | 
| integer, dimension(:), pointer | JJB, | ||
| real(double), dimension(:), pointer | HB1, | ||
| real(double), dimension(:), pointer | HB2, | ||
| real(double), dimension(:), pointer | HC1, | ||
| real(double), dimension(:), pointer | HC2, | ||
| real(double), dimension(:), pointer | HM1, | ||
| real(double), dimension(:), pointer | HM2, | ||
| integer, dimension(:), pointer | LAB, | ||
| integer, dimension(:), pointer | NPTR, | ||
| integer | NSDIM, | ||
| integer, intent(in) | IMODE | ||
| ) | 

 1.8.13