1# Markdown
 2
 3Except with more magic added.
 4
 5> isPrefixOf              :: (Eq a) => [a] -> [a] -> Bool
 6> isPrefixOf [] _         =  True
 7> isPrefixOf _  []        =  False
 8> isPrefixOf (x:xs) (y:ys)=  x == y && isPrefixOf xs ys
 9
10And Haskell.  A lot of Haskell.