diff options
Diffstat (limited to '1962/CH7/EX7.4/example7_4.sce')
| -rwxr-xr-x | 1962/CH7/EX7.4/example7_4.sce | 13 |
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
|