Anonymous user
Damm algorithm: Difference between revisions
m
→{{header|Haskell}}
m (→static table: changed a word in the REXX section header.) |
|||
Line 627:
112949 is invalid</pre>
=={{header|Haskell}}==
<lang haskell>import Data.Char (
import Text.Printf (printf)
damm :: String -> Bool
damm = (==0) . foldl (\r
where
table =
|