Advertisement
Guest User

Untitled

a guest
Nov 22nd, 2014
145
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.31 KB | None | 0 0
  1. xll := BinSearch(f, LEFT_BOUND_F, BinSearch(df, LEFT_BOUND_DF, x1));
  2. xrr := BinSearch(f, BinSearch(df, x2, RIGHT_BOUND_DF), RIGHT_BOUND_F);
  3.  
  4. p := -xll - xrr;
  5. q := xll * xrr;
  6.  
  7. x3 := (p - a) / 2 + sqrt(sqr((a - p) / 2) + q - b + p * (a - p));
  8. x4 := (p - a) / 2 - sqrt(sqr((a - p) / 2) + q - b + p * (a - p));
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement