summaryrefslogtreecommitdiff
path: root/1962/CH7/EX7.4
diff options
context:
space:
mode:
Diffstat (limited to '1962/CH7/EX7.4')
-rwxr-xr-x1962/CH7/EX7.4/example7_4.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1962/CH7/EX7.4/example7_4.sce b/1962/CH7/EX7.4/example7_4.sce
new file mode 100755
index 000000000..f0955cd36
--- /dev/null
+++ b/1962/CH7/EX7.4/example7_4.sce
@@ -0,0 +1,13 @@
+
+//example 7.4
+//page 256
+clc; funcprot(0);
+//initialisation of variable
+mu=18.22*10^-6;
+L=0.951;
+rho=1.197;
+U=8;//speed
+L2=5;//length
+drag=0.664*sqroot(mu*rho*U^3*L)+0.036*rho*U^2*L2*(mu/rho/U/L2)^(0.2)-0.036*rho*U^2*L*(mu/rho/U/L)^(0.2)
+disp(drag,"drag force (N)");
+clear