let rec($)x i=Printf.printf"%9d * 9 +%3d = 1%d
"x i(x/10*9+i-1);i<10&x*10+i$i+1;;1$2