;; area_calculator.txt ;; ;; A few procedures for calculating the area ;; of a circle to print_circle_area :radius ;; print the radius to the top top type "radius print :radius ;; print the circle area to the bottom bottom type [circle area] print circle_area :radius end to circle_area :radius output (square :radius) * 3.14 ; really just gets interpreted as 3 end to square :num output :num * :num end