a=e$2{for($(c=i=FS=e)=$1;e$i;FS=OFS)c=(!sub("^"c,e,a)*c+$++i)%10}$0=c||a?"NO":"YES"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page