Searched refs:sumts (Results 1 – 1 of 1) sorted by relevance
| /phasta/AcuStat/src/ |
| H A D | readnblk.f | 64 integer :: numts, numphavg, its, isize, sumts, totsumts, debug local
166 sumts = 0
178 sumts = tablets(its,2)
179 totsumts = totsumts + sumts
200 write(*,*) 'Considering time step',timestep,sumts
239 qybarcumul(:,:) = qybarcumul(:,:) + qread (:,:)*sumts
273 qerrorcumul(:,:) = qerrorcumul(:,:) + qread(:,:)*sumts
323 & + qread (:,:)*sumts
|