get_mapl_geom Function

public function get_mapl_geom(geom, rc) result(mapl_geom)

Arguments

Type IntentOptional Attributes Name
type(ESMF_Geom), intent(in) :: geom
integer, intent(out), optional :: rc

Return Value type(MAPLGeom), pointer


Calls

proc~~get_mapl_geom~~CallsGraph proc~get_mapl_geom get_mapl_geom get_geom_manager get_geom_manager proc~get_mapl_geom->get_geom_manager get_mapl_geom_from_id get_mapl_geom_from_id proc~get_mapl_geom->get_mapl_geom_from_id proc~mapl_geomgetid MAPL_GeomGetId proc~get_mapl_geom->proc~mapl_geomgetid proc~mapl_return MAPL_Return proc~get_mapl_geom->proc~mapl_return proc~mapl_verify MAPL_Verify proc~get_mapl_geom->proc~mapl_verify proc~mapl_geomgetid->proc~mapl_return proc~mapl_geomgetid->proc~mapl_verify ESMF_InfoGet ESMF_InfoGet proc~mapl_geomgetid->ESMF_InfoGet ESMF_InfoGetFromHost ESMF_InfoGetFromHost proc~mapl_geomgetid->ESMF_InfoGetFromHost at at proc~mapl_return->at insert insert proc~mapl_return->insert proc~mapl_throw_exception MAPL_throw_exception proc~mapl_return->proc~mapl_throw_exception proc~mapl_verify->proc~mapl_throw_exception

Called by

proc~~get_mapl_geom~~CalledByGraph proc~get_mapl_geom get_mapl_geom proc~add_variable~2 add_variable proc~add_variable~2->proc~get_mapl_geom proc~bundle_to_metadata bundle_to_metadata proc~bundle_to_metadata->proc~get_mapl_geom proc~add_variables add_variables proc~bundle_to_metadata->proc~add_variables proc~add_variables->proc~add_variable~2

Source Code

   function get_mapl_geom(geom, rc) result(mapl_geom)
      type(MAPLGeom), pointer :: mapl_geom
      type(ESMF_Geom), intent(in) :: geom 
      integer, optional, intent(out) :: rc

      integer :: status, id
      type(GeomManager), pointer :: geom_mgr

      geom_mgr => get_geom_manager()
      id = MAPL_GeomGetId(geom, _RC)
      mapl_geom => geom_mgr%get_mapl_geom_from_id(id, _RC)
      _RETURN(_SUCCESS)

   end function get_mapl_geom