Sign in
opensecura
/
3p
/
nicta
/
cogent
/
refs/heads/master
/
.
/
minigent
/
examples
/
1_poly
/
01-identity
/
expected.out
blob: d304fd826c3902f3c354f4883fefeeb404e101b3 [
file
] [
edit
]
id
:
[
x
]
.
x
->
x
;
id x
=
x
:
x
;
main
:
Unit
->
U8
;
main x
=
(
test
[]
:
U8
->
U8
)
(
3
:
U8
)
:
U8
;
test
:
U8
->
U8
;
test x
=
(
id
[
U8
]
:
U8
->
U8
)
(
x
:
U8
)
:
U8
;