summaryrefslogtreecommitdiff
path: root/3740/CH1/EX1.4/Ex1_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3740/CH1/EX1.4/Ex1_4.sce')
-rw-r--r--3740/CH1/EX1.4/Ex1_4.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3740/CH1/EX1.4/Ex1_4.sce b/3740/CH1/EX1.4/Ex1_4.sce
new file mode 100644
index 000000000..42b508c31
--- /dev/null
+++ b/3740/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,15 @@
+//Optoelectronics - An Introduction, 2nd Edition by J. Wilson and J.F.B. Hawkes
+//Example 1.4
+//OS=Windows XP sp3
+//Scilab version 5.5.2
+clc;
+clear;
+
+//given
+A=1e-5;//source area in m^2
+T=2e3;//temperature of the source in K
+Epsilon=0.7//emissivity of the surface
+Sigma=5.67e-8//value of Stefan's constant in SI Units
+
+W=Epsilon*Sigma*A*T^4//total power radiated from the source in W
+mprintf("\n Total power radiated from the source = %.2f W",W);