Cross Reference: pass_put-untaken-nonlinear.cogent
xref
: /
seL4-camkes-master
/
tools
/
cogent
/
cogent
/
tests
/
tests
/
take-put
/
pass_put-untaken-nonlinear.cogent
Home
History
Annotate
Line#
Navigate
Raw
Download
only in
/seL4-camkes-master/tools/cogent/cogent/tests/tests/take-put/
1
f : {f1 : U8} -> {f1 : U8}
2
f r = let r = r{f1=3}
3
and r = r{f1=4}
4
in r
5