0. #lang racket
1.  
2. (DEFINE (quadrat a b c d)
3.        (
4.          cons (cons a (cons b `()))
5.               (cons (cons c (cons d `()))
6.                     `()
7.               )
8.        )
9. )
10.  
11. (quadrat 1 2 3 4)

=>

DEFINE: undefined;

cannot reference an identifier before its definition

in module: 'm

quadrat: undefined;

cannot reference an identifier before its definition

in module: 'm