Lines Matching refs:T
1 subroutine getthm (pres, T, Sclr, rk, rho, argument
50 & T(npro), rk(npro),
76 pres = Rgas * rho * T
111 rho = pres / ( Rgas * T )
135 rsrhog(:) = pres(:) / ( Rgas * T(:))
148 ei = T * (Rgas / gamma1)
150 tmpg = T * (Rgas / gamma1) !for gas phase
151 tmpl = 3.264*1000*T !cv*T for liquid phase
163 h = T * (Rgas * gamma / gamma1)
168 alfap = one / T
172 c = sqrt( (gamma * Rgas) * T )
188 tmpg = T * (Rgas * gamma / gamma1) ! enthalpy of gas phase
189 tmpl = T*3.264*1000 + pres/rsrhol ! enthalpy of liquid phase
201 tmpg = one / T ! alfap for gas phase
213 tmpg = sqrt( (gamma * Rgas) * T ) ! c for gas phase
262 Texp1 = exp ( - Tvib(1)/T )
263 Texp2 = exp ( - Tvib(2)/T )
266 rho = pres / ( Rgas * T )
289 rsrhog(:) = pres(:) / ( Rgas * T(:))
300 ei = yN2 * ( cvs(1) * T
302 & + yO2 * ( cvs(2) * T
311 h = ei + Rgas * T
313 alfap = one / T
318 & / ( ( one - Texp1 ) * T )**2 )
320 & / ( ( one - Texp2 ) * T )**2 )
326 c = sqrt( cp * gamb * T )