24 lines
608 B
Text
24 lines
608 B
Text
g x y =?= f z
|
|
fail
|
|
g x y =?= f z
|
|
g x y =?= f z
|
|
success
|
|
unification hints:
|
|
(toy.g, toy.f) g #1 #0 =?= f z {}
|
|
n + 1 =?= succ n
|
|
fail
|
|
n + 1 =?= succ n
|
|
n + 1 =?= succ n
|
|
success
|
|
unification hints:
|
|
(add, nat.succ) #4 + 1 =?= succ #3 {#4 =?= #3}
|
|
(toy.g, toy.f) toy.g #1 #0 =?= toy.f toy.z {}
|
|
Canonical.carrier A_canonical =?= A
|
|
fail
|
|
Canonical.carrier A_canonical =?= A
|
|
Canonical.carrier A_canonical =?= A
|
|
success
|
|
unification hints:
|
|
(add, nat.succ) #4 + 1 =?= succ #3 {#4 =?= #3}
|
|
(toy.g, toy.f) toy.g #1 #0 =?= toy.f toy.z {}
|
|
(canonical.Canonical.carrier, canonical.A) Canonical.carrier #0 =?= A {#0 =?= A_canonical}
|