set_curve_source Function

private function set_curve_source(self, k, src) result(valid)

Set data source k (1: x, 2: y, 3: z); returns whether the trajectory has the data.

Arguments

Type IntentOptional Attributes Name
class(CurveArtist), intent(inout) :: self
integer, intent(in) :: k

the component (1: x, 2: y, 3: z)
type(DataSource), intent(in) :: src

its data source

Return Value logical


Calls

proc~~set_curve_source~~CallsGraph proc~set_curve_source set_curve_source verify_data verify_data proc~set_curve_source->verify_data

Called by

proc~~set_curve_source~~CalledByGraph proc~set_curve_source set_curve_source proc~set_x_data CurveArtist%set_x_data proc~set_x_data->proc~set_curve_source proc~set_y_data CurveArtist%set_y_data proc~set_y_data->proc~set_curve_source proc~set_z_data CurveArtist%set_z_data proc~set_z_data->proc~set_curve_source

Source Code

    logical function set_curve_source(self, k, src) result(valid)
        class(CurveArtist), intent(inout) :: self
        integer, intent(in) :: k                            !! the component (1: x, 2: y, 3: z)
        type(DataSource), intent(in) :: src                 !! its data source
        self%sources_(k) = src
        self%default_data = .false.
        self%seen_generation = -1
        valid = .true.
        if (associated(self%traj)) valid = self%traj%verify_data(self%sources_)
    end function set_curve_source