|\HA2	9;<(/<'?
<.;<(;
	=
;988;9

>0/<22	&"0/<.%2
8'8'8'8'7?654> +4?<(+3"%"9'?#/<</S3 5?
7	"8
*?0T?8!5>3
4.6)
	READ(1,10)VRNGE
10	FORMAT('ELECTRON ENERGY RANGE IN EV = 'F4.2)
	READ(1,20)START
20	FORMAT('LOWEST ELECTRON ENERGY IN EV = 'F5.2)
	READ(1,30)BOX
30	FORMAT('ION ENERGY IN EV = 'F5.2)pU nWVd%B	o
0|%S&
?DW?JV(/W(
2@~b
vVtz
n
}b(l	`I;
*~"*(bD(  Wf?&)	&V$@,z|?QM*?&	0J
n(
.
	dR	#(		C{0
	zB`Uc(W{E
Uy0 xrZ
n
UdU*6UVFWWKF>3W9'Yp
P+
e
)8Bh
9#
Y~i{
}0(|{
{0
zz"	ly{0(|{
0;Yb(;t	=&;F.n{YYYbP
b0|{	L"@|%;8[&xxxwHvrut! Fzt2(Tzs%(y#`|?@Z:tc(S{yz)S[2<Vn\=&>(X	:hS  5?P@7	"V
`*poP!5f~3&4&0}1|B/
lO-**1F.{`2271J.
n{334r3d5/Jzy)/
32&31B3	0 |BA	lxw0v1&1?70uB(|C<t0 	~E\K&Y(K	oKtU]*{D	~wbf{AV"bbi X}op%t@@z@Y+J~(?~'} ?$
.}|r{zryxs(wsv($&
bx'utsrqbxbc(Jzp) ocZfn b2}ZsyGfbwcv 2$-Jm@?'DG!.@/lX;(o++)f6Pf++f)ef)Wf))f))fZhc"oYd
~Nf	V $8
	?pp~ittb}(t"|(/{2ztzt!xJ
nqfq.y sscssk[P~rtr"trbzr!!8@pb b4zp&pJ!fq!hxFns!hxstq9Jw t!.h/v:!qu rp&!(j!DrD.!sf!s`Jt"!rbs!hqburs+(`?	GUfp@~b	}b
c	
t|){6z'60yyxw2 zv9'I*
uKKKDKKDKt">Kf>'6'
>

n>'>'2,=?s(;zrH/qp"&!LG.>0|6{z0b{jxj	}2}~|2|~{2{{sH
nzyxDHE+	}D>}|s @`?p@@5	U"	D{O!oww0r@8N$ RQDR HEL`!RTRN`!U5TXL@!
 
T H@CSM-X
A
N+	0R`	TR`VcRW-8UHIz
nnsv'Y>J, ~W&}Y"HbnO0Ya(X	oYt]	,Z>	uC Yfmt"xYkz)g+?X*e`8y?2'*)'RMIN)
	DO 125 I=1,N
125	TS(I)=(TS(I)-RMIN)*BAC
	WRITE(1,130)
130	FORMAT(//14X'------ IE CURVE PRINT OUT ------'/)
	WRITE(1,140)(TS(I),I=1,N)
140	FORMAT(10F6.1/)
	DO 145 I=1,N
	J=I+1
1