Пример нормального порядка

(f 5) ; Вычислим аппликацию
(sum-of-squares (+ 5 1) (* 5 2)) ; подставили тело f
(+ (square (+ 5 1)) (square (* 5 2))) ; подставили тело
; sum-of-squares
(+ (* (+ 5 1) (+ 5 1)) (* (* 5 2) (* 5 2))) ; подставили тело
; square
(+ (* 6 6) (* 10 10)) ; редуцируем внутренние +
(+ 36 100) ; редуцируем *
136 ; редуцируем +