From 25be562c5436746df8d892449a9ff98755c37e9f Mon Sep 17 00:00:00 2001 From: Claudio Sacerdoti Coen Date: Wed, 12 Mar 2008 18:55:42 +0000 Subject: [PATCH] Problem solved (was: apply needed an argument to avoid a great slow down due to conversion of a meta-open and a meta-closed term). --- helm/software/matita/library/nat/bertrand.ma | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/helm/software/matita/library/nat/bertrand.ma b/helm/software/matita/library/nat/bertrand.ma index 3f613c8d7..b16eed5fa 100644 --- a/helm/software/matita/library/nat/bertrand.ma +++ b/helm/software/matita/library/nat/bertrand.ma @@ -722,8 +722,7 @@ apply (list_of_primes_to_bertrand ? (S(exp 2 8)) (sieve (S(exp 2 8)))) |apply leb_true_to_le.reflexivity ] |intros.apply (sieve_sound2 ? ? H3 H2) - |(* se tolgo l'argomento l'apply diventa lenta *) - apply (check_list2 (sieve (S(exp 2 8)))). + |apply check_list2. reflexivity ] qed. -- 2.39.2