(define incList
  (lambda (L)
    (cond ((null? L) L)
          (else (cons (+ 1 (car L)) (incList (cdr L)))))))