Searched refs:ivartsBuff (Results 1 – 3 of 3) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | timedata.f90 | 190 ivartsBuff = 0
233 ivartsBuff = ivartsBuff + 1
235 if(ivartsBuff .gt. nbuff) then
237 ivartsBuff = nbuff
240 vartsBuffStep(ivartsBuff) = lstep
242 vartsbuff(jj,1:ndof, ivartsBuff) = varts(jj,1:ndof)
290 do ibuf = 1,ivartsBuff
|
| H A D | MachControl.f90 | 109 T = vartsbuff(MC_iPP, 5, ivartsBuff)
110 u2 = vartsbuff(MC_iPP, 2, ivartsBuff)**2 +
111 & vartsbuff(MC_iPP, 3, ivartsBuff)**2 +
112 & vartsbuff(MC_iPP, 4, ivartsBuff)**2
|
| H A D | mod_timedata.f90 | 15 integer :: ivartsBuff variable
|