Zhang-Suen thinning algorithm: Difference between revisions

Content added Content deleted
m (→‎{{header|Phix}}: added syntax colouring the hard way)
m (→‎{{header|11l}}: Indented multi-line string literals)
Line 111: Line 111:
{{trans|Python}}
{{trans|Python}}


<lang 11l>V beforeTxt =
<lang 11l>V beforeTxt = |‘1100111
1100111
‘1100111
1100111
1100111
1100111
1100111
1100110
1100111
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1100110
1111110
1100110
0000000’
1111110
0000000’


V smallrc01 =
V smallrc01 =
‘00000000000000000000000000000000
|‘00000000000000000000000000000000
01111111110000000111111110000000
01111111110000000111111110000000
01110001111000001111001111000000
01110001111000001111001111000000
01110000111000001110000111000000
01110000111000001110000111000000
01110001111000001110000000000000
01110001111000001110000000000000
01111111110000001110000000000000
01111111110000001110000000000000
01110111100000001110000111000000
01110111100000001110000111000000
01110011110011101111001111011100
01110011110011101111001111011100
01110001111011100111111110011100
01110001111011100111111110011100
00000000000000000000000000000000’
00000000000000000000000000000000’


V rc01 =
V rc01 =
‘00000000000000000000000000000000000000000000000000000000000
|‘00000000000000000000000000000000000000000000000000000000000
01111111111111111100000000000000000001111111111111000000000
01111111111111111100000000000000000001111111111111000000000
01111111111111111110000000000000001111111111111111000000000
01111111111111111110000000000000001111111111111111000000000
01111111111111111111000000000000111111111111111111000000000
01111111111111111111000000000000111111111111111111000000000
01111111100000111111100000000001111111111111111111000000000
01111111100000111111100000000001111111111111111111000000000
00011111100000111111100000000011111110000000111111000000000
00011111100000111111100000000011111110000000111111000000000
00011111100000111111100000000111111100000000000000000000000
00011111100000111111100000000111111100000000000000000000000
00011111111111111111000000000111111100000000000000000000000
00011111111111111111000000000111111100000000000000000000000
00011111111111111110000000000111111100000000000000000000000
00011111111111111110000000000111111100000000000000000000000
00011111111111111111000000000111111100000000000000000000000
00011111111111111111000000000111111100000000000000000000000
00011111100000111111100000000111111100000000000000000000000
00011111100000111111100000000111111100000000000000000000000
00011111100000111111100000000111111100000000000000000000000
00011111100000111111100000000111111100000000000000000000000
00011111100000111111100000000011111110000000111111000000000
00011111100000111111100000000011111110000000111111000000000
01111111100000111111100000000001111111111111111111000000000
01111111100000111111100000000001111111111111111111000000000
01111111100000111111101111110000111111111111111111011111100
01111111100000111111101111110000111111111111111111011111100
01111111100000111111101111110000001111111111111111011111100
01111111100000111111101111110000001111111111111111011111100
01111111100000111111101111110000000001111111111111011111100
01111111100000111111101111110000000001111111111111011111100
00000000000000000000000000000000000000000000000000000000000’
00000000000000000000000000000000000000000000000000000000000’


F intarray(binstring)
F intarray(binstring)