13 lines
244 B
Text
13 lines
244 B
Text
go =>
|
|
S = "WWWWWWWWWWWWBWWWWWWWWWWWWBBBWWWWWWWWWWWWWWWWWWWWWWWWBWWWWWWWWWWWWWWA",
|
|
println(S),
|
|
RLE = rle3(S),
|
|
println(rle=RLE),
|
|
D = rl_decode(RLE),
|
|
println(D),
|
|
if D == S then
|
|
println(ok)
|
|
else
|
|
println(not_ok)
|
|
end,
|
|
nl.
|