Ideális gáz - irreverzibilis rendszer

NEQ   - viszkozitás nélkül RowBox[{fin = 50, ;, c = 1, ;,  , R = 1, ;, RowBox[{la, =, 0.3}], ;, ga = 1, ;, κ = 0}] T0 = 1 ; p0 = 1 ; v0 = 5 ; e0 = 0 ;

NEQ - viszkozitásal RowBox[{fin = 50, ;, c = 1, ;,  , R = 1, ;, RowBox[{la, =, 0.3}], ;, ga = 1, ;, RowBox[{κ, =, 0.2}], ;}] T0 = 1 ; p0 = 1 ; v0 = 5 ; e0 = 0 ;

κ  ∞ RowBox[{eq, ,,  , RowBox[{κ, =, 0.2}], ,, 1, ,, 10}]


Created by Mathematica  (May 15, 2005)