|context> => |context: global context>

age |Fred> => |29>

bah |*> #=>
  |fish>
  |soup>
foo |*> #=> |bah>
foo2 |*> #=> |bah 2>
foo3 |*> #=>
   |bahish>
    |bah 3>

save-direction (*) #=>
    path |home> +=> |__self>

learn-spelling |*> #=>
    spell |__self> => ssplit |_self>

learn-spelling-2 (*) #=> 
    spell |__self> => ssplit |_self>

pairs (*,*) #=>
    3|__self1> + 5|__self2>

if-reach-home |*> #=>
    lay |scent> => |no>
    type |walk> => |op: random>

if-find-food |*> #=>
    lay |scent> => |yes>
    type |walk> => |op: return-home>

swap-context |*> #=>
    |context> => |context: testing>
    learn |rule> => |value>
    |context> => previous |context>
    learn |rule 2> => |value 2>