diff options
Diffstat (limited to '443/CH2/EX2.4/2_4.sce')
| -rwxr-xr-x | 443/CH2/EX2.4/2_4.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/443/CH2/EX2.4/2_4.sce b/443/CH2/EX2.4/2_4.sce new file mode 100755 index 000000000..07629c298 --- /dev/null +++ b/443/CH2/EX2.4/2_4.sce @@ -0,0 +1,9 @@ +pathname=get_absolute_file_path('2_4.sce')
+filename=pathname+filesep()+'2_4_data.sci'
+exec(filename)
+//No work is done by the part of the external boundary in contact with the bottle.only the moving part needs to be considered.Over this part pressure is uniform at 1.013*10^5 N/m^2
+//Work done
+Wd=Patm*V
+printf("\n\nRESULTS\n\n")
+printf("\nWork done:%f\n",Wd)
+//The work done is negative as the boundary is contracting
\ No newline at end of file |