co je na tomto zle?
-- 1-09.hs
-- ****************************************
-- Vloanie funkcie: "evenprod 3 4"
prod :: Int->Int->Int
prod x y = x * y
event :: Int -> Bool
event x | x `rem` 2 == 0 = True
| otherwise = False
evenprod :: Int -> Int -> Bool
evenprod = prod . event
9. Definujte funkciu evenprod, ktorá zistí či súčin dvoch argumentov je
párny.(Návod:Definujte funkciu prod pre výpočet súčinu argumentov,
a predikát even pre zistenie, či argument je párny. Potom defnujte
funkciu evenprod ako kompozíciu predchádzajúcich dvoch funkcií.)