Abbreviations, automatic: Difference between revisions
Content deleted Content added
No edit summary |
|||
| Line 1,537: | Line 1,537: | ||
s = true |
s = true |
||
for i = 1 to n |
for i = 1 to n |
||
for j = 1 to n |
for j = I + 1 to n |
||
a$ = left$(r$(i), d) |
a$ = left$(r$(i), d) |
||
b$ = left$(r$(j), d) |
b$ = left$(r$(j), d) |
||
if i = j continue |
|||
if a$ = "" or b$ = "" s = true : break 2 |
if a$ = "" or b$ = "" s = true : break 2 |
||
if a$ = b$ s = false : d = d + 1 : break 2 |
if a$ = b$ s = false : d = d + 1 : break 2 |
||