summaryrefslogtreecommitdiff
path: root/551/CH15/EX15.25
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /551/CH15/EX15.25
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '551/CH15/EX15.25')
-rwxr-xr-x551/CH15/EX15.25/25.sce37
1 files changed, 37 insertions, 0 deletions
diff --git a/551/CH15/EX15.25/25.sce b/551/CH15/EX15.25/25.sce
new file mode 100755
index 000000000..30b80f44b
--- /dev/null
+++ b/551/CH15/EX15.25/25.sce
@@ -0,0 +1,37 @@
+clc
+T=2773; //K
+lambda=1.2*10^(-6); //m
+e=0.9;
+a=5.67*10^(-8);
+
+disp("(i) Monochromatic emissive power at 1.2 μm length")
+C1=0.3742*10^(-15); //W.m^4/m^2
+C2=1.4388*10^(-4); //mK
+E_lambda_b=C1*lambda^(-5)/(exp(C2/lambda/T)-1);
+disp("E_lambda_b =")
+disp(E_lambda_b)
+disp("W/m^2")
+
+
+disp("(ii) Wavelength at which the emission is maximum =")
+lambda_max=2898/T;
+disp(lambda_max)
+disp("μm")
+
+
+disp("(iii) Maximum emissive power =")
+E_lambda_b_max=1.285*10^(-5)*T^5;
+disp(E_lambda_b_max)
+disp("W/m^2 per metre length")
+
+
+disp("(iv) Total emissive power =")
+Eb=a*T^4;
+disp(Eb)
+disp("W/m^2")
+
+
+disp("(v) Total emissive power =")
+E=e*a*T^4;
+disp(E)
+disp("W/m^2")