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