22 lines
358 B
Text
22 lines
358 B
Text
@(defex gorilla ape primate)
|
|
@(defex monkey primate)
|
|
@(defex human primate)
|
|
@(collect)
|
|
@(try)
|
|
@(cases)
|
|
gorilla @name
|
|
@(throw gorilla name)
|
|
@(or)
|
|
monkey @name
|
|
@(throw monkey name)
|
|
@(or)
|
|
human @name
|
|
@(throw human name)
|
|
@(end)@#cases
|
|
@(catch primate (name))
|
|
@kind @name
|
|
@(output)
|
|
we have a primate @name of kind @kind
|
|
@(end)@#output
|
|
@(end)@#try
|
|
@(end)@#collect
|