{UTF-8}
decay=
	IF THEN ELSE( random<Atoms*lambda*TIME STEP, 1 , 0 )*(1/TIME STEP)
	~	
	~		|

Atoms= INTEG (
	-decay,
		50)
	~	
	~		|

lambda=
	0.01
	~	
	~		|

random=
	RANDOM UNIFORM( 0 , 1 , seed)
	~	
	~		|

seed=
	68111
	~	
	~		|

********************************************************
	.Control
********************************************************~
		Simulation Control Parameters
	|

FINAL TIME  = 500
	~	Second
	~	The final time for the simulation.
	|

INITIAL TIME  = 0
	~	Second
	~	The initial time for the simulation.
	|

SAVEPER  = 
        TIME STEP
	~	Second [0,?]
	~	The frequency with which output is stored.
	|

TIME STEP  = 1
	~	Second [0,?]
	~	The time step for the simulation.
	|

\\\---/// Sketch information - do not modify anything except names
V300  Do not put anything below this section - it will be ignored
*View 1
$192-192-192,0,Times New Roman|12||0-0-0|0-0-0|0-0-255|-1--1--1|-1--1--1|96,96,100,0
10,1,Atoms,399,168,40,20,3,3,0,0,0,0,0,0
12,2,48,631,169,10,8,0,3,0,0,-1,0,0,0
1,3,5,2,4,0,0,22,0,0,0,-1--1--1,,1|(578,169)|
1,4,5,1,100,0,0,22,0,0,0,-1--1--1,,1|(481,169)|
11,5,48,530,169,6,8,34,3,0,0,1,0,0,0
10,6,decay,530,188,20,11,40,3,0,0,-1,0,0,0
10,7,lambda,487,292,24,11,8,3,0,0,0,0,0,0
1,8,7,6,0,0,0,0,0,64,0,-1--1--1,,1|(505,246)|
1,9,1,6,1,0,0,0,0,64,0,-1--1--1,,1|(457,189)|
10,10,TIME STEP,662,274,50,11,8,2,0,3,-1,0,0,0,128-128-128,0-0-0,|12||128-128-128
1,11,10,6,0,0,0,0,0,64,0,-1--1--1,,1|(601,234)|
10,12,random,556,298,25,11,8,3,0,0,0,0,0,0
10,13,seed,549,354,16,11,8,3,0,0,0,0,0,0
1,14,13,12,0,0,0,0,0,64,0,-1--1--1,,1|(551,332)|
1,15,12,6,0,0,0,0,0,64,0,-1--1--1,,1|(544,249)|
12,16,0,990,217,223,203,3,156,0,0,1,0,0,0
Decay
12,17,0,288,58,40,20,8,3,0,0,-1,0,0,0
12,18,0,372,78,112,30,8,135,0,16,-1,0,0,0,-1--1--1,0-0-0,|0|B|0-0-0
Radioactive Decay
///---\\\
:GRAPH Decay
:TITLE Spontaneous Decay
:X-AXIS Time
:SCALE
:VAR Atoms
:L<%^E!@
1:Current.vdf
9:Current
22:$,Dollar,Dollars,$s
22:Hour,Hours
22:Month,Months
22:Person,People,Persons
22:Unit,Units
22:Week,Weeks
22:Year,Years
22:Day,Days
23:0
15:0,0,0,0,0,0
19:100,0
27:2,
34:0,
4:Time
5:decay
35:Date
36:YYYY-MM-DD
37:2000
38:1
39:1
40:7
41:0
24:0
25:500
26:500