summaryrefslogtreecommitdiff
path: root/746/CH9/EX9.05
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /746/CH9/EX9.05
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 '746/CH9/EX9.05')
-rwxr-xr-x746/CH9/EX9.05/9_05.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/746/CH9/EX9.05/9_05.sce b/746/CH9/EX9.05/9_05.sce
new file mode 100755
index 000000000..8e146f23f
--- /dev/null
+++ b/746/CH9/EX9.05/9_05.sce
@@ -0,0 +1,19 @@
+//force and power//
+pathname=get_absolute_file_path('9.05.sce')
+filename=pathname+filesep()+'9.05-data.sci'
+exec(filename)
+//Speed in m/s:
+U=s*6076*0.305/3600
+//Reynolds number:
+Re=U*L/v
+//Drag coefficient:
+Cd=0.455/log10(Re)^2.58-1610/Re
+//Area(in m^2):
+A=L*(W+D)
+//Drag force(in N)
+Fd=Cd*A*0.5*d*U^2
+//Power required to overcome skin friction drag(in W):
+P=Fd*U
+printf("\n\nRESULTS\n\n")
+printf("\n\nDrag force: %f N\n\n",Fd)
+printf("\n\nPower required to overcome skin friction drag: %.3f W\n\n",P)