{UTF-8}
Amount Nuclide= INTEG (
	-Rate of Decay,
		1000)
	~	
	~		|

Decay Constant=
	LN(2)/"Half-life"
	~	
	~		|

"Half-life"=
	30
	~	Year [1,60,1]
	~		|

Rate of Decay=
	Amount Nuclide*Decay Constant
	~	
	~		|

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

FINAL TIME  = 100
	~	Year
	~	The final time for the simulation.
	|

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

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

TIME STEP  = 1
	~	Year [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,Comic Sans MS|12||0-0-0|0-0-0|0-0-255|-1--1--1|-1--1--1|120,120,100,0
10,1,Amount Nuclide,147,110,47,39,3,131,0,0,0,0,0,0
12,2,48,411,110,10,8,0,3,0,0,-1,0,0,0
1,4,6,2,4,0,0,22,0,0,0,-1--1--1,,1|(352,110)|
1,5,6,1,100,0,0,22,0,0,0,-1--1--1,,1|(242,110)|
11,6,0,297,110,6,8,34,3,0,0,1,0,0,0
10,7,Rate of Decay,297,132,69,14,40,3,0,0,-1,0,0,0
10,8,Decay Constant,327,216,74,14,8,3,0,0,0,0,0,0
10,9,"Half-life",185,329,42,15,8,3,0,0,0,0,0,0
1,10,9,8,1,0,0,0,0,64,0,-1--1--1,,1|(274,298)|
1,11,8,7,1,0,0,0,0,64,0,-1--1--1,,1|(330,175)|
1,12,1,7,1,0,0,0,0,64,0,-1--1--1,,1|(210,170)|
12,13,0,776,173,240,187,3,156,0,0,1,0,0,0
Nuclear_Decay
///---\\\
:GRAPH Nuclear_Decay
:TITLE Nuclear Decay
:SCALE
:VAR Amount Nuclide
:LINE-WIDTH 3
: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,1,0,0
19:100,0
27:2,
34:0,
4:Time
5:Half-life
35:Date
36:YYYY-MM-DD
37:2000
38:1
39:1
40:0
41:0
24:0
25:100
26:100