update Subroutine

public subroutine update(self, loc)

Type Bound

stat_type

Arguments

Type IntentOptional Attributes Name
class(stat_type), intent(inout) :: self
real(kind=rk), intent(in) :: loc(:,:)

Contents

Source Code

update

Source Code

    subroutine update(self, loc)
        class(stat_type), intent(inout) :: self
        real(rk), intent(in) :: loc(:, :)

        self%loc_min = minval(loc, dim=2)
        self%loc_max = maxval(loc, dim=2)

    end subroutine update