diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /51/CH9/EX9.1/9_1.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '51/CH9/EX9.1/9_1.sce')
| -rwxr-xr-x | 51/CH9/EX9.1/9_1.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/51/CH9/EX9.1/9_1.sce b/51/CH9/EX9.1/9_1.sce new file mode 100755 index 000000000..184b958f2 --- /dev/null +++ b/51/CH9/EX9.1/9_1.sce @@ -0,0 +1,13 @@ +clc;
+clear;
+U=25;//ft/sec
+p=0;//gage
+b=10;//ft
+t=1.24*(10^-3);//where t=stress*(x^0.5)
+a=0.744;//where a=p/(1-((y^2)/4))
+p1=-0.893;//lb/(ft^2)
+drag1=2*integrate('t*b/(x^0.5)','x',0,4);
+drag2=integrate('(((a*(1-((y^2)/4))))-p1)*b','y',-2,2);
+disp("lb",drag1,"The drag when plate is parallel to the upstream flow=")
+disp("lb",drag2,"The drag when plate is perpendicular to the upstream flow=")
+
|