RosettaCodeData/Task/Scope-Function-names-and-labels/Racket/scope-function-names-and-labels-1.rkt

(define (foo x)
  (define (bar y) (+ x y))
  (bar 2))
(foo 1) ; => 3
(bar 1) ; => error