{UTF-8}
Gross productivity = WITH LOOKUP (
	Tasks remaining,
		([(0,0)-(1200,1)],(0,0),(50,0.85),(100,1),(1200,1) ))
	~	tasks/person/Month
	~		|

Time remaining=
	MAX(1,Scheduled completion date - Time)
	~	months
	~		|

Effort perceived remaining=
	Tasks remaining/Perceived productivity
	~	person*months
	~		|

Indicated completion date=
	Time + Time perceived required
	~	months
	~		|

Tasks remaining= INTEG (
	Detecting undiscovered rework-Generating undiscovered rework-Making real progress,
		Initial project definition)
	~	tasks
	~		|

"Adding person-months"=
	Workforce
	~	months*person/Month
	~		|

Undiscovered rework= INTEG (
	Generating undiscovered rework - Detecting undiscovered rework,
		0)
	~	tasks
	~		|

Cumulative effort= INTEG (
	"Adding person-months",
		0.001)
	~	person*months
	~		|

Cumulative real progress= INTEG (
	Making real progress,
		0.001)
	~	tasks
	~		|

Generating undiscovered rework=
	Progress rate*(1 - Fraction satisfactory)
	~	tasks/Month
	~		|

Making real progress=
	Progress rate* Fraction satisfactory
	~	tasks/Month
	~		|

Time to adjust workforce=
	3
	~	months
	~		|

Time to adjust schedule=
	3
	~	months
	~		|

Net hiring=
	 (Workforce sought - Workforce)/Time to adjust workforce
	~	people/Month
	~		|

Adjusting the schedule=
	 (Indicated completion date - Scheduled completion date)/Time to adjust schedule
	~	months/Month
	~		|

Time to detect rework= WITH LOOKUP (
	Fraction perceived complete,
		([(0,0)-(1,12)],(0,12),(0.2,12),(0.4,12),(0.6,10),(0.8,6)
		,(1,0.5)))
	~	months
	~		|

Detecting undiscovered rework = Undiscovered rework/Time to detect rework
	~	tasks/Month
	~		|

Cumulative preceived progress=
	Cumulative real progress + MAX(0,Undiscovered rework)
	~	tasks
	~		|

FINAL TIME=
	IF THEN ELSE(Fraction perceived complete<0.995,100,Time)
	~	Month
	~	The final time for the simulation.
	|

Fraction perceived complete = Cumulative preceived progress/Initial project definition
	~	fraction
	~		|

Fraction satisfactory=
	0.5
	~	fraction
	~		|

Indicated worforce =Effort perceived remaining/Time remaining
	~	people
	~		|

Initial project definition = 1200
	~	tasks
	~		|

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

Perceived productivity = Cumulative preceived progress/Cumulative effort
	~	tasks/person/Month
	~		|

Progress rate = Gross productivity*Workforce
	~	tasks/Month
	~		|

SAVEPER  = 
        TIME STEP
	~	Month
	~	The frequency with which output is stored.
	|

Scheduled completion date = INTEG(Adjusting the schedule,40)
	~	months
	~		|

Time perceived required = Effort perceived remaining/Workforce sought
	~	months
	~		|

TIME STEP  = 0.25
	~	Month
	~	The time step for the simulation.
	|

Willingness to change workforce= WITH LOOKUP (
	Fraction perceived complete,
		([(0,0)-(1,1)],(0,1),(0.1,1),(0.2,1),(0.3,1),(0.4,0.95)
		,(0.5,0.85),(0.6,0.72),(0.7,0.45),(0.8,0.1),(0.9,0),(1,0)))
	~	dimensionless
	~		|

Workforce = INTEG(Net hiring,2)
	~	people
	~		|

Workforce sought=
	MAX(0,Indicated worforce*Willingness to change workforce + Workforce*(1-Willingness to change workforce
	))
	~	people
	~		|

\\\---/// 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|96,96,5,0
10,1,Workforce,411,94,55,29,3,131,0,0,0,0,0,0
10,2,Progress rate,812,85,36,22,8,131,0,0,-1,0,0,0
10,3,Cumulative real progress,872,398,55,29,3,131,0,0,0,0,0,0
10,4,Effort perceived remaining,443,372,66,23,8,131,0,0,0,0,0,0
10,5,Indicated worforce,273,325,38,23,72,131,0,0,-1,0,0,0
10,6,Gross productivity,779,161,48,23,8,3,0,0,-1,0,0,0
10,7,Initial project definition,780,341,39,29,8,131,0,0,0,0,0,0
10,8,Time remaining,330,445,42,19,8,131,0,0,-1,0,0,0
10,9,Time perceived required,217,479,59,23,8,3,0,0,-1,0,0,0
10,10,Indicated completion date,368,601,60,23,8,3,0,0,-1,0,0,0
10,11,Scheduled completion date,430,519,55,29,3,131,0,0,0,0,0,0
10,12,Undiscovered rework,1189,226,55,29,3,131,0,0,0,0,0,0
10,13,Cumulative preceived progress,866,510,73,23,8,3,0,0,0,0,0,0
10,14,Fraction satisfactory,1039,370,48,23,8,131,0,0,-1,0,0,0
10,15,Cumulative effort,660,163,55,29,3,131,0,0,0,0,0,0
10,16,Perceived productivity,627,282,48,23,8,3,0,0,0,0,0,0
10,17,Time,286,517,26,13,0,2,0,3,-1,0,0,0,0-0-0,0-0-0,|9||0-0-0
10,18,Workforce sought,229,222,44,23,8,131,0,0,-1,0,0,0
10,19,Willingness to change workforce,422,270,51,29,8,131,0,1,0,0,0,0,64-0-0,0-0-0,|9||0-0-0
10,20,Fraction perceived complete,647,449,73,23,8,3,0,0,-1,0,0,0
10,21,Time to detect rework,1094,500,57,23,72,3,0,0,-1,0,0,0
10,22,Time to adjust workforce,226,36,56,23,8,3,0,0,0,0,0,0
10,23,Time to adjust schedule,711,585,56,23,8,3,0,0,0,0,0,0
1,24,1,2,2,0,0,0,0,0,0,-1--1--1,,1|(530,54)|
1,25,2,77,2,0,0,0,0,0,0,-1--1--1,,1|(942,222)|
1,26,4,5,2,0,0,0,0,0,0,-1--1--1,,1|(354,357)|
1,27,8,5,1,0,0,0,0,0,0,-1--1--1,,1|(298,381)|
1,28,1,64,2,0,0,0,0,0,0,-1--1--1,,1|(336,60)|
1,29,4,9,1,0,0,0,0,0,0,-1--1--1,,1|(279,410)|
1,30,9,10,1,0,0,0,0,0,0,-1--1--1,,1|(236,536)|
1,31,10,60,1,0,0,0,0,0,0,-1--1--1,,1|(458,597)|
1,32,11,8,2,0,0,0,0,0,0,-1--1--1,,1|(351,480)|
1,33,11,60,2,0,0,0,0,0,0,-1--1--1,,1|(485,562)|
1,34,6,2,1,0,0,0,0,0,0,-1--1--1,,1|(800,122)|
1,35,2,74,2,0,0,0,0,0,0,-1--1--1,,1|(990,175)|
1,36,3,13,1,0,0,0,0,0,0,-1--1--1,,1|(877,454)|
1,37,12,13,1,0,0,0,0,0,0,-1--1--1,,1|(1092,430)|
1,38,14,77,0,0,0,0,0,0,0,-1--1--1,,1|(984,342)|
1,39,14,75,0,0,0,0,0,0,0,-1--1--1,,1|(1036,327)|
1,40,1,81,2,0,0,0,0,0,0,-1--1--1,,1|(503,114)|
1,41,13,16,1,0,0,0,0,0,0,-1--1--1,,1|(757,396)|
1,42,15,16,1,0,0,0,0,0,0,-1--1--1,,1|(660,227)|
1,43,16,4,2,0,0,0,0,0,0,-1--1--1,,1|(554,341)|
1,44,5,18,2,0,0,0,0,0,0,-1--1--1,,1|(242,277)|
1,45,18,65,2,0,0,0,0,0,0,-1--1--1,,1|(235,160)|
1,46,19,18,2,0,0,0,0,0,0,-1--1--1,,1|(340,261)|
1,47,20,19,1,0,0,0,0,0,0,-1--1--1,,1|(566,352)|
1,48,13,20,1,0,0,0,0,0,0,-1--1--1,,1|(755,489)|
1,49,7,20,1,0,0,0,0,0,0,-1--1--1,,1|(733,389)|
1,50,1,18,2,0,0,0,0,0,0,-1--1--1,,1|(371,178)|
1,51,12,73,2,0,0,0,0,0,0,-1--1--1,,1|(1154,170)|
1,52,21,73,2,0,0,0,0,0,0,-1--1--1,,1|(1128,406)|
1,53,20,21,1,0,0,0,0,0,0,-1--1--1,,1|(928,574)|
1,54,22,64,1,0,0,0,0,0,0,-1--1--1,,1|(231,67)|
1,55,23,60,0,0,0,0,0,0,0,-1--1--1,,1|(638,567)|
12,56,48,614,518,10,8,0,3,0,0,-1,0,0,0
1,57,59,11,4,0,0,22,0,0,0,-1--1--1,,1|(520,520)|
1,58,59,56,100,0,0,22,0,0,0,-1--1--1,,1|(585,520)|
11,59,48,561,520,6,8,34,3,0,0,1,0,0,0
10,60,Adjusting the schedule,561,548,48,20,40,131,0,0,0,0,0,0
12,61,48,198,99,10,8,0,3,0,0,-1,0,0,0
1,62,64,1,4,0,0,22,0,0,0,-1--1--1,,1|(316,104)|
1,63,64,61,100,0,0,22,0,0,0,-1--1--1,,1|(236,104)|
11,64,48,271,104,6,8,34,3,0,0,1,0,0,0
10,65,Net hiring,271,125,40,13,32,3,0,0,2,0,0,0
1,66,76,3,4,0,0,22,0,0,0,-1--1--1,,1|(873,343)|
1,67,76,83,100,0,0,22,0,0,0,-1--1--1,,1|(873,286)|
1,68,74,12,4,0,0,22,0,0,0,-1--1--1,,1|(1085,231)|
1,69,74,83,100,0,0,22,0,0,0,-1--1--1,,1|(974,231)|
1,70,72,83,4,0,0,22,0,0,0,-1--1--1,,1|(869,116)|
1,71,72,12,100,0,0,22,0,0,0,-1--1--1,,1|(1189,116)|
11,72,620,1027,116,6,8,34,3,0,0,1,0,0,0
10,73,Detecting undiscovered rework,1027,150,57,26,40,131,0,0,0,0,0,0
11,74,412,1031,231,6,8,34,3,0,0,1,0,0,0
10,75,Generating undiscovered rework,1031,267,54,28,40,131,0,0,-1,0,0,0
11,76,428,873,312,8,6,33,3,0,0,4,0,0,0
10,77,Making real progress,922,312,41,25,40,131,0,0,-1,0,0,0
12,78,48,496,168,10,8,0,3,0,0,-1,0,0,0
1,79,81,15,4,0,0,22,0,0,0,-1--1--1,,1|(576,168)|
1,80,81,78,100,0,0,22,0,0,0,-1--1--1,,1|(521,168)|
11,81,48,542,168,6,8,34,3,0,0,1,0,0,0
10,82,"Adding person-months",542,204,30,28,40,131,0,0,-1,0,0,0
10,83,Tasks remaining,869,237,55,29,3,131,0,0,0,0,0,0
1,84,7,83,0,0,0,0,0,64,1,-1--1--1,,1|(819,294)|
1,85,83,4,1,0,0,0,0,64,0,-1--1--1,,1|(686,335)|
1,86,18,9,1,0,0,0,0,64,0,-1--1--1,,1|(205,304)|
1,87,17,8,0,0,0,0,0,64,0,-1--1--1,,1|(301,489)|
1,88,17,10,0,0,0,0,0,64,0,-1--1--1,,1|(316,548)|
1,89,83,6,1,0,0,0,0,64,0,-1--1--1,,1|(789,220)|
///---\\\
:GRAPH Project_Model
:TITLE Project Model
:SCALE
:VAR Workforce
:LINE-WIDTH 2
:SCALE
:VAR Tasks remaining
:LINE-WIDTH 2
:VAR Cumulative real progress
:LINE-WIDTH 2
:VAR Undiscovered rework
:LINE-WIDTH 2
:SCALE
:VAR Fraction perceived complete
:LINE-WIDTH 2
:SCALE
:VAR Scheduled completion date
:LINE-WIDTH 2
:L<%^E!@
1:fsat 1.vdf
9:fsat 1
23:0
15:0,0,0,0,0,0
19:5,0
27:0,
34:0,
4:Time
5:Workforce
24:0
25:42.25
26:42.25