From b9c708c7887a6abf8243c55a3d32f0d0305eb794 Mon Sep 17 00:00:00 2001 From: jadep Date: Thu, 21 Jul 2016 18:06:00 -0400 Subject: Fix 8.4{pl1,pl2} builds --- src/ModularArithmetic/ModularBaseSystemOpt.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/ModularArithmetic/ModularBaseSystemOpt.v b/src/ModularArithmetic/ModularBaseSystemOpt.v index 33b2d7f2d..7c171faf7 100644 --- a/src/ModularArithmetic/ModularBaseSystemOpt.v +++ b/src/ModularArithmetic/ModularBaseSystemOpt.v @@ -132,7 +132,7 @@ Section Carries. change @nth_default with @nth_default_opt in *. change @set_nth with @set_nth_opt in *. lazymatch goal with - | [ |- _ = _ (if ?br then ?c else ?d) ] + | [ |- _ = ?f (if ?br then ?c else ?d) ] => let x := fresh "x" in let y := fresh "y" in evar (x:digits); evar (y:digits); transitivity (if br then x else y); subst x; subst y end. 2:cbv zeta. -- cgit v1.2.3