式(4)

ローカル変数
     (let ((pi (* (atan 1 1) 4))
           (radius  10))
       (* pi radius radius))

カッコが多い? インデントを見る
      let   pi (* (atan 1 1) 4)
            radius  10
       (* pi radius radius)