1 files changed, 17 insertions, 0 deletions
diff --git a/1752/CH7/EX7.10/exa_7_10.sce b/1752/CH7/EX7.10/exa_7_10.sce
new file mode 100755
index 000000000..99f925d9b
--- /dev/null
+++ b/1752/CH7/EX7.10/exa_7_10.sce
@@ -0,0 +1,17 @@
+//Exa 7.10
+clc;
+clear;
+close;
+//given data
+D=150*10^-3;// in m
+H=400*10^-3;// in m
+T1=500;// in K
+epsilon=0.7;
+// Formula F11=(4*H)/(4*H+D)
+F11=(4*H)/(4*H+D);
+sigma=5.67*10^-8;
+A1=%pi*D*H;
+q=sigma*A1*epsilon*T1^4*[(1-F11)/(1-F11*(1-epsilon))];
+disp(q,"Heat Heat loss for cavity in W");
+
+//Note: There is some difference between Code answer and book answer because value of F11 is wrong in the book
+\ No newline at end of file