(use scheme.list) (use srfi.217) (define yuki975 (let* ( (x (read)) (n (read)) (m (read)) (_ (read-line)) (mrmax (list->iset (list-tabulate n (^_ (read))))) (maxvalu (list->iset (list-tabulate m (^_ (read))))) (mr-has-x (iset-member mrmax x 0)) (va-has-x (iset-member maxvalu x 0)) ) (display (cond ((and (zero? mr-has-x) (zero? va-has-x)) "-1\n" ) ((zero? mr-has-x) "MaxValu\n" ) ((zero? va-has-x) "MrMax\n" ) (else "MrMaxValu\n" ) ) ) ) )