-{-# OPTIONS_GHC -dcore-lint #-}
import Control.Category
-import GHC.HetMet.GArrow
-import GHC.HetMet.CodeTypes
-import GHC.HetMet.Private
import GArrowTikZ
+import GHC.HetMet.Private
+import GHC.HetMet.GArrow
import Demo
-main = tikz' $ \const merge -> foo const (pga_comp (pga_second pga_cancelr) merge)
+main = tikz demo