module A where

import Language.Haskell.TH

import F


kaas :: Exp
kaas = LitE (StringL "kaas")