diff options
Diffstat (limited to '548/CH4/EX4.07/4_07.sce')
| -rwxr-xr-x | 548/CH4/EX4.07/4_07.sce | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/548/CH4/EX4.07/4_07.sce b/548/CH4/EX4.07/4_07.sce new file mode 100755 index 000000000..1ef37203f --- /dev/null +++ b/548/CH4/EX4.07/4_07.sce @@ -0,0 +1,7 @@ +pathname=get_absolute_file_path('4_07.sce')
+filename=pathname+filesep()+'4_07data.sci'
+exec(filename)
+disp("P2/P1=(T2/T1)^y/y-1","For isentropic flow","let P2 be the pressure at that point of wing");
+P2=P1*(T/T1)^(y/(y-1));disp(P2,"P2=")
+printf("\Answer:\n")
+printf("\n\Pressure at this point: %f N/m^2\n\n",P2)
|