;; CSU 211 -- Fall 04 -- Lab 2

;; absolute-value: Number -> Number
;; return the absolute value of n
(define (absolute-value n)
  (cond
    [(>= n 0) n]
    [else     (- 0 n)]))

;; Tests
(absolute-value 0)
;; expected
0

(absolute-value 1)
;; expected
1

(absolute-value -1)
;; expected
1


;; slurpee-size: Number -> Symbol
;; Returns 'small for a slurpee that is less than 10 ounces, 'large if n 
;; is greater than 30, and 'medium otherwise

;; TODO: Fill this in



;; In order to distribute the wealth, raises are given 
;; according the following table:
;;
;;   Current Income ($/yr)  |  Raise ($/yr)
;;   -----------------------|-------------
;;            I < 10000     | 5000
;;   10000 <= I < 20000     | 3000
;;   20000 <= I < 30000     | 2000
;;   30000 <= I             | 1000

;; raise: Number -> Number
;; raises an income i according to table above

;; TODO: Fill this in