projects
/
coq-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
d832b6e660dc2db17838ecacdb8f6bb7d408d43d
[coq-hetmet.git]
/
examples
/
DemoMain.hs
1
{-# OPTIONS_GHC -dcore-lint #-}
2
import Control.Category
3
import GHC.HetMet.GArrow
4
import GHC.HetMet.CodeTypes
5
import GHC.HetMet.Private
6
import GArrowTikZ
7
import Demo
8
9
main = tikz' $ \const merge -> foo const (pga_comp (pga_second pga_cancelr) merge)