Searched refs:nornb (Results 1 – 2 of 2) sorted by relevance
2570 integer nornb(nm),ihornb(nm,24)3087 c Henceforth nornb will be a counter.3089 if (iorn .gt. 0) nornb(ivx)=14319 integer*4 ihornb(nm,24),nornb(nm)4617 lbot = ihornb(ivx,nornb(ivx))+14625 nornb(ivx) = nornb(ivx)+115874 nornb(ivx) = 017007 nornb(ivx) = 021766 integer*4 ihornb(nm,24),nornb(nm)21819 ihorn = ihornb(ivx,nornb(ivx))[all …]
4650 --nornb; in beamstrt_()5482 nornb[commvl_1.ivx] = 1; in beamstrt_()7151 --nornb; in docrd_()7473 --nornb; in dodyn_()7565 ++nornb[*ivx]; in dodyn_()24164 static integer nornb[24]; in make2bar_() local24320 nornb[commvl_1.ivx - 1] = 0; in make2bar_()26179 nornb[commvl_1.ivx - 1] = 0; in make2bar_()34236 --nornb; in putorn_()34289 ihorn = ihornb[*ivx + nornb[*ivx] * 24]; in putorn_()[all …]