Searched defs:PRcalcDuct (Results 1 – 1 of 1) sorted by relevance
192 subroutine PRcalcDuct (y) subroutine197 real*8 y(nshg,ndof) 198 real*8 Mach(nshg),PresRec(nshg),PresCoeff(nshg),velocity(nshg,3)199 real*8 Ptotal_contra, Pstatic_throat