diff options
Diffstat (limited to '3878/CH1')
| -rw-r--r-- | 3878/CH1/EX1.10/Ex1_10.sce | 16 | ||||
| -rw-r--r-- | 3878/CH1/EX1.9/Ex1_9.sce | 10 |
2 files changed, 26 insertions, 0 deletions
diff --git a/3878/CH1/EX1.10/Ex1_10.sce b/3878/CH1/EX1.10/Ex1_10.sce new file mode 100644 index 000000000..976d44253 --- /dev/null +++ b/3878/CH1/EX1.10/Ex1_10.sce @@ -0,0 +1,16 @@ +clear +// +// Variable declaration +T_f=3// The temperature of fluid in °C +T_wi=11.5// The temperature of water at inlet in °C +T_wo=6.4// The temperature of water at outlet in °C +A=420// The surface area in m**2 +U=110// The thermal transmittance in W/(m**2 K) + +// Calculation +delT_max=T_wi-T_f// The maximum temperature difference in K +delT_min=T_wo-T_f// The minimum temperature difference in K +LMTD=(delT_max-delT_min)/log(delT_max/delT_min) +Q_f=U*A*LMTD// The amount of heat transfer in W +printf("\n The logarithmic mean temperature difference is %0.3f K",LMTD) +printf("\n The amount of heat transfer is %0.0f W (round off error) or %0.0f ",Q_f,Q_f/1000) diff --git a/3878/CH1/EX1.9/Ex1_9.sce b/3878/CH1/EX1.9/Ex1_9.sce new file mode 100644 index 000000000..d538b6108 --- /dev/null +++ b/3878/CH1/EX1.9/Ex1_9.sce @@ -0,0 +1,10 @@ +clear +// Variable declaration +R_i=0.3// The inside surface resistance in (m**2 K)/W +R_c=1/2.8// The thermal conductance of plastered surface in (m**2 K)/W +R_o=0.05// The outside surface resistance in (m**2 K)/W + +// Calculation +R_t=R_i+R_c+R_o// The total thermal resistance in (m**2 K)/W +U=1/R_t// The overall transmittance in W/(m**2 K) +printf("\n The overall transmittance,U= %0.3f W/(m**2 K)",U) |