{UTF-8}
Stone Throws=
	IF THEN ELSE( random x*random x+random y*random y <1 , 1 , 0 )
	~	
	~		|

area=
	4*Count Hits/Time
	~	
	~		|

Count Hits= INTEG (
	Stone Throws,
		0)
	~	
	~		|

random x=
	RANDOM UNIFORM( -1 , 1 , seed )
	~	
	~		|

random y=
	RANDOM UNIFORM(-1 , 1 , seed )
	~	
	~		|

seed=
	68111
	~	
	~		|

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

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

INITIAL TIME  = 1
	~	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|120,120,100,0
12,1,0,360,-55,50,25,8,3,0,0,-1,0,0,0
10,2,TIME STEP,526,505,62,12,0,2,0,3,-1,0,0,0,255-255-255,0-0-0,|12||255-255-255
10,3,seed,244,321,20,14,8,3,0,0,0,0,0,0
10,4,random x,180,273,39,12,0,3,0,0,0,0,0,0
10,5,random y,306,270,39,12,0,3,0,0,0,0,0,0
1,6,3,4,0,0,0,0,0,64,0,-1--1--1,,1|(216,300)|
1,7,3,5,0,0,0,0,0,64,0,-1--1--1,,1|(270,298)|
10,10,Time,509,254,33,14,8,2,0,3,-1,0,0,0,128-128-128,0-0-0,|12||128-128-128
10,11,Count Hits,389,156,50,25,3,3,0,0,0,0,0,0
12,12,48,141,161,10,8,0,3,0,0,-1,0,0,0
1,13,15,11,4,0,0,22,0,0,0,-1--1--1,,1|(290,155)|
1,14,15,12,100,0,0,22,0,0,0,-1--1--1,,1|(188,155)|
11,15,48,234,155,8,10,34,3,0,0,1,0,0,0
10,16,Stone Throws,234,185,40,20,35,3,0,0,-1,0,0,0
10,21,area,506,156,19,14,8,3,0,0,0,0,0,0
1,22,11,21,0,0,0,0,0,64,0,-1--1--1,,1|(456,156)|
1,23,10,21,0,0,0,0,0,64,0,-1--1--1,,1|(507,211)|
12,24,0,1121,346,318,225,3,188,0,0,1,0,0,0
Area
12,25,0,389,65,184,36,8,135,0,16,-1,0,0,0,-1--1--1,0-0-0,|12|B|0-0-0
Monte-Carlo integration to determine pi (stone throwing)
1,26,4,16,0,0,0,0,0,64,0,-1--1--1,,1|(200,238)|
1,27,5,16,0,0,0,0,0,64,0,-1--1--1,,1|(277,236)|
///---\\\
:GRAPH Area
:TITLE Area
:X-AXIS Time
:X-LABEL Iterations
:SCALE
:VAR area
: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:area
35:Date
36:YYYY-MM-DD
37:2000
38:1
39:1
40:7
41:0
24:1
25:100
26:100