1 files changed, 32 insertions, 0 deletions
diff --git a/2870/CH3/EX3.12/Ex3_12.sce b/2870/CH3/EX3.12/Ex3_12.sce
new file mode 100755
index 000000000..0d949a30a
--- /dev/null
+++ b/2870/CH3/EX3.12/Ex3_12.sce
@@ -0,0 +1,32 @@
+clc;clear;
+//Example 3.12
+
+//given values
+v=0.51431;
+T=600;
+
+//from Table A-1E
+R=0.5956;
+Pcr=3200;
+Tcr=1164.8;
+
+//calculation
+
+//Part A
+//from Table A-6E
+P=1000;//in psia
+disp(P,'from the steam tables in psia');
+
+//Part B
+T=1060;//converted into R from F
+P=R*T/v;
+disp(P,'from the ideal-gas equation in psia');
+
+//Part C
+//calculating the pseudo-reduced specific volume and the reduced temperature
+Vr=v/(R*Tcr/Pcr);
+Tr=T/Tcr;
+//from the compressibility chart
+Pr=0.33;
+P=Pr*Pcr;
+disp(P,'from the generalized compressibility chart. in psia')