diff options
Diffstat (limited to '1394/CH20/EX20.3.3/Ex20_3_3.sce')
| -rwxr-xr-x | 1394/CH20/EX20.3.3/Ex20_3_3.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1394/CH20/EX20.3.3/Ex20_3_3.sce b/1394/CH20/EX20.3.3/Ex20_3_3.sce new file mode 100755 index 000000000..190055583 --- /dev/null +++ b/1394/CH20/EX20.3.3/Ex20_3_3.sce @@ -0,0 +1,15 @@ + +clc
+//initialization of variables
+//Given q = h*DeltaT and 0.6q = (1/(1/h)+10/12*0.03)*delta T , divide both to get
+l = 10/12 //ft
+k = 0.03 //Btu/hr-ft-F
+//Calculations
+l2 = 2//feet
+k2 = 0.03 //Btu/hr-ft-F
+h = ((1/0.6)-1)*k/l //Btu/hr-ft^2-F
+U = 1/((1/h)+(l2/k2))//Btu/hr-ft^2-F
+Savings = U*100/h
+//Results
+printf("The savings due to insulation is about %.f percent",Savings)
+
|