aboutsummaryrefslogtreecommitdiff
path: root/examples/ext_codomain.makkai
blob: da0ddae6eb1a824fcde06c9c914e36139daad3f1 (plain)
1
2
3
4
5
let signature S = (x : Nat) -> theory { G :: Set }

let instance s :: S = for (x : Nat), { .G = (Nat :: Set) }

let set NatAgain = set-of((s 42) .G)