summaryrefslogtreecommitdiff
path: root/1304/CH1/EX1.9/1_9.sce
blob: c744e12fdb15ead9393d2c8f527ed1d4eff765d7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clear;
clc;
printf("\t\t\tExample Number 1.9\n\n\n");
// calculating increasing in emmisive power
// solution

sigma= 5.6697*10^(-8);// [W/m^2 K^4] Stefan Boltzmann constant
T1=20+273.15;//[K] initial temperature

T2=100+273.15;//[K] final temperature
//emmissive power E is given as sigma*T^4
//hence 
dE = sigma*((T2)^(4)-(T1)^(4));//[W/m^2] difference in emmissive power

printf("The increase in emmissive power of the blackbody after heating is %f W/m^2",dE);