diff options
Diffstat (limited to '797/CH2/EX2.6.s/2_06_solution.sce')
| -rw-r--r-- | 797/CH2/EX2.6.s/2_06_solution.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/797/CH2/EX2.6.s/2_06_solution.sce b/797/CH2/EX2.6.s/2_06_solution.sce new file mode 100644 index 000000000..50bbda490 --- /dev/null +++ b/797/CH2/EX2.6.s/2_06_solution.sce @@ -0,0 +1,13 @@ +//Solution 2-6 +WD=get_absolute_file_path('2_06_solution.sce') +datafile=WD+filesep()+'2_06_example.sci' +clc; +exec(datafile) +//conversion +D = D / 1000; //from [mm] to [m] +phi = phi * %pi /180; //from [degree] to [radians] + +R = D / 2; +h = 2 * sigma_s * cos(phi) / (rho * g * R); //from capilary rise equation +h = h * 100; //conversion from [m] to [cm] +printf("Water rises in the tube %1.0f cm above the liquid level in the cup", h);
\ No newline at end of file |