(display
 (let* ((me (read)) (you (read)))
   (if (not (= me you))
       (case me
	 ((0) (if (= you 1) "Won" "Lost"))
	 ((1) (if (= you 2) "Won" "Lost"))
	 ((2) (if (= you 0) "Won" "Lost")))
       "Drew")
   ))
(newline)