diff options
| author |  Jasper Hugunin <jasperh@cs.washington.edu> | 2018-06-29 17:31:25 -0700 |
|---|---|---|
| committer |  Jason Gross <jasongross9@gmail.com> | 2018-07-02 00:30:17 -0400 |
| commit | 6a8f392badaf7b736651d8349a4eaced47fa2d5e (patch) | |
| tree | dcc5dcb9458981ee20c519d696afa1eee21fd5dc /src/Arithmetic | |
| parent | 82d13637b9ebe6b0562200427e0533f10688bbcc (diff) | |
Make all parameters implicit
Diffstat (limited to 'src/Arithmetic')
| -rw-r--r-- | src/Arithmetic/BarrettReduction/RidiculousFish.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Arithmetic/BarrettReduction/RidiculousFish.v b/src/Arithmetic/BarrettReduction/RidiculousFish.v index e3f00d7a9..908e098b8 100644 --- a/src/Arithmetic/BarrettReduction/RidiculousFish.v +++ b/src/Arithmetic/BarrettReduction/RidiculousFish.v @@ -32,7 +32,7 @@ Definition wrap (bits val : Z) : Z := val mod 2^bits. (** A [word] is a C data type with a specified bit size. *) Inductive word (bits : Z) := -| Word : Z -> word bits. +| Word (v : Z). Definition to_Z {bits : Z} (a : word bits) : Z := match a with Word v => v end. |