schema :: QuasiQuoter
schema = QuasiQuoter { quoteExp = quoteSchemaExp
                     , quotePat = undefined
                     , quoteType = undefined
                     , quoteDec = undefined
                     }
schema :: QuasiQuoter
schema = QuasiQuoter { quoteExp = quoteSchemaExp
                     , quotePat = undefined
                     , quoteType = undefined
                     , quoteDec = undefined
                     }
schema = QuasiQuoter { quoteExp = quoteSchemaExp
                     , quotePat = undefined
                     , quoteType = undefined
                     , quoteDec = undefined
                     }