t=1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
l=4 10 16 22 28 34 40 46 52 58 64 70 76 82 88 94 100 106 112 118 124 130 136 142 148 154 160 166 172 178 184 190
i:=$(STDIN)
$(foreach d,0 1 2 3 4 5 6 7 8 9,$(eval i:=$$(subst $d, $d,$$i)))
$(foreach p,$t,$(info $(if $(findstring $(word $(word $p, $l),x x $i),$(word $(word $p,$l),x $i)),$(word $(word $p,$l),x x $i),$(word $(word $p,$l),$i))))