Straddling checkerboard: Difference between revisions

Content added Content deleted
(Added haskell version.)
Line 1,780: Line 1,780:
fcn encode(txt){ txt.toUpper().pump(String,val2key.find.fp1("")) }
fcn encode(txt){ txt.toUpper().pump(String,val2key.find.fp1("")) }
fcn decode(str){ RegExp("79.|3.|7.|.").munch(str).pump(String,key2val.get) }</lang>
fcn decode(str){ RegExp("79.|3.|7.|.").pump(str,String,key2val.get) }</lang>
<lang zkl>txt:="One night-it was on the twentieth of March, 1888-I was returning";
<lang zkl>txt:="One night-it was on the twentieth of March, 1888-I was returning";
str:=encode(txt);
str:=encode(txt);