(else (cons (car l) (cons (car l) (dubbel (cdr l)))))