diff options
Diffstat (limited to '746/CH3/EX3.03')
| -rwxr-xr-x | 746/CH3/EX3.03/3_03.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/746/CH3/EX3.03/3_03.sce b/746/CH3/EX3.03/3_03.sce new file mode 100755 index 000000000..92dc4e6bd --- /dev/null +++ b/746/CH3/EX3.03/3_03.sce @@ -0,0 +1,8 @@ +//pressure difference//
+pathname=get_absolute_file_path('3.03.sce')
+filename=pathname+filesep()+'3.03-data.sci'
+exec(filename)
+//Pressure difference(in lbf/in^2):
+dp=g*d*(-d1+SGm*d2-SGo*d3+SGm*d4+d5)/12/144
+printf("\n\nRESULTS\n\n")
+printf("\n\nPressure difference between A and B: %f lbf/in^2\n\n",dp)
|