7 lines
148 B
Haskell
7 lines
148 B
Haskell
|
import Text.PhoneticCode.Soundex
|
||
|
|
|
||
|
|
main :: IO ()
|
||
|
|
main =
|
||
|
|
mapM_ print $
|
||
|
|
((,) <*> soundexSimple) <$> ["Soundex", "Example", "Sownteks", "Ekzampul"]
|