Anonymous user
Levenshtein distance: Difference between revisions
m
→{{header|Haskell}}: make the types more general
m (→{{header|Haskell}}: make the types more general) |
|||
Line 1,653:
=={{header|Haskell}}==
<lang haskell>levenshtein ::
levenshtein s1 s2 = last $ foldl transform [0 .. length s1] s2
where
|