open System let (A, B) = let t = Console.ReadLine().ToCharArray() |> Array.map int t.[0], t.[1] min A B |> (*) 2 |> printfn "%i"