Searched refs:levbot (Results 1 – 2 of 2) sorted by relevance
5816 static integer indxr, iraise, levbot; in chkkbdrests_() local5943 levbot = levbotr[indxr]; in chkkbdrests_()5944 iraise1 = levother - levbot + 3; in chkkbdrests_()5945 iraise2 = levnext - levbot; in chkkbdrests_()33418 static integer levbot, ilvert, invert; in putarp_() local33482 levbot = min(i__1,*nolev) - *ncm + 3; in putarp_()33492 invert = -levbot + 4 + *nolev - *ncm; in putarp_()33502 if (levbot >= 0 && levbot <= 9) { in putarp_()33511 i__1 = levbot + 48; in putarp_()33521 i__1 = levbot + 48; in putarp_()[all …]
3468 levbot = levbotr(indxr)3469 iraise1 = levother-levbot+33470 iraise2 = levnext-levbot17130 c levbot = levbotr(indxr)17131 c iraise1 = levother-levbot+317132 c iraise2 = levnext-levbot21401 levbot = min(levar1(iarp),nolev)-ncm+321409 invert = -levbot+4+nolev-ncm21412 c *levbot,nolev,ncm21419 if (levbot .ge. 0 .and. levbot .le. 9) then[all …]