RosettaCodeData/Task/XML-Input/Bracmat/xml-input-1.bracmat

15 lines
228 B
Plaintext

( :?names
& ( get$("students.xml",X,ML)
: ?
( ( Student
. (? (Name.?name) ?,)
| ? (Name.?name) ?
)
& !names !name:?names
& ~
)
?
| !names
)
)