Sign in
opensecura
/
3p
/
nicta
/
cogent
/
9708370d31ac8e841c526b6f5fc0f885fd15fea3
/
.
/
minigent
/
examples
/
1_poly
/
03-drop
/
expected.out
blob: b0349807bcb1c4f820818fa8f5e2a3103ae2763c [
file
]
badTest
:
[
x
]
.
x
->
Unit
;
drop
:
[
x
]
Drop
x
.
x
->
Unit
;
drop x
=
Unit
:
Unit
;
test
:
Bool
->
Unit
;
test x
=
(
drop
[
Bool
]
:
Bool
->
Unit
)
(
x
:
Bool
)
:
Unit
;