Searched refs:nlast (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | bctint.f | 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
[all …]
|