1 files changed, 14 insertions, 0 deletions
diff --git a/3785/CH10/EX10.4/Ex10_4.sce b/3785/CH10/EX10.4/Ex10_4.sce
new file mode 100644
index 000000000..7dd7f7c5d
--- /dev/null
+++ b/3785/CH10/EX10.4/Ex10_4.sce
@@ -0,0 +1,14 @@
+// Example 10_4
+clc;funcprot(0);
+// Given data
+V_wbyomegaD_m=0.1;
+C_pm=0.50;// The power coefficient
+V_w=10;// The wind speed in m/s
+P_wtp=100;// kW
+rho=1.2;// The density of air in kg/m^3
+
+// Calculation
+omega_p=sqrt((%pi*C_pm*rho*V_w^5)/(8*P_wtp*10^3*V_wbyomegaD_m^2));// s^-2
+omega=omega_p*(60/(2*%pi));// RPM
+D_p=(1/V_wbyomegaD_m)*(V_w/omega_p);// m
+printf("\nThe turbine diameter,D_p=%2.1f m",D_p);