make_geom_pfio Function

public function make_geom_pfio(metadata, rc) result(geom_pfio)

Arguments

Type IntentOptional Attributes Name
type(FileMetadata), intent(in) :: metadata
integer, intent(out), optional :: rc

Return Value class(GeomPFIO), allocatable


Calls

proc~~make_geom_pfio~~CallsGraph proc~make_geom_pfio make_geom_pfio proc~mapl_return MAPL_Return proc~make_geom_pfio->proc~mapl_return 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

Source Code

   function make_geom_pfio(metadata, rc) result(geom_pfio)
      class(GeomPFIO), allocatable :: geom_pfio
      type(FileMetadata), intent(in) :: metadata
      integer, intent(out), optional :: rc

      type(GridPFIO) :: grid_pfio

      allocate(geom_pfio, source=grid_pfio)
      _RETURN(_SUCCESS)
   end function make_geom_pfio