RosettaCodeData/Task/Set/J/set-1.j
2023-07-01 13:44:08 -04:00

5 lines
88 B
Text

union=: ~.@,
intersection=: [ -. -.
difference=: -.
subset=: *./@e.
equality=: -:&(/:~)