Bug fixed in SWE_xml_output.f90: mpi_barrier called without error argument