Here is a sample of a Priority System as represented in a simplistic fashion in Perl. This assignment involves developing an initial domain, to be entered into FreeKBS, representing which tasks a person has to do to acquire programming skills.

Some example tasks would be:

• Ensure basic familiarity with operating system
• Ensure basic familiarity with typical utility programs
• Ensure basic familiarity with Emacs

The way this works, for each student, we will make a new FreeKBS (learning) context for them, and copy over the default context. Then, as they complete the tasks, they mark (through the POSI client software (web, CLI, GUI or IRC client)), they mark the goal as completed.

my $entries = {
	       # 	     1 => "Stay employed",
	       # 	     2 => "Stay healthy",
	       # 	     3 => "Have fun",
	       # 	     4 => "Help people",
	       5 => "Get a new laptop",
	       6 => "install FRDCSA on my new laptop",
	       7 => "Present at Flourish",
	       8 => "Make a list of the features we want to have in a laptop",
	       9 => "Have mobile wireless access through phone",
	       10 => "Get an android based phone",
	       11 => "Have FRDCSA Interactive Execution Monitor working",
	       12 => "Write android software",
	       13 => "Contact Ryan Neuman",
	       14 => "Have mobile wireless on the train",
	       15 => "Have budget analysis system working",
	       16 => "Have dependency reasoner working",
	       17 => "Order mobile broadband",
	       18 => "Do job for Eric",
	       19 => "Read books on the laptop",
	       20 => "Build a goal/knowledge structure here and then grow it until it includes many of the existing unilang entries",
	       21 => "Develop a system that reasons about what will fail if certain things aren't done.",
	       22 => "Setup core business processes",
	       23 => "Make adequate money each month",
	       24 => "Have 1 630 300 5565 actually work when I already have a phone call, instead of just ringing endlessly",
	      };


my $assertions = [
		  ["depends", 22, 24],
		  ["depends", 23, 22],
		  ["eases", 21, 22],
		  ["depends", 6, 5],
		  ["eases", 5, 7],
		  ["depends", 5, 8],
		  ["eases", 5, 9],
		  ["eases", 10, 9],
		  ["costs", 5, '$400'],
		  ["costs", 10, '$200'],
		  ["costs", 9, '$60 / mo'],
		  ["depends", 11, 10],
		  ["depends", 11, 12],
		  ["eases", 13, 12],
		  ["eases", 13, 10],
		  ["provides", 9, 14],
		  ["provides", 17, 14],
		  ["costs", 17, '$60 /mo'],
		  ["eases", 16, 15],
		  ["goal", 5],
		  ["goal", 7],
		  ["goal", 11],
		  ["goal", 14],
		  ["goal", 15],
		  ["earns", 18, '$250'],
		  ["prefer same", 5, 7],
		  ["prefer over", 11, [5,7,14]],
		  ["prefer same", 11, 15],
		  ["eases", 16, 11],
		  ["ethicality-concern", 7, 'evangelism'],
		  ["involves", 12, "android software development"],
		  ["interested-in", "Ryan Neuman", "android software development"],
		  ["eases", 5, 19],
		 ];