Data commit

This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions

View file

@ -0,0 +1,23 @@
a$[] = [ "John" "Bob" "Mary" "Serena" ]
b$[] = [ "Jim" "Mary" "John" "Bob" ]
for i to 2
for a$ in a$[]
for b$ in b$[]
if a$ = b$
break 1
.
.
if a$ <> b$
for c$ in c$[]
if c$ = a$
break 1
.
.
if c$ <> a$
c$[] &= a$
.
.
.
swap a$[] b$[]
.
print c$[]