bisect Function

private pure function bisect(x1, x2) result(x3)

Bisection step.

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: x1
real(kind=wp), intent(in) :: x2

Return Value real(kind=wp)

point half way between x1 and x2


Called by

proc~~bisect~~CalledByGraph proc~bisect bisect proc~anderson_bjorck_kroger anderson_bjorck_kroger_solver%anderson_bjorck_kroger proc~anderson_bjorck_kroger->proc~bisect proc~secant secant proc~anderson_bjorck_kroger->proc~secant proc~bdqrf bdqrf_solver%bdqrf proc~bdqrf->proc~bisect proc~bisection bisection_solver%bisection proc~bisection->proc~bisect proc~itp itp_solver%itp proc~itp->proc~bisect proc~modab modab_solver%ModAB proc~modab->proc~bisect proc~regula_falsi_step regula_falsi_step proc~modab->proc~regula_falsi_step proc~muller muller_solver%muller proc~muller->proc~bisect proc~parabolic parabolic proc~parabolic->proc~bisect proc~rbp rbp_solver%rbp proc~rbp->proc~bisect proc~rbp->proc~parabolic proc~rbp->proc~regula_falsi_step proc~regula_falsi_step->proc~bisect proc~ridders ridders_solver%ridders proc~ridders->proc~bisect proc~secant->proc~bisect proc~zhang zhang_solver%zhang proc~zhang->proc~bisect proc~zhang->proc~secant proc~anderson_bjorck anderson_bjorck_solver%anderson_bjorck proc~anderson_bjorck->proc~secant proc~illinois illinois_solver%illinois proc~illinois->proc~regula_falsi_step proc~pegasus pegasus_solver%pegasus proc~pegasus->proc~secant proc~regula_falsi regula_falsi_solver%regula_falsi proc~regula_falsi->proc~regula_falsi_step

Source Code

    pure function bisect(x1,x2) result(x3)

    implicit none

    real(wp),intent(in) :: x1,x2
    real(wp) :: x3 !! point half way between x1 and x2

    x3 = (x1 + x2) / 2.0_wp

    end function bisect