Replace firstorder application with more detailed proof

4eebe12b · Nikita Zyuzin · df39f778 · 4eebe12b
Commit 4eebe12b authored Oct 20, 2017 by Nikita Zyuzin
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

coq/Expressions.v coq/Expressions.v +1 -1

No files found.
--- a/coq/Expressions.v
+++ b/coq/Expressions.v
@@ -229,7 +229,7 @@ Proof.
    rewrite teropEq_refl; simpl.
    rewrite andb_true_iff.
    rewrite andb_true_iff.
-    firstorder.
+    split; [split; [eapply IHe1; eauto | eapply IHe2; eauto] | eapply IHe3; eauto].
  - andb_to_prop eq1;
      andb_to_prop eq2.
    rewrite mTypeEq_compat_eq in *; subst.