Sign in
opensecura
/
3p
/
nicta
/
cogent
/
refs/heads/master
/
.
/
minigent
/
examples
/
6_recursive
/
12-alpha-equivalent-recpars
/
in.minigent
blob: 6938013902db23fc41ae3f0cf602e5b2ff79b4ae [
file
] [
edit
]
f
:
rec t
{
l
:
<
Zero
Unit
|
Succ
t
>
}
->
rec k
{
l
:
<
Zero
Unit
|
Succ
k
>
};
f peano
=
peano
;