# Markdown

Except with more magic added.

> isPrefixOf              :: (Eq a) => [a] -> [a] -> Bool
> isPrefixOf [] _         =  True
> isPrefixOf _  []        =  False
> isPrefixOf (x:xs) (y:ys)=  x == y && isPrefixOf xs ys

And Haskell.  A lot of Haskell.