summaryrefslogtreecommitdiff
path: root/779/CH8/EX8.15/8_15.sce
blob: 2715ecddc0ca5dccfac51bd25d2b8be963aeddc5 (plain)
1
2
3
4
5
6
7
// Since vaccume has zero mass
U = 0; H0 = 0; S = 0;
// If the vaccume ha reduced to dead state
U0 = 0; H0 = 0 ; S0 = H0; V0 = 0;
P0 = 100; V = 1;
fi = P0*V;
disp("kJ",fi,"The energy of the complete vaccume is")