diff options
Diffstat (limited to '1019/CH2/EX2.1/Example_2_1.sce')
-rw-r--r-- | 1019/CH2/EX2.1/Example_2_1.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1019/CH2/EX2.1/Example_2_1.sce b/1019/CH2/EX2.1/Example_2_1.sce new file mode 100644 index 000000000..49aea3495 --- /dev/null +++ b/1019/CH2/EX2.1/Example_2_1.sce @@ -0,0 +1,15 @@ +//Example 2.1
+clear;
+clc;
+
+//Given
+p1=10;//initial pressure in atm
+p2=510;//final pressure in atm
+R=0.082;// gas constant in L atm K^-1 mol^-1
+T=300;// temperature in K
+
+// To determine enthalpy change delH
+delH=(0.039-((2*1.34)/(R*T)))*(p2-p1);//using the given equation for joule-thomson coefficient in dm^3 atm mol^-1
+delH1=delH*(1.01325*100);// enthalpy change in joule mol^-1
+mprintf('change in enthalpy = %f Joule mol^-1',delH1);
+//end
\ No newline at end of file |