Searched refs:Ptotal_contra (Results 1 – 1 of 1) sorted by relevance
199 real*8 Ptotal_contra, Pstatic_throat local201 read(911,*) Ptotal_contra204 write(*,*)'Ptotal_contra=',Ptotal_contra208 PresRec(:)=y(:,4)*(1+0.2*Mach(:)**2)**3.5/Ptotal_contra 209 PresCoeff(:)=(y(:,4)-Pstatic_throat)/(Ptotal_contra-Pstatic_throat)