QDPFileReader to(file_xml,file,serpar); read(to,record_xml,quark_prop); close(to);
XMLReader record_xml; readQprop(file_xml, record_xml, quark_prop, file, serpar); read(record_xml, "/Propagator", header);
void readQprop(XMLReader& file_xml,	       XMLReader& record_xml, LatticePropagator& quark_prop,	       const string& file, 	       QDP_serialparallel_t serpar){  QDPFileReader to(file_xml,file,serpar);  read(to,record_xml,quark_prop);  close(to);}