diff options
Diffstat (limited to '575/CH8/EX8.5.5/8_5_5.sce')
-rwxr-xr-x | 575/CH8/EX8.5.5/8_5_5.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/575/CH8/EX8.5.5/8_5_5.sce b/575/CH8/EX8.5.5/8_5_5.sce new file mode 100755 index 000000000..cadc00ece --- /dev/null +++ b/575/CH8/EX8.5.5/8_5_5.sce @@ -0,0 +1,12 @@ +clc
+pathname=get_absolute_file_path('8_5_5.sce')
+filename=pathname+filesep()+'855.sci'
+exec(filename)
+printf(" All the values in the textbook are Approximated hence the values in this code differ from those of Textbook")
+disp("From figure 8.5-2, ")
+xL=0.185
+xV=0.89
+mL=basis*((xV-xF)/(xV-xL))
+mV=basis-mL
+Qdot=mV*Hv + mL*Hl - basis*HF
+printf("Rate of heat transfer=%f Btu/h",Qdot)
\ No newline at end of file |