1 files changed, 22 insertions, 0 deletions
diff --git a/2504/CH10/EX10.1/10_1.sce b/2504/CH10/EX10.1/10_1.sce
new file mode 100755
index 000000000..525a99cba
--- /dev/null
+++ b/2504/CH10/EX10.1/10_1.sce
@@ -0,0 +1,22 @@
+clc
+//initialisation of variables
+clear
+g= 32.2 //ft/sec^2
+u= 3.6*10^-5 //lbf sec/ft^2
+d= 64 //lbm/ft^2
+l= 20 //ft
+a= 0.5
+//CALCULATIONS
+sw= u*g/(a*d)
+sw1= u^2*g*l/(2*a*d)
+Re=[1 2 3 4 5 6 7 8 9 10]*10^5
+Vinf=Re*u*g/(d*a)
+Cd=[1.2 1.15 0.94 0.68 0.305 0.31 0.32 0.33 0.34 0.35]
+cdre=Cd.*Re^2
+D=sw1*cdre
+//RESULTS
+printf ('velocity = %.2e ft/sec',sw)
+printf ('\n Force = %.2e lbf',sw1)
+disp(Vinf)
+disp(D)
+