diff options
Diffstat (limited to '2015/CH6/EX6.1/6_1.sce')
-rwxr-xr-x | 2015/CH6/EX6.1/6_1.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/2015/CH6/EX6.1/6_1.sce b/2015/CH6/EX6.1/6_1.sce new file mode 100755 index 000000000..0ff7d85d7 --- /dev/null +++ b/2015/CH6/EX6.1/6_1.sce @@ -0,0 +1,18 @@ +clc
+//initialisation of variables
+c=400 //steam speed in m/s
+alpla=12 //angle in degrees
+cwo=0
+pi=(22/7)
+//CALCULATIONS
+u=c*cos(12*(pi/180))/2
+cwi=c*cos(12*(pi/180))
+cfi=c*sin(12*(180/pi))
+thetha=atan(cfi/(cwi-u))*(pi/180)
+cro=sqrt((cfi)^2+(cwi-u)^2)
+phi=acos(u/cro)*(180/pi)
+wo=(cwi-cwo)*u
+ke=(c)^2/2
+eff=wo/ke
+//RESULTS
+printf('blade efficiency is %2f',eff)
|