type_output_observation Derived Type

type, private :: type_output_observation


Inherits

type~~type_output_observation~~InheritsGraph type~type_output_observation type_output_observation type~holder_elements holder_elements type~type_output_observation->type~holder_elements elements type~type_dp_3d type_dp_3d type~type_output_observation->type~type_dp_3d coordinate type~abst_element abst_element type~holder_elements->type~abst_element e type~type_dp_pointer type_dp_pointer type~abst_element->type~type_dp_pointer x, y, z

Inherited by

type~~type_output_observation~~InheritedByGraph type~type_output_observation type_output_observation type~type_output type_output type~type_output->type~type_output_observation observations type~type_ftdss type_ftdss type~type_ftdss->type~type_output output

Components

Type Visibility Attributes Name Initial
type(type_dp_3d), public :: coordinate
logical, public :: do_output
type(holder_elements), public, allocatable :: elements(:)
real(kind=real64), public, allocatable :: eta(:)
character(len=:), public, allocatable :: file_name
procedure(abst_get_values), public, pointer, pass(self) :: get_values => null()
character(len=:), public, allocatable :: name
integer(kind=int32), public, allocatable :: node_ids(:)
integer(kind=int32), public :: num_observations
integer(kind=int32), public :: num_unit
character(len=:), public, allocatable :: type
character(len=:), public, allocatable :: unit
procedure(abst_write_obeservation_header), public, pointer, pass(self) :: write_header => null()
procedure(abst_write_line), public, pointer, pass(self) :: write_line => null()
real(kind=real64), public, allocatable :: xi(:)

Type-Bound Procedures

procedure, public, pass(self) :: initialize => initialize_type_output_observation

  • interface

    private module subroutine initialize_type_output_observation(self, input, coordinate, domain, dir_output, variable_name)

    Arguments

    Type IntentOptional Attributes Name
    class(type_output_observation), intent(inout) :: self
    type(type_input), intent(in) :: input
    type(type_dp_3d), intent(inout), pointer :: coordinate
    type(type_domain), intent(inout) :: domain
    character(len=*), intent(in) :: dir_output
    character(len=*), intent(in) :: variable_name

Source Code

    type :: type_output_observation
        character(:), allocatable :: name
        character(:), allocatable :: unit
        character(:), allocatable :: file_name
        integer(int32) :: num_unit

        character(:), allocatable :: type
        logical :: do_output
        integer(int32) :: num_observations
        type(type_dp_3d) :: coordinate
        !!
        type(holder_elements), allocatable :: elements(:)
        real(real64), allocatable :: xi(:)
        real(real64), allocatable :: eta(:)
        !!
        integer(int32), allocatable :: node_ids(:)
        procedure(abst_write_line), pointer, pass(self) :: write_line => null()
        procedure(abst_write_obeservation_header), pointer, pass(self) :: write_header => null()
        procedure(abst_get_values), pointer, pass(self) :: get_values => null()
    contains
        procedure, pass(self) :: initialize => initialize_type_output_observation
    end type type_output_observation