*

examples/fizzbuzz.grr

@@ -1,13 +1,4 @@
-def print { file/stdout file/write }
-def when { [] if }
-def keep { over [call] dip }
-def bi { [keep] dip call }
-
-def times {
-  if: over 0 =
-    [drop drop]
-    [swap over >r >r call r> 1 - r> times];
-}
+load "../std.grr"
 
 def fizzbuzz? { [3 % 0 =] [5 % 0 =] bi or }
 def fizz { when: 3 % 0 = ["Fizz" print]; }