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.3/Result12_3.pdf | Bin 0 -> 92006 bytes 1309/CH12/EX12.3/ch12_3.sce | 37 +++++++++++++++++++++++++++++++++++++ 1309/CH12/EX12.4/Result12_4.pdf | Bin 0 -> 88560 bytes 1309/CH12/EX12.4/ch12_4.sce | 16 ++++++++++++++++ 1309/CH12/EX12.5/Result12_5.pdf | Bin 0 -> 90403 bytes 1309/CH12/EX12.5/ch12_5.sce | 22 ++++++++++++++++++++++ 1309/CH12/EX12.6/Result12_6.pdf | Bin 0 -> 92286 bytes 1309/CH12/EX12.6/ch12_6.sce | 26 ++++++++++++++++++++++++++ 1309/CH12/EX12.7/Result12_7.pdf | Bin 0 -> 88273 bytes 1309/CH12/EX12.7/ch12_7.sce | 18 ++++++++++++++++++ 1309/CH12/EX12.8/Result12_8.pdf | Bin 0 -> 91103 bytes 1309/CH12/EX12.8/ch12_8.sce | 24 ++++++++++++++++++++++++ 12 files changed, 143 insertions(+) create mode 100755 1309/CH12/EX12.3/Result12_3.pdf create mode 100755 1309/CH12/EX12.3/ch12_3.sce create mode 100755 1309/CH12/EX12.4/Result12_4.pdf create mode 100755 1309/CH12/EX12.4/ch12_4.sce create mode 100755 1309/CH12/EX12.5/Result12_5.pdf create mode 100755 1309/CH12/EX12.5/ch12_5.sce create mode 100755 1309/CH12/EX12.6/Result12_6.pdf create mode 100755 1309/CH12/EX12.6/ch12_6.sce create mode 100755 1309/CH12/EX12.7/Result12_7.pdf create mode 100755 1309/CH12/EX12.7/ch12_7.sce create mode 100755 1309/CH12/EX12.8/Result12_8.pdf create mode 100755 1309/CH12/EX12.8/ch12_8.sce (limited to '1309/CH12') diff --git a/1309/CH12/EX12.3/Result12_3.pdf b/1309/CH12/EX12.3/Result12_3.pdf new file mode 100755 index 000000000..6a905460c Binary files /dev/null and b/1309/CH12/EX12.3/Result12_3.pdf differ diff --git a/1309/CH12/EX12.3/ch12_3.sce b/1309/CH12/EX12.3/ch12_3.sce new file mode 100755 index 000000000..06061dc96 --- /dev/null +++ b/1309/CH12/EX12.3/ch12_3.sce @@ -0,0 +1,37 @@ +clc; +clear; +printf("\t\t\tChapter12_example3\n\n\n"); +// Determination of the heat transferred by radiation from dA1 to A. +// The view factor Fd1_2 can be calculated as Fd1_2=Fd1_3+Fd1_4+Fd1_5 +// For Fd1_3 +a_13=100; +b_13=250; +c_13=100; +X_13=a_13/c_13; +Y_13=b_13/c_13; +printf("\nFor Fd1_3, the values of a/c=%.1f and b/c=%.1f",X_13,Y_13); +Fd1_3=0.17; // value for Fd1_3 corresponding to above calculated values of a/c and b/c +// For Fd1_4 +a_14=300; +b_14=50; +c_14=100; +X_14=a_14/c_14; +Y_14=b_14/c_14; +printf("\nFor Fd1_4, the values of a/c=%.1f and b/c=%.1f",X_14,Y_14); +Fd1_4=0.11; //value for Fd1_4 corresponding to above calculated values of a/c and b/c +// For Fd1_5 +a_15=100; +b_15=50; +c_15=100; +X_15=a_15/c_15; +Y_15=b_15/c_15; +printf("\nFor Fd1_5, the values of a/c=%.1f and b/c=%.1f",X_15,Y_15); +Fd1_5=0.09; //value for Fd1_3 corresponding to above calculated values of a/c and b/c +Fd1_2=Fd1_3+Fd1_4-Fd1_5; +printf("\nFd1_2=%.2f",Fd1_2); +printf("\n%d percent of the energy leaving dA1 reaches A",100*Fd1_2); +sigma=0.1714e-8; // Stefan-Boltzmann constant +T1=660; +T2=560; +q12_A1=sigma*Fd1_2*(T1^4-T2^4); +printf("\nThe net heat transferred is %.1f BTU/(hr.sq.ft)",q12_A1); diff --git a/1309/CH12/EX12.4/Result12_4.pdf b/1309/CH12/EX12.4/Result12_4.pdf new file mode 100755 index 000000000..49171e3c7 Binary files /dev/null and b/1309/CH12/EX12.4/Result12_4.pdf differ diff --git a/1309/CH12/EX12.4/ch12_4.sce b/1309/CH12/EX12.4/ch12_4.sce new file mode 100755 index 000000000..876b57d5b --- /dev/null +++ b/1309/CH12/EX12.4/ch12_4.sce @@ -0,0 +1,16 @@ +clc; +clear; +printf("\t\t\tChapter12_example4\n\n\n"); +// Determination of the heat transferred to the conveyed parts for the conditions given +L1=1; +angle=%pi*45/180; +L2=L1*sin(angle); +L3=L2; +printf("\nThe Widths are L1=%d m, L2=%.3f m and L3=%.3f m",L1,L2,L3); +T1=303; +T2=473; +sigma=5.67e-8; // Stefan-Boltzmann constant +q21_A2=sigma*(T2^4-T1^4)*((L1/L2)+1-(L3/L2))/2; +q31_A3=sigma*(T2^4-T1^4)*((L1/L2)-1+(L3/L2))/2; +printf("\nThe heat transferred from A2 to A1 is %.2e W/sq.m",q21_A2); +printf("\nThe heat transferred from A3 to A1 is %.2e W/sq.m",q31_A3); diff --git a/1309/CH12/EX12.5/Result12_5.pdf b/1309/CH12/EX12.5/Result12_5.pdf new file mode 100755 index 000000000..490d263b0 Binary files /dev/null and b/1309/CH12/EX12.5/Result12_5.pdf differ diff --git a/1309/CH12/EX12.5/ch12_5.sce b/1309/CH12/EX12.5/ch12_5.sce new file mode 100755 index 000000000..08cc42a57 --- /dev/null +++ b/1309/CH12/EX12.5/ch12_5.sce @@ -0,0 +1,22 @@ +clc; +clear; +printf("\t\t\tChapter12_example5\n\n\n"); +// Determination of the heat exchanged between the two plates +// The view factor can be found with the crossed-string method +// from figure 12.13(b) +ac=1; +bd=1; +ad=(9+1)^0.5; +bc=ad; +crossed_strings=ad+bc; +uncrossed_strings=ac+bd; +L1_F12=(1/2)*(crossed_strings-uncrossed_strings); +printf("\nThe Product L1F12=%.2f ft",L1_F12); +L1=3; +F12=L1_F12/L1; +printf("\nThe view factor F12=%.2f",F12); +sigma=5.67e-8; // Stefan-Boltzmann constant +T1=560; +T2=460; +q12_A1=sigma*(T1^4-T2^4)*F12; +printf("\nThe heat transfer rate is %.2e W/sq.m",q12_A1); diff --git a/1309/CH12/EX12.6/Result12_6.pdf b/1309/CH12/EX12.6/Result12_6.pdf new file mode 100755 index 000000000..59053a362 Binary files /dev/null and b/1309/CH12/EX12.6/Result12_6.pdf differ diff --git a/1309/CH12/EX12.6/ch12_6.sce b/1309/CH12/EX12.6/ch12_6.sce new file mode 100755 index 000000000..ce5bb6eaf --- /dev/null +++ b/1309/CH12/EX12.6/ch12_6.sce @@ -0,0 +1,26 @@ +clc; +clear; +printf("\t\t\tChapter12_example6\n\n\n"); +// Determination of the heat that must be supplied to each of the isothermal surfaces, and also the temperature of the insulated surface. +// we can apply the equations as follows +// q1=sigma*A1*[(T1^4-T2^4)F12+(T1^4-T3^4)F13]..... (1) +// q2=sigma*A2*[(T2^4-T1^4)F21+(T2^4-T3^4)F23]..... (2) +// q3=sigma*A3*[(T3^4-T1^4)F31+(T3^4-T2^4)F32]..... (3) +// given data: +T1=1000; +T3=500; +q2=0; +F12=1/2; +F13=1/2; +F21=1/2; +F23=1/2; +F31=1/2; +F32=1/2; +T2=[(T1^4+T3^4)/2]^(1/4); // using equation (2) +printf("\nThe temperature T2=%.1f degree R",T2); +sigma=0.1714e-8; // Stefan-Boltzmann constant +q1_A1=sigma*[(T1^4-T2^4)*F12+(T1^4-T3^4)*F13]; // using equation (1) +printf("\nThe heat flux through area A1 is %d BTU/(hr.sq.ft)",q1_A1); +q3_A3=sigma*[(T3^4-T1^4)*F31+(T3^4-T2^4)*F32]; // using equation (3) +printf("\nThe heat flux through area A3 is %d BTU/(hr.sq.ft)",q3_A3); +printf("\nThe results are logical in that the heat entering the system (the oven itself) must equal that which leaves under steady-state conditions."); diff --git a/1309/CH12/EX12.7/Result12_7.pdf b/1309/CH12/EX12.7/Result12_7.pdf new file mode 100755 index 000000000..4f328c0a4 Binary files /dev/null and b/1309/CH12/EX12.7/Result12_7.pdf differ diff --git a/1309/CH12/EX12.7/ch12_7.sce b/1309/CH12/EX12.7/ch12_7.sce new file mode 100755 index 000000000..f1bf55ff8 --- /dev/null +++ b/1309/CH12/EX12.7/ch12_7.sce @@ -0,0 +1,18 @@ +clc; +clear; +printf("\t\t\tChapter12_example7\n\n\n"); +// Determination of the heat lost by the oven through its top surface. +// all energy leaving A1 is intercepted by A2 and vice versa +F12=1; +F21=1; +F11=0; // the surfaces are flat +F22=0; +emissivity1=0.94; // for oxidized steel from appendix table E1 +emissivity2=0.94 +T1=533; +T2=323; +sigma=5.67e-8; // Stefan-Boltzmann constant +q1=(sigma*(T1^4-T2^4))/((1/emissivity1)+(1/emissivity2)-1); +printf("\nThe heat lost through bottom surface is %d W/sq.m",q1); +q2=-q1; +printf("\nThe heat lost through top surface is %d W/sq.m",q2); 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