Searched refs:nsystp (Results 1 – 2 of 2) sorted by relevance
13398 c if (ipage.gt.1 .or. nsystp(1).gt.1) then13419 c if (ipage.gt.1 .or. nsystp(1).gt.1) then18905 nsystp = nomnsystp18906 if (ipage .le. nshort) nsystp = nsystp-118909 isysendpg = isysb4+nsystp18939 D = xilfrac+nsystp-1+etatop+etabot18940 c C = nsystp*(nv-1)18942 c xN = heightil - xiltxt - 4*nsystp*nv - (nsystp-1)*xilbn18943 xN = heightil - xiltxt - 4*(nintpg+nsystp) - (nsystp-1)*xilbn18944 if (bottreb) xN = xN-(nsystp-1)*xilbtc[all …]
637 integer nsystp[40], ipage; member28681 static integer nsystp; in pmxa_() local29180 nsystp = nomnsystp; in pmxa_()29182 --nsystp; in pmxa_()29186 isysendpg = isysb4 + nsystp; in pmxa_()29220 d__ = xilfrac + nsystp - 1 + cblock_1.etatop + cblock_1.etabot; in pmxa_()29224 xn = heightil - xiltxt - (nintpg + nsystp << 2) - (nsystp - 1) * in pmxa_()29227 xn -= (nsystp - 1) * cblock_1.xilbtc; in pmxa_()29233 xn -= nsystp * cblock_1.xilfig; in pmxa_()30278 do_lio(&c__3, &c__1, (char *)&comnotes_1.nsystp[ipa - 1], (ftnlen) in pmxb_()[all …]