1 files changed, 19 insertions, 0 deletions
diff --git a/479/CH3/EX3.6/Example_3_6.sce b/479/CH3/EX3.6/Example_3_6.sce
new file mode 100755
index 000000000..f95d8e5f9
--- /dev/null
+++ b/479/CH3/EX3.6/Example_3_6.sce
@@ -0,0 +1,19 @@
+//Chemical Engineering Thermodynamics
+//Chapter 3
+//First Law of Thermodynamics
+
+//Example 3.6
+clear;
+clc;
+
+//Given
+R = 1.98;//gas constant in kcal/Kgmole deg K
+T = 293;//Temperature in K
+M = 29;//Molecular weight of air
+
+//To calculate the flow work per kg of air
+//W=(P*V)=(R*T)
+W = R*T;//Flow work in Kcal/Kg mole
+W1 = W/M;
+mprintf('Flow work is %f Kcal/Kg',W1);
+//end
+\ No newline at end of file