-- test code for our new bound functions: -- though I think they are slower than I would like! -- define a bound function: fn {the|subject>, the |object>} #=> print input |seq> print the |subject> print the |object> -- invoke it: fn(|alpha>, |beta>) -- define a single line bound function: bah {the|next subject>} #=> print the |next subject> -- now invoke it: bah(|gamma>) -- invoke it again, this time with an explicit input sequence: fn(|one>, |two>) ssplit[" "] |some input sequence> -- the previous notation: star-bah (*) #=> print |__self1> star-fn (*,*) #=> print|__self0> print|__self1> print|__self2>