0. #lang racket
1.  
2. (foldr add1 0 '(a b c d e))
3. (foldl add1 0 '(a b c d e))

=>

foldr: given procedure does not accept 2 arguments:

#<procedure:add1>

foldl: given procedure does not accept 2 arguments:

#<procedure:add1>