blob: dc55712c4a7af32aad2fce3e7d5715b5c94b2c13 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
clc;
clear all;
disp("Hear loss from crank")
A=80*20*10^(-4);//m^2
ta=15;//degree C
U=25;//m/s
ts=85;// degree C
L=0.8;//m
B=0.2;//m
Pr=0.698
k=0.02824;//W/m.C
v=17.95*10^(-6);// m^2/s
ReL=U*L/v;
Nu=0.036*(ReL^0.8)*Pr^(1/3);
h=Nu*k/L;
Q=h*A*(ts-ta);//W
disp("W",Q,"Heat loss from crank is Q=")
|
