model_pivot Function

private pure function model_pivot(self) result(p)

The model's pivot, in its own coordinates (see set_model_pivot).

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(Model),	intent(in)			::	self

Return Value real(kind=wp), (3)

Source Code

    pure function model_pivot(self) result(p)
        class(Model), intent(in) :: self
        real(wp) :: p(3)
        p = self%pivot_
    end function model_pivot