RosettaCodeData/Task/Symmetric-difference/Bracmat/symmetric-difference-1.bracmat
2023-07-01 13:44:08 -04:00

16 lines
286 B
Text

(SymmetricDifference=
A B x symdiff
. !arg:(?A.?B)
& :?symdiff
& ( !A !B
: ?
( %@?x
& ( !A:? !x ?&!B:? !x ?
| !symdiff:? !x ?
| !symdiff !x:?symdiff
)
& ~
)
?
| !symdiff
));