mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-11-28 09:23:04 +03:00
5 lines
106 B
Plaintext
5 lines
106 B
Plaintext
nats : [32] -> [inf][32]
|
|
nats n = [n] # nats (n + 1)
|
|
|
|
check3 = (nats 0 @ 45 == 45) && (nats 45 @ 0 == 45)
|