Searched refs:numshft (Results 1 – 2 of 2) sorted by relevance
12156 static integer mtrdenl, lenmult, numshft; in g1etnote_() local12703 numshft = 0; in g1etnote_()12710 ++numshft; in g1etnote_()12711 if (numshft == 3) { in g1etnote_()12733 if (numshft == 1 && snum > 15.1f || numshft == 2 && snum in g1etnote_()17743 static integer numshft; in getnote_() local18204 numshft = 0; in getnote_()18221 ++numshft; in getnote_()18230 if (numshft == 1) { in getnote_()
7833 numshft = 07838 numshft = numshft+17839 if (numshft .eq. 3) then7852 if ((numshft.eq.1 .and. snum.gt.15.1) .or. 7853 * (numshft.eq.2 .and. snum.gt.1.51)) then11732 numshft = 011744 numshft = numshft+111750 if (numshft .eq. 1) then