12 lines
231 B
Text
12 lines
231 B
Text
templates fizz
|
|
$ mod 3 -> #
|
|
when <=0> do 'Fizz' !
|
|
end fizz
|
|
|
|
templates buzz
|
|
$ mod 5 -> #
|
|
when <=0> do 'Buzz' !
|
|
end buzz
|
|
|
|
[ 1..100 -> '$->fizz;$->buzz;' ] -> \[i](when <=''> do $i ! otherwise $ !\)... -> '$;
|
|
' -> !OUT::write
|