diff options
Diffstat (limited to '2175/CH4/EX4.9/4_9.sce')
| -rwxr-xr-x | 2175/CH4/EX4.9/4_9.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/2175/CH4/EX4.9/4_9.sce b/2175/CH4/EX4.9/4_9.sce new file mode 100755 index 000000000..b7a2949cf --- /dev/null +++ b/2175/CH4/EX4.9/4_9.sce @@ -0,0 +1,22 @@ +clc;
+R_=8314.5;
+m_=44;
+R=R_/m_;
+
+p2=8.3;//bar
+V2=0.004;//m^3
+m=0.05;
+T2=p2*V2*10^5/(m*R);
+
+p2=8.3;//bar
+pA=1;//bar
+sA_s2=(R/1000)*log(p2/pA);
+
+cp=0.88;
+T2=351;//K
+T1=288;//K
+sA_s1=cp*log(T2/T1);
+
+dec_ent=m*(sA_s2-sA_s1);
+disp("decrease in entropy is:");
+disp("kJ/K",dec_ent)
|