










      subroutine wrt_diags_ek_avg_empty

      use Agrif_Types, only : Agrif_tabvars


      end
