;; more-averaging.sal -- another example function with local variables ;; (c) 2008 by Roger B. Dannenberg ;; local variables defined using with are initialized in order. Note ;; that sum is used to define average define function more-averaging(n1, n2, n3) begin with sum = n1 + n2 + n3, average = sum / 3.0 return list(quote(the), quote(average), quote(is), average) end print more-averaging(1, 2.5, 4)