mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-15 18:52:13 +03:00
22 lines
559 B
Plaintext
22 lines
559 B
Plaintext
|
:t (join (zero : [inf][0]))
|
||
|
join (zero : [inf][0])
|
||
|
join (zero : [inf][0]) == []
|
||
|
:eval join (zero : [inf][0])
|
||
|
|
||
|
:t (join (zero : [1000][0]))
|
||
|
join (zero : [1000][0])
|
||
|
join (zero : [1000][0]) == []
|
||
|
:eval join (zero : [1000][0])
|
||
|
:pro (\(x:[1000][0]) -> join x == [])
|
||
|
|
||
|
:t (join (zero : [inf][0][32]))
|
||
|
join (zero : [inf][0][32])
|
||
|
join (zero : [inf][0][32]) == []
|
||
|
:eval join (zero : [inf][0][32])
|
||
|
|
||
|
:t (join (zero : [1000][0][32]))
|
||
|
join (zero : [1000][0][32])
|
||
|
join (zero : [1000][0][32]) == []
|
||
|
:eval join (zero : [1000][0][32])
|
||
|
:pro (\(x:[1000][0][32]) -> join x == [])
|