]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/lib/arithmetics/binomial.ma
Minor changes to make the script more robust to strategy changes.
[helm.git] / matita / matita / lib / arithmetics / binomial.ma
index c3834c8d847b8d001f48ef19217b9d121e1a2944..6b4d3ff52764ff41ee26453c9c26c6206c2ab7b3 100644 (file)
@@ -103,7 +103,7 @@ theorem binomial_law:∀a,b,n.
 >bigop_Strue in ⊢ (??(??%)?); // <associative_plus 
 <commutative_plus in ⊢ (??(? % ?) ?); >associative_plus @eq_f2
   [<minus_n_n >bc_n_n >bc_n_n normalize //
-  |>bigop_0 >associative_plus >commutative_plus in ⊢ (??(??%)?);
+  |>(bigop_0 ??? plusA)  >associative_plus >commutative_plus in ⊢ (??(??%)?);
    <associative_plus >(bigop_0 n ?? plusA) @eq_f2 
     [cut (∀a,b. plus a b = plusAC a b) [//] #Hplus >Hplus 
      >(bigop_op n ??? plusAC) @same_bigop //