diff options
Diffstat (limited to 'scratch/a.brev')
-rw-r--r-- | scratch/a.brev | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/scratch/a.brev b/scratch/a.brev new file mode 100644 index 0000000..62f0d18 --- /dev/null +++ b/scratch/a.brev @@ -0,0 +1,15 @@ +(import brev mdg) + +(print "hi there") + +(define + (strange a b) + (list 'product (* a b))) + +(define + (strange a b) + (list 'sum (require even? (+ a b)))) + +(print + (map strange '(1 2 3 4) '(5 5 7 8)) + ((over (+ x x y i)) '(10 20 40) '(3 6 9))) \ No newline at end of file |