Functions/Subroutines
subroutine	alcnsa (JJA, JJB, HB1, HB2, HC1, HC2, HM1, HM2, LAB, NPTR, NSDIM, IMODE)

Function/Subroutine Documentation

◆ alcnsa()

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
	)