Searched refs:PresRec (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | vorticity.f | 198 real*8 Mach(nshg),PresRec(nshg),PresCoeff(nshg),velocity(nshg,3) local
208 PresRec(:)=y(:,4)*(1+0.2*Mach(:)**2)**3.5/Ptotal_contra
214 call write_field(myrank,'a'//char(0),'PR'//char(0),2,PresRec,
|