Create DeclareSubstitute.hs