mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-09-20 02:17:27 +03:00
34 lines
619 B
Plaintext
34 lines
619 B
Plaintext
Loading module Cryptol
|
|
Loading module Cryptol
|
|
Loading module test03
|
|
module test03
|
|
|
|
/* Not recursive */
|
|
test03::test : {a} (fin a, a >= width a) => [a]
|
|
test03::test =
|
|
\{a} (fin a, a >= width a) ->
|
|
foo [a] <>
|
|
where
|
|
/* Not recursive */
|
|
foo : {b} (Literal a b) => b
|
|
foo = \{b} (Literal a b) -> Cryptol::number a b <>
|
|
|
|
|
|
|
|
Loading module Cryptol
|
|
Loading module test03
|
|
module test03
|
|
|
|
/* Not recursive */
|
|
test03::test : {a} (fin a, a >= width a) => [a]
|
|
test03::test =
|
|
\{a} (fin a, a >= width a) ->
|
|
foo
|
|
where
|
|
/* Not recursive */
|
|
foo : [a]
|
|
foo = Cryptol::number a [a] <>
|
|
|
|
|
|
|