;;; ------------------------
;;;  CMPU-181, Spring 2013
;;;  Jan. 23, 2013
;;;  Sample Scheme Program for first day of class
;;; ------------------------

;;;  FAHR-TO-CELSIUS
;;; ------------------------
;;;  INPUT:  FAHR, Temperature in degrees Fahrenheit
;;;  OUTPUT:  Equivalent temperature in degrees Celsius

(define fahr-to-celsius
  (lambda (fahr)
    (* 5/9 (- fahr 32.0))))