diff options
Diffstat (limited to '2135/CH5/EX5.10')
-rwxr-xr-x | 2135/CH5/EX5.10/Exa_5_10.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/2135/CH5/EX5.10/Exa_5_10.sce b/2135/CH5/EX5.10/Exa_5_10.sce new file mode 100755 index 000000000..af0431432 --- /dev/null +++ b/2135/CH5/EX5.10/Exa_5_10.sce @@ -0,0 +1,16 @@ +//Exa 5.10
+clc;
+clear;
+close;
+format('v',8);
+
+//Given Data :
+p0=1;//bar
+T0=17+273;//Kelvin
+T1=1817+273;//Kelvin
+Cp=1;//KJ/KgK
+deltaQ=Cp*(T1-T0);//KJ/Kg
+deltaS=Cp*log(T0/T1);//KJ/KgK
+deltaS_fluid=-deltaS;//KJ/KgK(As deltaS_surrounding=0)
+A=deltaQ-T0*deltaS_fluid;//KJ
+disp(A,"Availability of hot products in KJ : ");
|