mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-11 07:00:49 +03:00
15 lines
308 B
Plaintext
15 lines
308 B
Plaintext
Loading module Cryptol
|
|
Loading module Cryptol
|
|
Loading module Main
|
|
Constraint Synonyms
|
|
===================
|
|
|
|
Public
|
|
------
|
|
|
|
type constraint (<=>) i j = (i <= j, i >= j)
|
|
type constraint Both p q = (p, q)
|
|
type constraint Fin2 i j = Both (fin i) (fin j)
|
|
type constraint T n = (fin n, n >= 1)
|
|
|