Anonymous user
Levenshtein distance: Difference between revisions
m
→Implementation 2: remove extra newlines
(→{{header|Haskell}}: add alternative implementation) |
m (→Implementation 2: remove extra newlines) |
||
Line 2,354:
===Implementation 2===
<lang haskell>levenshtein :: Eq a => [a] -> [a] -> Int
levenshtein s1 [] = length s1
levenshtein [] s2 = length s2
Line 2,366 ⟶ 2,365:
main :: IO ()
main = print (levenshtein "kitten" "sitting")</lang>
{{Out}}
<pre>3</pre>
| |||