Write a haskell script for the following without using any built in functions. You must write functions from scratch in order to use them.

- Defined function substring :: String -> String -> Bool which determines whether a given first string is a substring of a second string