[Template-haskell] Defining a function and using it in a splice within the same module