max1 :: Int-> Int-> Int
max1 x y
    = if x>=y then x else y