From: Claudio Sacerdoti Coen Date: Tue, 24 Apr 2007 15:06:19 +0000 (+0000) Subject: goal ==> focus X-Git-Tag: 0.4.95@7852~501 X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=8908aefdb1ef54d18b2b6ecee2ae30cbbf93f952;p=helm.git goal ==> focus --- diff --git a/matita/library_auto/auto/nat/div_and_mod.ma b/matita/library_auto/auto/nat/div_and_mod.ma index 9b9be7cf2..215f387af 100644 --- a/matita/library_auto/auto/nat/div_and_mod.ma +++ b/matita/library_auto/auto/nat/div_and_mod.ma @@ -261,9 +261,11 @@ qed. (* some properties of div and mod *) theorem div_times: \forall n,m:nat. ((S n)*m) / (S n) = m. intros. -apply (div_mod_spec_to_eq ((S n)*m) (S n) ? ? ? O). -goal 15. (* ?11 is closed with the following tactics *) -apply div_mod_spec_div_mod.auto.auto. +apply (div_mod_spec_to_eq ((S n)*m) (S n) ? ? ? O); +[2: apply div_mod_spec_div_mod.auto. +| skip +| auto +] (*unfold lt.apply le_S_S.apply le_O_n. apply div_mod_spec_times.*) qed.