mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-17 13:01:31 +03:00
60523d5986
The main user visible effect of this might be that sometime things on the Cryptol command line are instantiated in a slightly different way: we get `inf` sometimes when we got a finite example before. We could work around this if it is an issue, but I am not sure which behavior is more reasonable.
33 lines
925 B
Plaintext
33 lines
925 B
Plaintext
Loading module Cryptol
|
|
Loading module Cryptol
|
|
Loading module test03
|
|
module test03
|
|
import Cryptol
|
|
/* Not recursive */
|
|
test03::test : {a} (fin a, a >= width a) => [a]
|
|
test03::test = \{a} (fin a, a >= width a) ->
|
|
test03::foo a <> <>
|
|
where
|
|
/* Not recursive */
|
|
test03::foo : {b} (b >= width a, fin b) => [b]
|
|
test03::foo = \{b} (b >= width a, fin b) ->
|
|
Cryptol::demote a b <> <> <>
|
|
|
|
|
|
|
|
Loading module Cryptol
|
|
Loading module test03
|
|
module test03
|
|
import Cryptol
|
|
/* Not recursive */
|
|
test03::test : {a} (fin a, a >= width a) => [a]
|
|
test03::test = \{a} (fin a, a >= width a) ->
|
|
test03::foo
|
|
where
|
|
/* Not recursive */
|
|
test03::foo : [a]
|
|
test03::foo = Cryptol::demote a a <> <> <>
|
|
|
|
|
|
|