T
=
5
8
0
0
;
λ
m
i
n
=
5
0
*
1
0
^
(
-
9
)
;
λ
m
a
x
=
3
0
0
0
*
1
0
^
(
-
9
)
;
L
=
(
2
*
h
*
c
^
2
)
/
(
λ
^
5
)
*
1
/
(
E
x
p
[
(
h
*
c
)
/
(
k
*
λ
*
T
)
]
-
1
)
;
h
=
6
.
6
2
6
*
1
0
^
(
-
3
4
)
;
c
=
2
.
9
9
8
*
1
0
^
8
;
k
=
1
.
3
8
1
*
1
0
^
(
-
2
3
)
;
P
l
o
t
[
L
,
{
λ
,
λ
m
i
n
,
λ
m
a
x
}
,
A
x
e
s
L
a
b
e
l
{
"
λ
i
n
m
"
,
"
L
i
n
J
/
(
m
^
3
*
s
)
"
}
,
P
l
o
t
R
a
n
g
e
A
l
l
]
O
u
t
[
]
=