From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3831/CH8/EX8.12/Ex8_12.sce | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 3831/CH8/EX8.12/Ex8_12.sce

(limited to '3831/CH8/EX8.12')

diff --git a/3831/CH8/EX8.12/Ex8_12.sce b/3831/CH8/EX8.12/Ex8_12.sce
new file mode 100644
index 000000000..e9bebd2c4
--- /dev/null
+++ b/3831/CH8/EX8.12/Ex8_12.sce
@@ -0,0 +1,13 @@
+// Example 8_12
+clc;funcprot(0);
+// Given data
+h=3.50;// W/(m^2.K)
+A=1.00*10^-4;// m^2
+P=0.0400;// m
+T_infinitive=20.0+273.15;// K
+k_t=204;// W/(m.K)
+T_f=95.0+273.15;// K
+
+// Solution
+S_P_Q=sqrt(h*P*k_t*A)*((log(T_f/T_infinitive))+(T_infinitive/T_f)-1);// W/K
+printf("\nThe entropy production rate for the fin,S_P=%0.5f W/K",S_P_Q);
-- 
cgit