rule110.proto.ed

H
0a
# CODE
.
kd
1;/^\.\./kc
1,'dt'c-
'c,'ds//./
$ke
'et'e
.g/^\(.\).*\(.\)$/s//\2&\1/
.g/^.$/s//&&&/
s/./&\
/g
d
'e+,$-2g/^/+,+2t.\
-2,.j\
s/111/0/\
s/110/1/\
s/101/1/\
s/100/0/\
s/011/1/\
s/010/1/\
s/001/1/\
s/000/0/
$-,$d
'e+,$jp
'd+,$w
1,'dw !exec ed -s '%'
Q