diff options
Diffstat (limited to '746/CH6/EX6.09/6_09.sce')
| -rwxr-xr-x | 746/CH6/EX6.09/6_09.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/746/CH6/EX6.09/6_09.sce b/746/CH6/EX6.09/6_09.sce new file mode 100755 index 000000000..ba6a27459 --- /dev/null +++ b/746/CH6/EX6.09/6_09.sce @@ -0,0 +1,15 @@ +//Streamline flow//
+pathname=get_absolute_file_path('06.09.sce')
+filename=pathname+filesep()+'06.09-data.sci'
+exec(filename)
+t=0:5
+//Value of sqrt(2gh):
+x=sqrt(2*g*h)
+//Value of 1/2L*sqrt(2gh):
+y=1/2/L*x
+[m n]=size(t)
+i=1:n;
+//Velocity(in m/sec):
+V2=x*tanh(y*t(i))
+plot(t,V2);
+xtitle('Streamline flow from 1 to 2','Time(in s)','V2(in m/sec)')
|