1 2 3 4 5 6 7
module IsFactor ( isFactor) where isFactor :: Integer -> Integer -> Bool isFactor m n | mod m n == 0 = True | otherwise = False