gistfile1.txt

;; TEAM BYTE ME

;; int list -> list
;; takes a list and a number and returns a list with the length of the number

(define (create_list l n) 
  (cond 
    [(= n 0) empty ]
    [else (cons (first l) (create_list (rest l) (sub1 n))) 
          ]))

(check-expect (create_list (cons 1 empty) 0) empty )
(check-expect (create_list (cons 1 (cons 2 empty)) 2)  (cons 1 (cons 2 empty)) )