open System let ri () = stdin.ReadLine() |> int let ria () = stdin.ReadLine().Split() |> Array.map int type Sol() = member this.Solve() = let [|A1; B1; A2; B2; A3; B3|] = ria() let tot = (A1 + A2 + A3) % 2 if tot = 0 then printfn ":-)" else printfn ":-(" () let mySol = new Sol() mySol.Solve()