sub mc_sym { +{map{(reverse^$_||($x=$_*$_)^reverse$x)?():($_,$x)}1..pop} }