type_dp_vector_2d Derived Type

type, public :: type_dp_vector_2d


Components

Type Visibility Attributes Name Initial
real(kind=real64), public :: x
real(kind=real64), public :: y

Type-Bound Procedures

generic, public :: set => set_dp_vector_2d, set_dp_vector_2d_array

  • private subroutine set_dp_vector_2d(self, x_val, y_val)

    Arguments

    Type IntentOptional Attributes Name
    class(type_dp_vector_2d), intent(inout) :: self
    real(kind=real64), intent(in) :: x_val
    real(kind=real64), intent(in) :: y_val

  • private subroutine set_dp_vector_2d_array(self, value)

    Arguments

    Type IntentOptional Attributes Name
    class(type_dp_vector_2d), intent(inout) :: self
    real(kind=real64), intent(in) :: value(2)

procedure, private, pass(self) :: set_dp_vector_2d

  • private subroutine set_dp_vector_2d(self, x_val, y_val)

    Arguments

    Type IntentOptional Attributes Name
    class(type_dp_vector_2d), intent(inout) :: self
    real(kind=real64), intent(in) :: x_val
    real(kind=real64), intent(in) :: y_val

procedure, private, pass(self) :: set_dp_vector_2d_array

Source Code

    type :: type_dp_vector_2d
        real(real64) :: x
        real(real64) :: y
    contains
        procedure, private, pass(self) :: set_dp_vector_2d
        procedure, private, pass(self) :: set_dp_vector_2d_array
        generic, public :: set => set_dp_vector_2d, set_dp_vector_2d_array
    end type type_dp_vector_2d