RosettaCodeData/Task/Symmetric-difference/Datalog/symmetric-difference.datalog

18 lines
281 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
.decl A(text: symbol)
.decl B(text: symbol)
.decl SymmetricDifference(text: symbol)
.output SymmetricDifference
A("this").
A("is").
A("a").
A("test").
B("also").
B("part").
B("of").
B("a").
B("test").
SymmetricDifference(x) :- A(x), !B(x).
SymmetricDifference(x) :- B(x), !A(x).