Eban numbers: Difference between revisions
Content added Content deleted
Line 657:
{{trans|Julia}}
<lang haskell>{-# LANGUAGE NumericUnderscores #-}
isEban :: Int -> Bool
isEban n = all (
where
(b, r1) = n `quotRem` (10 ^ 9)
|
Line 657:
{{trans|Julia}}
<lang haskell>{-# LANGUAGE NumericUnderscores #-}
isEban :: Int -> Bool
isEban n = all (
where
(b, r1) = n `quotRem` (10 ^ 9)
|