From c1d4048a12441df2977965b186bae9dcd32d4129 Mon Sep 17 00:00:00 2001 From: Pierre Letouzey Date: Tue, 7 Mar 2017 09:16:16 +0100 Subject: Decimal: proofs that conversions from/to nat,N,Z are bijections --- theories/PArith/BinPosDef.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'theories/PArith') diff --git a/theories/PArith/BinPosDef.v b/theories/PArith/BinPosDef.v index 85c401cf4..a77c26e5a 100644 --- a/theories/PArith/BinPosDef.v +++ b/theories/PArith/BinPosDef.v @@ -608,7 +608,7 @@ Fixpoint to_little_uint p := | p~0 => Decimal.Little.double (to_little_uint p) end. -Definition to_uint p := Decimal.rev (to_little_uint p) Decimal.Nil. +Definition to_uint p := Decimal.rev (to_little_uint p). Definition to_int n := Decimal.Pos (to_uint n). -- cgit v1.2.3