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 D | pmxab.c | 6215 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 D | pmx270.for | 3838 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 …]
|