Levenshtein distance: Difference between revisions

Content deleted Content added
Giacomo (talk | contribs)
m →‎{{header|Haskell}}: make the types more general
Line 1,653:
 
=={{header|Haskell}}==
<lang haskell>levenshtein :: StringEq a => [a] -> String[a] -> Int
levenshtein s1 s2 = last $ foldl transform [0 .. length s1] s2
where