diff options
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. |