@@ -45,4 +45,4 @@
(flip-coin *standard-output* times))
(t
(format *standard-output*
- "make-decision [ die [ times [ type ] ] | coin [ times ] ]~&")))))
+ "decide [ die [ times [ type ] ] | coin [ times ] ]~&")))))