mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-18 05:21:57 +03:00
40 lines
873 B
Plaintext
40 lines
873 B
Plaintext
|
Loading module Cryptol
|
||
|
|
Loading module Cryptol
|
||
|
|
Loading module test06
|
||
|
|
module test06
|
||
|
|
import Cryptol
|
||
|
|
/* Not recursive */
|
||
|
|
test06::test : {a} a -> a
|
||
|
|
test06::test = \{a} (a : a) ->
|
||
|
|
bar
|
||
|
|
where
|
||
|
|
/* Not recursive */
|
||
|
|
foo : a
|
||
|
|
foo = zero a
|
||
|
|
|
||
|
|
/* Not recursive */
|
||
|
|
bar : a
|
||
|
|
bar = foo
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
Loading module Cryptol
|
||
|
|
Loading module test06
|
||
|
|
module test06
|
||
|
|
import Cryptol
|
||
|
|
/* Not recursive */
|
||
|
|
test06::test : {a} a -> a
|
||
|
|
test06::test = \{a} (a : a) ->
|
||
|
|
bar
|
||
|
|
where
|
||
|
|
/* Not recursive */
|
||
|
|
foo : a
|
||
|
|
foo = zero a
|
||
|
|
|
||
|
|
/* Not recursive */
|
||
|
|
bar : a
|
||
|
|
bar = foo
|
||
|
|
|
||
|
|
|
||
|
|
|