Home
last modified time | relevance | path

Searched refs:ilenx (Results 1 – 4 of 4) sorted by relevance

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/texas/
H A Dtransfor.F5 * ilenx,jlenx,klenx,llenx, argument
61 ndim_bra=ilenx*jlenx
81 if( max_bra.gt.1.and.(jlenx+ilenx).ne.(jlens+ilens) ) then
85 * jlenx,ilenx,
H A Dlab_reorder.F203 integer ilenx,ileny
211 ilenx=inx(10,icsx)-inx(11,icsx)
226 if(ileny.eq.ilenx) then
230 do iiii = 1, ilenx
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/texas/
H A Dtransfor.F5 * ilenx,jlenx,klenx,llenx,
61 ndim_bra=ilenx*jlenx
81 if( max_bra.gt.1.and.(jlenx+ilenx).ne.(jlens+ilens) ) then
85 * jlenx,ilenx,
H A Dlab_reorder.F203 integer ilenx,ileny
211 ilenx=inx(10,icsx)-inx(11,icsx)
226 if(ileny.eq.ilenx) then
230 do iiii = 1, ilenx