let arr = stdin.ReadLine().Split(' ') |> Array.map(float) if arr.[0] * arr.[3] < arr.[1] * arr.[2] then arr.[0] * arr.[3] / arr.[1] + arr.[3] else arr.[1] * arr.[2] / arr.[0] + arr.[2] |> printfn "%f"