Lines Matching refs:nframe
37 integer nframe,iframe
198 nframe = 0
201 nframe = nframe + 1
203 nframe = nframe - 1
205 stop = min(nframe,stop)
206 nframe = (stop-start)/step + 1
207 write (iout,130) nframe
212 allocate (ntime(nframe))
213 allocate (xmsd(nframe))
214 allocate (ymsd(nframe))
215 allocate (zmsd(nframe))
216 allocate (xcm(nmol,nframe))
217 allocate (ycm(nmol,nframe))
218 allocate (zcm(nmol,nframe))
224 nframe = 0
235 nframe = nframe + 1
236 if (mod(nframe,100) .eq. 0) then
237 write (iout,150) nframe
258 if (nframe .eq. 1) then
263 xold = xcm(i,nframe-1)
264 yold = ycm(i,nframe-1)
265 zold = zcm(i,nframe-1)
271 xcm(i,nframe) = xold + xr
272 ycm(i,nframe) = yold + yr
273 zcm(i,nframe) = zold + zr
278 if (mod(nframe,100) .ne. 0) then
279 write (iout,170) nframe
285 do i = 1, nframe
291 do i = 1, nframe-1
292 do j = i+1, nframe
316 do i = 1, nframe-1
332 do i = 1, nframe-1