From 0632512e1348bae49e1fa9dd04fdeb3ed977a210 Mon Sep 17 00:00:00 2001 From: Jason Gross Date: Mon, 30 Jan 2017 19:18:11 -0500 Subject: Fix typos --- src/Util/Sumbool.v | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'src/Util/Sumbool.v') diff --git a/src/Util/Sumbool.v b/src/Util/Sumbool.v index a21777605..4008e67f6 100644 --- a/src/Util/Sumbool.v +++ b/src/Util/Sumbool.v @@ -57,9 +57,13 @@ Ltac induction_path_sumbool H := end. Ltac inversion_sumbool_step := match goal with - | [ H : _ = sumbool _ _ |- _ ] + | [ H : _ = left _ |- _ ] => induction_path_sumbool H - | [ H : sumbool _ _ = _ |- _ ] + | [ H : left _ = _ |- _ ] + => induction_path_sumbool H + | [ H : _ = right _ |- _ ] + => induction_path_sumbool H + | [ H : right _ = _ |- _ ] => induction_path_sumbool H end. Ltac inversion_sumbool := repeat inversion_sumbool_step. -- cgit v1.2.3