RosettaCodeData/Task/Test-integerness/Haskell/test-integerness-5.hs

3 lines
139 B
Haskell
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
instance (Eq a, Num a, ContainsInteger a) => ContainsInteger (Complex a) where
isInteger z = isInteger (realPart z) && (imagPart z == 0)