summaryrefslogtreecommitdiff
path: root/555/CH3/EX3.2/2.sce
blob: 8144c790637fecddbb07dba117abc007aeb5ed65 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// Implementation of example 3.2
// Basic and Applied Thermodynamics by P.K.Nag
// page 55

clc
clear

p=101.325 // (kN/m^2)
dv=0.6 //(m^3)

Wd=(p*dv);
disp("work done by air =")
disp(Wd)
disp("kJ")
// since the free-air boundary is contracting,the work done by system is negative and surroundings do positive work upon the system