added quadratic_equatiion solving algorithm in ocaml