(do([x #0=(read)#0#][y #0##0#])(#f)(format #t"~d ~a ~d~%"x(if(= x y)'=(if(< x y)'<'>))y))