import Data.Bits (xor)
import Data.Bool (bool)

main :: IO ()
main = do
  [a1, b1, a2, b2, a3, b3] <- map read . words <$> getLine
  let ans = solve a1 b1 a2 b2 a3 b3
  putStrLn $ bool ":-(" ":-)" ans

solve :: Integral a => a -> a -> a -> a -> a -> a -> Bool
solve a1 _ a2 _ a3 _ = foldl1 xor . map even $ [a1, a2, a3]