diff options
Diffstat (limited to '647/CH2/EX2.8')
-rwxr-xr-x | 647/CH2/EX2.8/Example2_8.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/647/CH2/EX2.8/Example2_8.sce b/647/CH2/EX2.8/Example2_8.sce new file mode 100755 index 000000000..ba049a1df --- /dev/null +++ b/647/CH2/EX2.8/Example2_8.sce @@ -0,0 +1,21 @@ +clear;
+clc;
+
+// Example: 2.8
+// Page: 45
+
+printf("Example: 2.8 - Page: 45\n\n");
+
+// Solution
+
+//*****Data*****//
+deltaU = 200;// [cal]
+Vinit = 10;// [L]
+Vfinal = 50;// [L]
+deff('[P] = f(V)','P = 10/V');
+//**************//
+
+// By definition of enthalpy:
+// deltaQ = deltaU + PdV
+deltaQ = deltaU + integrate('f(V)','V',Vinit,Vfinal)*24.2;// [cal]
+printf("Change in enthalpy is %f cal\n",deltaQ);
\ No newline at end of file |