summaryrefslogtreecommitdiffstats
path: root/samples/modulo.sample
diff options
context:
space:
mode:
authorJan Tuomi <jans.tuomi@gmail.com>2022-01-29 17:58:41 +0200
committerJan Tuomi <jans.tuomi@gmail.com>2022-01-29 17:58:41 +0200
commitd2c46077f56c3b0a8dd7c34924c3ccb80fed892b (patch)
tree1a11e00bfd96a95e3b7313fa7620f734c70d183d /samples/modulo.sample
parent12dbaa90ae2f8c43fd69caaf7d1665ca0182b962 (diff)
Add debug flag, phrase handling words
Diffstat (limited to 'samples/modulo.sample')
-rw-r--r--samples/modulo.sample5
1 files changed, 5 insertions, 0 deletions
diff --git a/samples/modulo.sample b/samples/modulo.sample
new file mode 100644
index 0000000..235d135
--- /dev/null
+++ b/samples/modulo.sample
@@ -0,0 +1,5 @@
+10 $idx !
+[ $idx @ dup 0 gt? ]
+ [ 2 mod 0 eq? .
+ $idx @ 1 - $idx ! ] loop
+drop \ No newline at end of file