Home
last modified time | relevance | path

Searched refs:nvmaxl (Results 1 – 3 of 3) sorted by relevance

/dports/science/siesta/siesta-4.1.5/Src/
H A Dvmat.F9085 integer :: nvmaxl, triang, lenx, leny, lenz,lenxy local
137 nvmaxl = listdlptr(nrowsDscfL) + numdl(nrowsDscfL)
139 nvmaxl = 1
180 call re_alloc( t_DscfL, 1, nvmaxl, 1, spin%H, 1, NTH, &
192 DscfL => t_DscfL(1:nvmaxl,:,TID)
193 DscfL(1:nvmaxl,:) = 0._dp
511 do ind = 1, nvmaxl
540 DscfL => t_DscfL(1:nvmaxl,1:spin%H,1)
541 call matrixMtoO( nvmaxl, nvmax, numVs, listVsptr, nuo, &
H A Ddelk.F9086 integer :: nvmaxl, triang, lenx, leny, lenz,lenxy local
152 nvmaxl = listdlptr(nrowsDscfL) + numdl(nrowsDscfL)
154 nvmaxl = 1
196 call re_alloc( t_DscfL, 1, nvmaxl, 1, 2, 1, NTH, &
208 DscfL => t_DscfL(1:nvmaxl,1:2,TID)
209 DscfL(1:nvmaxl,1:2) = 0.0_dp
594 do ind = 1, nvmaxl
620 DscfL => t_DscfL(1:nvmaxl,1:2,1)
621 call matrixMtoOC( nvmaxl, nvmax, numVs, listVsptr, nuo, DscfL, delkmat )
H A Dvmatsp.F9079 nphiloc, nvmaxl, iii(3) local
116 nvmaxl = listdlptr(nrowsDscfL) + numdl(nrowsDscfL)
118 nvmaxl = 1
137 call re_alloc( DscfL, 1, nvmaxl, 1, nspin, 'DscfL', 'vmatsp' )
138 DscfL(1:nvmaxl,1:nspin) = 0.0_dp
443 call matrixMtoO( nvmaxl, nvmax, numVs, listVsptr, nuo, &