(let ((1p (read)) (2p (read))) (cond ((= 1p 2p) (print "Drew")) ((or (= (- 1p 2p) -1) (= (- 1p 2p) 2)) (print "Won")) (else (print "Lost"))))