Home
last modified time | relevance | path

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

/dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/
H A Dpmxab.c24193 static integer ibmcnt1[24], lnoten; in make2bar_() local
24317 ibmcnt1[commvl_1.ivx - 1] = 1; in make2bar_()
24554 if (numbms[commvl_1.ivx] > 0 && ibmcnt1[commvl_1.ivx - 1] <= numbms[ in make2bar_()
24555 commvl_1.ivx] && all_1.ibm1[commvl_1.ivx + ibmcnt1[ in make2bar_()
24569 commvl_1.ivx + ibmcnt1[commvl_1.ivx - 1] * 24 - 25), & in make2bar_()
24587 if (beamon1[commvl_1.ivx - 1] && all_1.ibm2[commvl_1.ivx + ibmcnt1[ in make2bar_()
24590 ++ibmcnt1[commvl_1.ivx - 1]; in make2bar_()
H A Dpmx270.for15790 * nornb(nm),ihornb(nm,24),lcwr(nm),ibmcnt1(nm),ifig(2)
15871 ibmcnt1(ivx) = 1
15995 if ((numbms(ivx).gt.0 .and. ibmcnt1(ivx).le.numbms(ivx)
15996 * .and. ibm1(ivx,ibmcnt1(ivx)) .eq. ip)) then
16006 * ipl(ivx,ip),irest(ivx,ip),ulq(ivx,ibmcnt1(ivx)),
16018 if (beamon1(ivx) .and. ibm2(ivx,ibmcnt1(ivx)).eq.ip) then
16020 ibmcnt1(ivx) = ibmcnt1(ivx)+1