Home
last modified time | relevance | path

Searched refs:ibelowtop (Results 1 – 2 of 2) sorted by relevance

/dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/
H A Dpmxab.c6215 static integer ibelowbot, ibelowtop, iwa, iranksetter, iseg; in crdacc_() local
6445 for (ibelowtop = nsegrb; ibelowtop >= 1; --ibelowtop) { in crdacc_()
6446 if (segrb[(ibelowtop << 1) - 1] < nolev + segal[iacctype + (( in crdacc_()
6448 for (ibelowbot = ibelowtop; ibelowbot >= 1; --ibelowbot) { in crdacc_()
6467 netgain = nsegal[iacctype - 1] - ibelowtop + ibelowbot; in crdacc_()
6472 i__2 = ibelowtop + 1; in crdacc_()
6482 segrb[(ibelowtop + netgain << 1) - 2] = segrb[(ibelowtop << 1) - in crdacc_()
6486 ksegrb[ibelowtop + netgain - 1] = ksegrb[ibelowtop - 1]; in crdacc_()
6492 segrb[(ibelowtop + netgain << 1) - 2] = segrb[(ibelowtop << 1) - in crdacc_()
6496 ksegrb[ibelowtop + netgain - 1] = ksegrb[ibelowtop - 1]; in crdacc_()
[all …]
H A Dpmx270.for3838 do 5 ibelowtop = nsegrb , 1 , -1
3839 if (segrb(2,ibelowtop) .lt.
3841 do 9 ibelowbot = ibelowtop , 1 , -1
3857 do 7 isegrb = nsegrb , ibelowtop+1 , -1
3865 segrb(1,ibelowtop+netgain) = segrb(1,ibelowtop)
3866 segrb(2,ibelowtop+netgain) =
3868 ksegrb(ibelowtop+netgain) = ksegrb(ibelowtop)
3874 segrb(1,ibelowtop+netgain) = segrb(1,ibelowtop)
3875 segrb(2,ibelowtop+netgain) =
3877 ksegrb(ibelowtop+netgain) = ksegrb(ibelowtop)
[all …]