MAPLpy_ESMF_GridCompGetName Function

public function MAPLpy_ESMF_GridCompGetName(c_grid_comp) result(c_string) bind(c, name="MAPLpy_ESMF_GridCompGetName")

Arguments

Type IntentOptional Attributes Name
type(c_ptr), intent(in), value :: c_grid_comp

Return Value type(c_ptr)


Calls

proc~~maplpy_esmf_gridcompgetname~~CallsGraph proc~maplpy_esmf_gridcompgetname MAPLpy_ESMF_GridCompGetName ESMF_GridCompGet ESMF_GridCompGet proc~maplpy_esmf_gridcompgetname->ESMF_GridCompGet

Source Code

    function MAPLpy_ESMF_GridCompGetName(c_grid_comp) result(c_string) bind(c, name="MAPLpy_ESMF_GridCompGetName")
        
        type(c_ptr), intent(in), value     :: c_grid_comp

        type(ESMF_GridComp), pointer       :: f90_state
        type(c_ptr)                        :: c_string

        call c_f_pointer(c_grid_comp, f90_state)

        call ESMF_GridCompGet(f90_state, name=F90_STRING_BUFFER, RC=STATUS)
        c_string = c_loc(F90_STRING_BUFFER)

    end function MAPLpy_ESMF_GridCompGetName