summaryrefslogtreecommitdiff
path: root/555/CH4/EX4.1/1.sce
blob: 4f50b097cb5119ce6ad78c1606d1160b31b0a835 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
// Implementation of example 4.1
// Basic and Applied Thermodynamics by P.K.Nag
// page 72

clc
clear

// First law of Thermodynamics for stationary system is dQ = dU+W
dQ=-37.6 // (heat transfer in kJ)
v1=0.3 // (initial volume in m^3)
p=0.105 // (pressure in MPa)
v2=0.15 // (final volume in m^3)

W=p*(v2-v1)*1000;
// now according to first law
dU=W-dQ;
printf("Change in internal energy of gas is = %.2f kJ",dU);
// end