Searched refs:npg1 (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 | 20519 npg1 = 0; in getnote_()
20528 npg1 = npg1 * 10 + *(unsigned char *)durq - 48; in getnote_()
20531 if (npg1 == 0 || npg1 % 2 == 1) { in getnote_()
20536 if (npg1 > 0 && npg1 % 2 == 0) { in getnote_()
20585 if (npg1 == 0) { in getnote_()
20586 npg1 = 1; in getnote_()
20605 if (npg1 < 10) { in getnote_()
20615 do_fio(&c__1, (char *)&npg1, (ftnlen)sizeof(integer)); in getnote_()
20617 } else if (npg1 < 100) { in getnote_()
20626 do_fio(&c__1, (char *)&npg1, (ftnlen)sizeof(integer)); in getnote_()
[all …]
|
| H A D | pmx270.for | 13341 npg1 = 0
13349 npg1 = npg1*10+ichar(durq)-48
13352 if (npg1.eq.0 .or. mod(npg1,2).eq.1) ipg1r = 1
13355 if (npg1.gt.0 .and. mod(npg1,2).eq.0) ipg1r = 1
13394 if (npg1.eq.0) npg1=1
13405 if (npg1 .lt. 10) then
13409 write(hdlndq(lhead:lhead),'(i1)')npg1
13410 else if (npg1 .lt. 100) then
13412 write(hdlndq(lhead-2:lhead),'(i2,a1)')npg1,'}'
13415 write(hdlndq(lhead-3:lhead),'(i3,a1)')npg1,'}'
|