Searched refs:ipg1r (Results 1 – 2 of 2) sorted by relevance
17703 static integer ipg1r; in getnote_() local20524 ipg1r = 0; in getnote_()20532 ipg1r = 1; in getnote_()20537 ipg1r = 1; in getnote_()20644 i__1 = ipg1r + 48; in getnote_()
13346 ipg1r = 013352 if (npg1.eq.0 .or. mod(npg1,2).eq.1) ipg1r = 113355 if (npg1.gt.0 .and. mod(npg1,2).eq.0) ipg1r = 113417 hdlndq = hdlndq(1:lhead)//chax(ipg1r+48)//'{'