1 	subroutine fillsparseI(	iens, xKebe,	lhsK,  argument
16 	integer iens(npro,nshl)  local
22 	ien=abs(iens)
68 	subroutine fillsparseC(	iens, EGmass,	lhsK,  argument
91 	integer iens(npro,nshl)  local
97 	ien=abs(iens)
131       subroutine fillsparseC_BC(    iens, EGmass,  argument
152       integer iens(npro,nshl)  local
158       ien=abs(iens)
194       subroutine fillsparseSclr(   iens,      xSebe,    lhsS,  argument
206       integer iens(npro,nshl)  local
212       ien=abs(iens)