Реферат: Окружение и локализация корня нелинейной функции действительной переменной

/* else, compare fa and fb, choose the direction of search. The

right search case. */

if(fa<fb) {*a=x0; x0=(*b); *b+=d0; fa=f0; f0=fb; fb=(*fun)(*b);}

/* the left search case */

else if(fa>fb) {*b=x0; x0=(*a); *a-=d0; fb=f0; f0=fa; fa=(*fun)(*a);}

/* both sides search */

else {*a-=d0; *b+=d0; fa=(*fun(*a);fb=(*fun)(*b);}

}

}

/* if we get there, the search failed */

return(0);

}