diff options
Diffstat (limited to '2510/CH11/EX11.3/Ex11_3.sce')
-rwxr-xr-x | 2510/CH11/EX11.3/Ex11_3.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/2510/CH11/EX11.3/Ex11_3.sce b/2510/CH11/EX11.3/Ex11_3.sce new file mode 100755 index 000000000..0af8b179b --- /dev/null +++ b/2510/CH11/EX11.3/Ex11_3.sce @@ -0,0 +1,9 @@ +//Variable declaration: +syms l //Wavelength (mu.m) +I = 40*exp(-l**2) //Intensity of radiation (Btu/h.ft^2.mu.m) + +//Calculation: +E = eval(integrate(I, l,0,%inf)) //Total emissive power (Btu/h.ft^2) + +//Result: +printf("The total emissive power is : %.1f Btu/h.ft^2.",E) |