Searched refs:ilvert (Results 1 – 2 of 2) sorted by relevance
| /dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/ |
| H A D | pmx270.for | 21418 ilvert = (invert+1)/2
21448 c if (ilvert .le. 9) then
21449 c call addstr(notexq(1:lnote)//chax(48+ilvert),lnote+1,
21452 c write(notexq(lnote+1:lnote+4),'(a1,i2,a1)')'{',ilvert,'}'
21456 if (ilvert .gt. 9) then
21457 write(notexq(lnote+1:lnote+4),'(a1,i2,a1)')'{',ilvert,'}'
21460 notexq = notexq(1:lnote)//chax(48+ilvert)
|
| H A D | pmxab.c | 33418 static integer levbot, ilvert, invert; in putarp_() local
33501 ilvert = (invert + 1) / 2; in putarp_()
33581 if (ilvert > 9) { in putarp_()
33590 do_fio(&c__1, (char *)&ilvert, (ftnlen)sizeof(integer)); in putarp_()
33597 i__1 = ilvert + 48; in putarp_()
|