      subroutine wrt_diagsM_avg_empty
      end
