Lines Matching refs:nlast

310       integer  iBC(numnp),nlast,i,j,nper   local
314          nlast=numBCt(i)     ! number of time series to interpolate from
321          do j=2,nlast   !loop to find the interval that we are in
385       integer nlast, nper, k, j , jstep  local
389          nlast=numImpt(k)     ! number of time series to interpolate from
390          nper=ctime/ValueImpt(nlast,1,k)!number of periods completed to shift off
391          ptime = ctime-nper*ValueImpt(nlast,1,k)  ! now time in periodic domain
393          do j=2,nlast   !loop to find the interval that we are in
489       integer nlast, nper, k, j  local
493          nlast=numRCRt(k)     ! number of time series to interpolate from
494          nper=ctime/ValuePdist(nlast,1,k)!number of periods completed to shift off
495          ptime = ctime-nper*ValuePdist(nlast,1,k)  ! now time in periodic domain
497          do j=2,nlast   !loop to find the interval that we are in