Here's another one:
addTriple (s,p,o) = addArc s p o . addNode s . addNode p . addNode o
It looks like you're playing around with RDF here. A quick check of your web site shows a Semantic Web angle to some of your workings. I also see you show up in some of the ESW work.
You may be interested that I have a full RDF/XML parser in Haskell (based on a modified version of HaXML) (and also a reasonably competent Notation3 parser). It passes all of Dave Beckett's RDF parser test cases, which include all the W3C RDF core WG test cases, (except one to do with I18N handling). I haven't yet found time to wrap it all up neatly, but the code is available here:
RDF/XML parser and test code: http://www.ninebynine.org/Software/HaskellRDF/RDF/Harp/
Supporting code for RDF node handling: http://www.ninebynine.org/Software/HaskellRDF/RDF/Label/
Modified HaXML parser: http://www.ninebynine.org/Software/HaskellUtils/HaXml-1.12/
URI parser (above should also work with library version in next GHC): http://www.ninebynine.org/Software/HaskellUtils/Network/
Possibly uses some other support modules from: http://www.ninebynine.org/Software/HaskellUtils/
I had been meaning to wrap all this into my Swish package (http://www.ninebynine.org/RDFNotes/Swish/Intro.html), but real work intervened. I do intend to return to this when I can find an excuse to make it part of the new day job.
#g
------------ Graham Klyne For email: http://www.ninebynine.org/#Contact
_______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe
