map{$i=$==500;$=+=$t*($i/=2)+.5while$t*print"$= ",('=
','<','>')[$t=$_<=>$=],$/}<>