Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
22
Task/Symmetric-difference/TUSCRIPT/symmetric-difference.tu
Normal file
22
Task/Symmetric-difference/TUSCRIPT/symmetric-difference.tu
Normal file
|
|
@ -0,0 +1,22 @@
|
|||
$$ MODE TUSCRIPT
|
||||
a="John'Bob'Mary'Serena"
|
||||
b="Jim'Mary'John'Bob"
|
||||
|
||||
DICT names CREATE
|
||||
|
||||
SUBMACRO checknames
|
||||
!var,val
|
||||
PRINT val,": ",var
|
||||
LOOP n=var
|
||||
DICT names APPEND/QUIET n,num,cnt,val;" "
|
||||
ENDLOOP
|
||||
ENDSUBMACRO
|
||||
|
||||
CALL checknames (a,"a")
|
||||
CALL checknames (b,"b")
|
||||
|
||||
DICT names UNLOAD names,num,cnt,val
|
||||
|
||||
LOOP n=names,v=val
|
||||
PRINT n," in: ",v
|
||||
ENDLOOP
|
||||
Loading…
Add table
Add a link
Reference in a new issue