main = map ((writer,) . arcObj) (filter (rdfPredEq (Res dctreferences)) ts)