(use util.match) (define (solve n k) (match (list n k) [(0 1) 'Won] [(1 2) 'Won] [(2 0) 'Won] [(1 0) 'Lost] [(2 1) 'Lost] [(0 2) 'Lost] [_ 'Drew])) (define (main args) (let* ([n (read)] [k (read)]) (print (solve n k))) 0)