Минимизация операций cons

Волынкина Мария/cons-minimization.rkt

@@ -0,0 +1,6 @@
+#lang racket
+(define (rev lst) ; косвенно рекурсивная функция, вызывающая обращение списка
+  (define (reverse acc lst) ; явно рекурсивная функция
+    (if (null? lst) acc
+      (reverse (cons (car lst) acc) (cdr lst))))
+  (reverse '() lst))