Update source_threads/mpi_tvd_mhd.f90

correct for some warning get from BGQ