Skip to content

Instantly share code, notes, and snippets.

@kurahaupo

kurahaupo/mod7.sed

Last active November 19, 2018 11:59
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save kurahaupo/ea7d6ab28cbc1a0a01965a3d9d579e44 to your computer and use it in GitHub Desktop.
Save kurahaupo/ea7d6ab28cbc1a0a01965a3d9d579e44 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
mod7.sed
/^[0-9]*$/!n
:a
s/^[07]*//
s/^[18]5\|^[29][29]\|^36\|^43\|^5[07]\|^64/1/
s/^[18]6\|^[29][07]\|^3[29]\|^44\|^5[18]\|^65/2/
s/^[18][07]\|^[29][18]\|^33\|^45\|^5[29]\|^66/3/
s/^[18][18]\|^[29][29]\|^34\|^46\|^53\|^6[07]/4/
s/^[18][29]\|^[29]3\|^35\|^4[07]\|^54\|^6[18]/5/
s/^[18]3\|^[29]4\|^36\|^4[18]\|^55\|^6[29]/6/
ta
s/^$/0/
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment