Object>>recurse: aZeroInputValuable"ThatReturnsATwoInputValuable"

^( aZeroInputValuable value

 ) value:( self )value:[ :anObject | anObject recurse: aZeroInputValuable ]

"Object>>recurse:

does for recursion what >>do: does for iteration

it enables any Object O to do recursion

Without writing a new recursive method in the Class of O