diff --git a/examples/keep.janet b/examples/keep.janet new file mode 100644 index 0000000..97124aa --- /dev/null +++ b/examples/keep.janet @@ -0,0 +1,8 @@ +# keep values > 1, equivalent to filter +(keep (fn [x] (when (> x 1) x)) @[0 1 2 3]) # -> @[2 3] + +# for all members > 2, keep the square +(keep (fn [x] (when (> x 2) (* x x))) [0 1 3 4 5]) # -> @[9 16 25] + +# operates on values in table +(keep (fn [x] (when (> x 1) (* x x))) @{:foo 1 :bar 2 :baz 3}) # -> @[4 9] \ No newline at end of file