From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 746/CH7/EX7.04/7_04.sce | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100755 746/CH7/EX7.04/7_04.sce

(limited to '746/CH7/EX7.04')

diff --git a/746/CH7/EX7.04/7_04.sce b/746/CH7/EX7.04/7_04.sce
new file mode 100755
index 000000000..b6e3ab182
--- /dev/null
+++ b/746/CH7/EX7.04/7_04.sce
@@ -0,0 +1,18 @@
+//speed and force//
+pathname=get_absolute_file_path('7.04.sce')
+filename=pathname+filesep()+'7.04-data.sci'
+exec(filename)
+//Velocity of prototype in ft/sec
+Vp1=Vp*6080/3600
+//Reynolds number of prototype:
+Rep=Vp1*Dp/vp
+//Rep=Rem
+//Therefore:
+Rem=Rep;
+//Velocity of air for wind tunnel(in ft/sec):
+Vm=Rem*vm/(Dm/12)
+//Drag force on prototype(in lbf):
+Fp=Fm*(dp/dm)*(Vp1/Vm)^2*(Dp/(Dm/12))^2
+printf("\n\nRESULTS\n\n")
+printf("\n\nTest speed in air: %.3f ft/sec\n\n",Vm)
+printf("\n\nDrag force on prototype: %.3f lbf\n\n",Fp)
-- 
cgit