get_regridder_manager Function

   function get_regridder_manager() result(regridder_mgr)
      type(RegridderManager), pointer :: regridder_mgr
      logical :: init = .false.

      if (.not. init) then
         regridder_manager = RegridderManager()
         init = .true.
      end if

      regridder_mgr => regridder_manager
         

   end function get_regridder_manager