(do((i -1)(a 841(ash b -1))(b 1189 a))((>(incf i)10))(format t"A~2A~5@Amm x~5@Amm "i a b))