{UTF-8}
treatment decision=
	Screened PS Participants/treatment delay
	~	people/week
	~		|

no treatment=
	treatment decision*(1-treatment fraction)
	~	people/week
	~		|

Screened PS Participants= INTEG (
	participation-no treatment-treatment,
		intial number of PS participants)
	~	people
	~		|

treatment=
	treatment fraction*treatment decision
	~	people/week
	~		|

WOM effect=
	contact rate*Communicators/total population
	~	
	~		|

Communicators= INTEG (
	visits-WOM decay,
		1)
	~	people
	~		|

marketing effect=
	0.0001+0*STEP( 0.0001,52)
	~	Dmnl
	~		|

cumulative surveys= INTEG (
	participation,
		0)
	~	people
	~		|

desired PS participation=
	Potential PS Participants*perceived PS availability*(marketing effect+WOM effect)
	~	people/week
	~		|

WOM decay=
	Communicators/WOM decay time
	~	people/week
	~		|

WOM decay time=
	3
	~	weeks
	~		|

visits=
	participation+treatment
	~	people/week
	~		|

treatment fraction=
	0.88
	~	Dmnl
	~		|

PS availability=
	Min(1/PS capacity utilization,1)
	~	Dmnl
	~		|

PS capacity utilization=
	utilization function(indicated PS utilization)
	~	Dmnl
	~		|

fraction treated=
	Treated PS Participants/total population
	~	Dmnl
	~		|

indicated PS utilization=
	desired PS participation/PS capacity
	~	Dmnl
	~		|

participation=
	PS capacity utilization*PS capacity
	~	people/week
	~		|

perceived PS availability=
	DELAY3I(PS availability, perception delay, 1 )
	~	Dmnl
	~		|

Potential PS Participants= INTEG (
	-participation,
		(total population-intial number of PS participants))
	~	people
	~		|

Treated PS Participants= INTEG (
	treatment,
		0)
	~	people
	~		|

utilization function(
	[(0,0)-(3,1.5)],(0,0),(0.25,0.33),(0.5,0.62),(0.75,0.85),(1,1),(1.25,1.1),(1.5,1.17)\
		,(1.75,1.22),(2,1.25),(2.5,1.25),(3,1.25))
	~	Dmnl
	~		|

perception delay=
	4
	~	weeks
	~		|

capacity delay=
	24
	~	weeks
	~		|

PS capacity=
	DELAY3I( desired PS participation , capacity delay, 20)
	~	people/week
	~		|

contact rate=
	0.04
	~	1/week
	~		|

treatment delay=
	4
	~	weeks
	~		|

intial number of PS participants=
	8
	~	people
	~		|

total population=
	80000
	~	people
	~	approx. 400k people in UM, 20% older adults = 80k. could further isolate \
		this to be community-dwelling seniors, justifying smaller numbers.
	|

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

FINAL TIME  = 156
	~	week
	~	The final time for the simulation.
	|

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

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

TIME STEP  = 0.25
	~	week [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,5,0
10,1,PS capacity,240,378,44,10,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
10,2,Potential PS Participants,347,434,71,28,3,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
10,3,Screened PS Participants,589,433,71,28,3,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
10,4,desired PS participation,413,273,46,18,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
10,5,total population,895,149,47,18,8,131,0,34,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
10,6,Treated PS Participants,859,433,71,28,3,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
1,7,9,6,4,0,0,22,0,0,0,-1--1--1,,1|(759,431)|
1,8,9,3,100,0,0,22,0,0,0,-1--1--1,,1|(688,431)|
11,9,636,723,431,7,8,34,131,0,0,1,0,0,0
10,10,treatment,723,449,35,10,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
1,11,13,3,4,0,0,22,0,0,0,-1--1--1,,1|(493,430)|
1,12,13,2,100,0,0,22,0,0,0,-1--1--1,,1|(436,430)|
11,13,268,461,430,7,8,34,3,0,0,1,0,0,0
10,14,participation,461,448,45,10,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
10,15,fraction treated,1021,355,54,10,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|10||0-0-0
1,16,5,15,1,0,0,2,2,64,0,-1--1--1,|12||0-0-0,1|(1001,222)|
10,17,intial number of PS participants,519,491,69,18,8,131,0,34,0,0,0,0,0-0-0,0-0-0,Arial|10||0-0-255
10,18,treatment delay,828,575,55,10,8,131,0,34,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
10,19,contact rate,793,202,43,10,8,3,0,34,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
1,20,4,1,1,0,0,0,2,65,0,-1--1--1,|12||0-0-0,1|(313,325)|
10,21,capacity delay,145,414,52,10,8,131,0,34,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
1,22,21,1,1,0,0,2,2,64,0,-1--1--1,|12||0-0-0,1|(177,385)|
10,23,PS capacity utilization,88,462,45,18,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
10,24,perceived PS availability,401,175,50,18,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
10,25,perception delay,499,94,60,10,8,3,0,34,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
1,26,25,24,1,0,0,2,2,64,0,-1--1--1,|12||0-0-0,1|(450,120)|
1,27,24,4,1,0,0,0,0,64,0,-1--1--1,,1|(409,213)|
10,28,utilization function,64,556,34,18,8,131,0,34,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
10,29,indicated PS utilization,128,310,48,18,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
1,30,4,29,1,0,0,0,0,64,0,-1--1--1,,1|(275,257)|
1,31,1,29,1,0,0,2,2,64,0,-1--1--1,|12||0-0-0,1|(181,339)|
1,32,28,23,1,0,0,0,0,64,0,-1--1--1,,1|(59,515)|
1,33,29,23,1,0,0,0,0,64,0,-1--1--1,,1|(88,379)|
10,34,PS availability,116,221,51,10,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-0
1,35,23,34,1,0,0,2,2,64,0,-1--1--1,|12||0-0-0,1|(57,345)|
1,36,34,24,1,0,0,0,2,65,0,-1--1--1,|12||0-0-0,1|(258,163)|
1,37,2,4,1,0,0,0,0,64,0,-1--1--1,,1|(416,346)|
1,38,17,2,0,0,0,0,0,64,1,-1--1--1,,1|(448,467)|
1,39,5,2,0,0,0,0,0,64,1,-1--1--1,,1|(636,283)|
1,40,6,15,1,0,0,0,0,64,0,-1--1--1,,1|(916,443)|
1,41,23,14,1,0,0,0,0,64,0,-1--1--1,,1|(289,553)|
1,42,1,14,1,0,0,0,0,64,0,-1--1--1,,1|(248,428)|
12,43,0,213,231,20,20,4,135,0,32,-1,0,0,0,-1--1--1,0-0-0,Arial|12||0-0-0
B1
12,44,0,501,342,19,19,5,135,0,32,-1,0,0,0,-1--1--1,0-0-0,Arial|12||0-0-0
R1
12,45,0,245,308,20,20,5,7,0,32,-1,0,0,0,-1--1--1,0-0-0,Arial|12||0-0-0
B2
10,46,treatment fraction,924,581,35,18,8,131,0,34,0,0,0,0,0-0-0,0-0-0,Arial|12||0-0-255
12,47,0,185,487,19,19,5,135,0,32,-1,0,0,0,-1--1--1,0-0-0,Arial|12||0-0-0
R2
10,48,Communicators,830,282,59,28,3,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
12,49,48,652,284,10,8,0,3,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
1,50,52,48,4,0,0,22,0,0,0,-1--1--1,,1|(748,284)|
1,51,52,49,100,0,0,22,0,0,0,-1--1--1,,1|(685,284)|
11,52,48,717,284,8,11,34,3,0,0,1,0,0,0
10,53,visits,717,305,20,10,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
12,54,48,987,284,10,8,0,3,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
1,55,57,54,4,0,0,22,0,0,0,-1--1--1,,1|(960,285)|
1,56,57,48,100,0,0,22,0,0,0,-1--1--1,,1|(908,285)|
11,57,48,936,285,8,11,34,3,0,0,1,0,0,0
10,58,WOM decay,936,306,45,10,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
1,59,14,52,1,0,0,0,0,64,0,-1--1--1,,1|(556,353)|
10,60,WOM decay time,899,358,46,18,8,3,0,34,0,0,0,0,0-0-0,0-0-0,Arial|0||0-0-255
1,61,48,57,1,0,0,0,0,64,0,-1--1--1,,1|(886,228)|
1,62,60,58,0,0,0,2,2,64,0,-1--1--1,|0||-1--1--1,1|(915,333)|
10,63,marketing effect,537,182,58,10,8,3,0,34,0,0,0,0,0-0-0,0-0-0,Arial|0||0-0-255
1,64,63,4,1,0,0,0,0,64,0,-1--1--1,,1|(475,211)|
10,65,WOM effect,629,221,52,14,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
1,66,48,65,1,0,0,0,0,64,0,-1--1--1,,1|(721,218)|
1,67,19,65,1,0,0,0,0,64,0,-1--1--1,,1|(707,204)|
1,68,5,65,1,0,0,2,2,64,0,-1--1--1,|0||-1--1--1,1|(743,167)|
1,69,65,4,1,0,0,0,0,64,0,-1--1--1,,1|(512,227)|
1,70,10,53,1,0,0,0,0,64,0,-1--1--1,,1|(742,385)|
10,71,cumulative surveys,436,598,39,18,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
1,72,14,71,1,0,0,0,0,64,0,-1--1--1,,1|(432,521)|
12,73,48,589,582,10,8,0,3,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
1,74,76,73,4,0,0,22,0,0,0,-1--1--1,,1|(589,548)|
1,75,76,3,100,0,0,22,0,0,0,-1--1--1,,1|(589,484)|
11,76,48,589,515,11,8,33,3,0,0,4,0,0,0
10,77,no treatment,645,515,45,10,40,131,0,32,-1,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
10,78,treatment decision,765,524,35,18,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Arial|0||0-0-0
1,79,3,78,0,0,0,0,0,64,0,-1--1--1,,1|(680,480)|
1,80,18,78,1,0,0,2,2,64,0,-1--1--1,|0||-1--1--1,1|(822,545)|
1,81,17,3,0,0,0,0,0,64,1,-1--1--1,,1|(542,471)|
1,82,78,77,1,0,0,0,0,64,0,-1--1--1,,1|(702,553)|
1,83,78,10,1,0,0,0,0,64,0,-1--1--1,,1|(778,482)|
1,84,46,10,1,0,0,0,0,64,0,-1--1--1,,1|(859,505)|
1,85,46,77,1,0,0,2,2,64,0,-1--1--1,|0||-1--1--1,1|(747,601)|
///---\\\
:GRAPH Dynamics_of_Senior_Oral_
:TITLE Dynamics of Senior Oral Health Care
:SCALE
:VAR Potential PS Participants with Treated Teeth
:VAR Potential PS Participants with Untreated Teeth

:GRAPH GRAPH
:TITLE GRAPH
:SCALE
:VAR PS Participants with Treated Teeth
:VAR PS Participants with Untreated Teeth

:GRAPH Treated_vs._Untreated_To
:TITLE Treated vs. Untreated Totals
:SCALE
:VAR Adults with Untreated Teeth
:VAR Adults with Treated Teeth

:GRAPH Preventive_Screening_Imp
:TITLE Preventive Screening Impact
:SCALE
:VAR Potential PS participants
:VAR PS participants
:L<%^E!@
1:VaryDelayMktg.vdf
9:VaryDelayMktg
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
18:ScreeningTests20110818.vsc
20:SeniorOralHealthCare072511.lst
15:0,0,0,0,0,0
19:5,0
27:2,
34:0,
4:Time
5:perception delay
35:Date
36:YYYY-MM-DD
37:2000
38:1
39:1
40:3
41:0
24:0
25:156
26:156