From 8af00ba2d33684f220e590d481111df350581c38 Mon Sep 17 00:00:00 2001 From: joachimschmidt557 Date: Fri, 5 Jul 2019 08:50:55 +0200 Subject: [PATCH] Easy list reversing --- reverse.rkt | 7 +++++++ 1 file changed, 7 insertions(+) create mode 100644 reverse.rkt diff --git a/reverse.rkt b/reverse.rkt new file mode 100644 index 0000000..a74f37c --- /dev/null +++ b/reverse.rkt @@ -0,0 +1,7 @@ +#lang racket + +(define (reverse lst) + (cond + [(empty? lst) empty] + [else (append (reverse (rest lst)) (list (first lst)))] + )) \ No newline at end of file