From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 1309/CH12/EX12.8/Result12_8.pdf | Bin 0 -> 91103 bytes 1309/CH12/EX12.8/ch12_8.sce | 24 ++++++++++++++++++++++++ 2 files changed, 24 insertions(+) create mode 100755 1309/CH12/EX12.8/Result12_8.pdf create mode 100755 1309/CH12/EX12.8/ch12_8.sce (limited to '1309/CH12/EX12.8') diff --git a/1309/CH12/EX12.8/Result12_8.pdf b/1309/CH12/EX12.8/Result12_8.pdf new file mode 100755 index 000000000..e729a7b95 Binary files /dev/null and b/1309/CH12/EX12.8/Result12_8.pdf differ diff --git a/1309/CH12/EX12.8/ch12_8.sce b/1309/CH12/EX12.8/ch12_8.sce new file mode 100755 index 000000000..ac436d2e1 --- /dev/null +++ b/1309/CH12/EX12.8/ch12_8.sce @@ -0,0 +1,24 @@ +clc; +clear; +printf("\t\t\tChapter12_example8\n\n\n"); +// Determination of the net heat exchanged between the dish and the surroundings by radiation at the instant the dish is removed from the oven. Perform the calculations (a) if the dish and surroundings behave like black bodies, and again (b) if the dish has an emissivity of 0.82 and the surroundings have an emissivity of 0.93. +D=12/12; // diameter in ft +L=6/12; // length in ft +A=2*%pi*D^2/4+%pi*D*L; +printf("\nThe Surface area is %.2f sq.ft",A); +printf("\n\t\t\tSolution to part (a)\n"); +F12=1; // the view factor between the dish and the surroundings is unity +T1=810; +T2=530; +sigma=0.1714e-8; // Stefan-Boltzmann constant +q1=sigma*A*(T1^4-T2^4)*F12; +printf("\nThe heat exchanged between the dish and the surroundings is %d BTU/hr",q1); +printf("\n\t\t\tSolution to part (b)\n"); +// For gray-surface behavior, we can apply the following Equation +// q1/(A1e1)-[F11*(q1/A1)*(1-e1)/e1+F12*(q2/A2)*(1-e2)/e2]=sigma*T1^4-(F11*sigma*T1^4+F12*sigma*T2^4)... equation (1) +F11=0; +e1=0.82; +e2=0.93; +// putting q2/A2=0 in equation (1) as A2 tends to infinity +q1_=A*e1*[sigma*T1^4-F12*sigma*T2^4]; +printf("\nThe heat exchanged between the dish and the surroundings for the second case is %d BTU/hr",q1_); -- cgit