File mttroot/mtt/lib/comp/compound/Thermal/CompressibleFlow/Poly/Poly_cr.r artifact ad1eaacee8 part of check-in 534206b77a
% Constitutive relation file for Poly (Poly_cr.r) % Generated by MTT at Wed Mar 11 11:01:28 GMT 1998 OPERATOR Poly; % Ideal gas % Temperature output on port [T2] FOR ALL alpha,P1,P2,T1,Nothing LET Poly(alpha,effort,4, P1,effort,1, P2,effort,2, T1,effort,3, Nothing,flow,4 ) = T1*(P2/P1)^alpha; END;