Factorize string into Lyndon words: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: simplified Thue-Morse generation) |
|||
Line 130: | Line 130: | ||
string m = "0" |
string m = "0" |
||
for i=1 to 7 do |
for i=1 to 7 do |
||
m &= sq_sub('0'+'1',m) |
|||
m = substitute(m,'0','a') |
|||
m = substitute(m,'1','0') |
|||
m = substitute(m,'a','1') |
|||
m = m0 & m |
|||
end for |
end for |
||
?chen_fox_lyndon_factorization(m) |
?chen_fox_lyndon_factorization(m) |