(define a (read)) (define b (read)) (if (> a b) (print "TATE") (print "YOKO"))