summaryrefslogtreecommitdiff
path: root/1226/CH3/EX3.2/EX3_2.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1226/CH3/EX3.2/EX3_2.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1226/CH3/EX3.2/EX3_2.sce')
-rwxr-xr-x1226/CH3/EX3.2/EX3_2.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/1226/CH3/EX3.2/EX3_2.sce b/1226/CH3/EX3.2/EX3_2.sce
new file mode 100755
index 000000000..3ad02ed4b
--- /dev/null
+++ b/1226/CH3/EX3.2/EX3_2.sce
@@ -0,0 +1,24 @@
+clc;funcprot(0);//EXAMPLE 3.2
+// Initialisation of Variables
+m=0.5;.....................//Mass of air in kg
+etath=0.5;.................//Thermal efficiency of engine
+hie=40;...................//Heat transferred during isothermal expansion in kJ
+p1=7;....................//Pressure in bar at the beginning of expansion
+v1=0.12;..................//Volume in m^3 at the beginning of expansion
+cv=0.721;...................//Specific heat at constant volume in kJ/kgK
+cp=1.008;..................//Specific heat at constant pressure in kJ/kgK
+R=287;......................//Gas constant in J/kgK
+//Calculations
+t1=(p1*10^5*v1)/(R*m);....................//Max temp in K
+t2=t1*(1-etath);.......................//Min temp in K
+disp(t1,"The maximum temperature in Kelvin:")
+disp(t2,"The minimum temperature in Kelvin:")
+v2=(%e^((hie*1000)/(m*R*t1)))*v1;..................//Volume at the end of isothermal expansion in m^3
+disp(v2,"Volume at the end of isothermal expansion in m^3")
+printf("\n\n")
+printf("Process Heat transfer\n")
+printf("_______________________________________________________________\n")
+printf("Isothermal expansion %d kJ\n",hie)
+printf("Adiabatic reversible expansion %d kJ\n",0)
+printf("Isothermal compression %d kJ\n",-hie)
+printf("Adiabatic reversible compressions %d kJ",0)