:1
#include"std/num.wake"
C[369]:DClap
D(.*)|1001|C.?:"$1"
([^369]+)|(.)(.?)(.?):C$2 C$3 C$4 D$1\n $(add($&,1))