identity_regridder Function

public function identity_regridder() result(regridder)

Uses

  • proc~~identity_regridder~~UsesGraph proc~identity_regridder identity_regridder ESMF ESMF proc~identity_regridder->ESMF

Arguments

None

Return Value type(IdentityRegridder), pointer


Calls

proc~~identity_regridder~~CallsGraph proc~identity_regridder identity_regridder none~get_spec~2 AbstractRegridder%get_spec proc~identity_regridder->none~get_spec~2 none~set_spec AbstractRegridder%set_spec proc~identity_regridder->none~set_spec

Called by

proc~~identity_regridder~~CalledByGraph proc~identity_regridder identity_regridder none~make_regridder_ NewRegridderManager%make_regridder_ none~make_regridder_->proc~identity_regridder none~make_regridder_from_grids RegridderManager%make_regridder_from_grids none~make_regridder_from_grids->proc~identity_regridder none~make_regridder NewRegridderManager%make_regridder none~make_regridder->none~make_regridder_ none~make_regridder~2 RegridderManager%make_regridder none~make_regridder~2->none~make_regridder_from_grids none~createfilemetadata MAPL_GriddedIO%CreateFileMetaData none~createfilemetadata->none~make_regridder none~request_data_from_file~2 MAPL_GriddedIO%request_data_from_file none~request_data_from_file~2->none~make_regridder proc~mapl_cfiocreatefromfile MAPL_CFIOCreateFromFile proc~mapl_cfiocreatefromfile->none~make_regridder~2 none~create_from_bundle FieldBundleWriter%create_from_bundle none~create_from_bundle->none~createfilemetadata proc~mapl_read_bundle MAPL_read_bundle proc~mapl_read_bundle->none~request_data_from_file~2

Source Code

   function identity_regridder() result(regridder)
      use ESMF
      type (IdentityRegridder), pointer :: regridder
      type (RegridderSpec) :: spec

      regridder => singleton

      ! Due to how MAPL is set up, the default regrid_method is
      ! bilinear. But if an identity regridder is requested, we
      ! want to reflect that in the metadata by updating the spec.
      spec = regridder%get_spec()
      spec%regrid_method = REGRID_METHOD_IDENTITY
      call regridder%set_spec(spec)
    end function identity_regridder