Easy list reversing
This commit is contained in:
parent
cadd0f02fd
commit
8af00ba2d3
1 changed files with 7 additions and 0 deletions
7
reverse.rkt
Normal file
7
reverse.rkt
Normal file
|
|
@ -0,0 +1,7 @@
|
||||||
|
#lang racket
|
||||||
|
|
||||||
|
(define (reverse lst)
|
||||||
|
(cond
|
||||||
|
[(empty? lst) empty]
|
||||||
|
[else (append (reverse (rest lst)) (list (first lst)))]
|
||||||
|
))
|
||||||
Loading…
Add table
Add a link
Reference in a new issue