Home
last modified time | relevance | path

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

/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Dallocation_rfn.f30 & nteller,nopeexp,nope,nentries,n,key,istat,ipol,inl,iline local
92 nteller=n-1
93 if(nteller.lt.nope) then
98 if(nteller+n.gt.nope) n=nope-nteller
99 nteller=nteller+n
100 if(nteller.eq.nope) exit
H A Delements.f39 & nteller,j,ipkon(*),nkon,nope,indexe,mi(*),ipos,indexy,ixfree, local
478 nteller=n-1
479 if(nteller.lt.nope) then
490 if(nteller+n.gt.nope) n=nope-nteller
493 & kon(indexe+nteller+j)
500 nteller=nteller+n
501 if(nteller.eq.nope) exit
H A Dallocation.f57 & ielset,nope,nteller,nterm,ialset(16),ncs_,rmeminset(*), local
1169 nteller=n-1
1170 if(nteller.lt.nope) then
1175 if(nteller+n.gt.nope) n=nope-nteller
1176 nteller=nteller+n
1177 if(nteller.eq.nope) exit