FakeExtData Derived Type

type, public :: FakeExtData


Inherits

type~~fakeextdata~2~~InheritsGraph type~fakeextdata~2 FakeExtData StringVector StringVector type~fakeextdata~2->StringVector vars type~clientthread ClientThread type~fakeextdata~2->type~clientthread c type~fakebundle~2 FakeBundle type~fakeextdata~2->type~fakebundle~2 bundle type~basethread BaseThread type~clientthread->type~basethread type~abstractsocket AbstractSocket type~basethread->type~abstractsocket connection type~integerrequestmap IntegerRequestMap type~basethread->type~integerrequestmap open_requests type~messagevisitor MessageVisitor type~basethread->type~messagevisitor type~map_set~13 map_Set type~integerrequestmap->type~map_set~13 tree type~surrogatemessagevisitor SurrogateMessageVisitor type~messagevisitor->type~surrogatemessagevisitor

Components

Type Visibility Attributes Name Initial
character(len=:), public, allocatable :: file_1
character(len=:), public, allocatable :: file_2
integer, public :: comm
integer, public :: nlat
integer, public :: nlon
integer, public :: npes
integer, public :: rank
type(ClientThread), public :: c
type(FakeBundle), public, allocatable :: bundle(:)
type(StringVector), public :: vars

Type-Bound Procedures

procedure, public :: finalize

  • private subroutine finalize(this)

    Arguments

    Type IntentOptional Attributes Name
    class(FakeExtData), intent(inout) :: this

procedure, public :: init

  • private subroutine init(this, options, comm, d_s)

    Arguments

    Type IntentOptional Attributes Name
    class(FakeExtData), intent(inout) :: this
    type(CommandLineOptions), intent(in) :: options
    integer, intent(in) :: comm
    class(AbstractDirectoryService), intent(inout), target :: d_s

procedure, public :: run

  • private subroutine run(this, step)

    Arguments

    Type IntentOptional Attributes Name
    class(FakeExtData), intent(inout), target :: this
    integer, intent(in) :: step

Source Code

   type FakeExtData
      type (ClientThread) :: c

      character(len=:), allocatable :: file_1
      character(len=:), allocatable :: file_2

      type (StringVector) :: vars
      type (FakeBundle), allocatable :: bundle(:)

      integer :: comm
      integer :: rank
      integer :: npes

      integer :: nlat
      integer :: nlon

   contains
      procedure :: init
      procedure :: run
      procedure :: finalize

   end type FakeExtData