simplified proofs
authorhaftmann
Fri, 22 Jan 2010 13:39:00 +0100
changeset 34934e1b8f2736404
parent 34933 aa5d27f1d9b9
child 34945 dcd0fa5cc6d3
child 34949 807f6ce0273d
simplified proofs
src/HOL/Number_Theory/UniqueFactorization.thy
     1.1 --- a/src/HOL/Number_Theory/UniqueFactorization.thy	Fri Jan 22 13:38:40 2010 +0100
     1.2 +++ b/src/HOL/Number_Theory/UniqueFactorization.thy	Fri Jan 22 13:39:00 2010 +0100
     1.3 @@ -1,5 +1,4 @@
     1.4  (*  Title:      UniqueFactorization.thy
     1.5 -    ID:         
     1.6      Author:     Jeremy Avigad
     1.7  
     1.8      
     1.9 @@ -388,7 +387,7 @@
    1.10    apply (subgoal_tac "multiset_prime_factorization n = Abs_multiset
    1.11        f")
    1.12    apply (unfold prime_factors_nat_def multiplicity_nat_def)
    1.13 -  apply (simp add: set_of_def count_def Abs_multiset_inverse multiset_def)
    1.14 +  apply (simp add: set_of_def Abs_multiset_inverse multiset_def)
    1.15    apply (unfold multiset_prime_factorization_def)
    1.16    apply (subgoal_tac "n > 0")
    1.17    prefer 2
    1.18 @@ -401,7 +400,7 @@
    1.19    apply force
    1.20    apply force
    1.21    apply force
    1.22 -  unfolding set_of_def count_def msetprod_def
    1.23 +  unfolding set_of_def msetprod_def
    1.24    apply (subgoal_tac "f : multiset")
    1.25    apply (auto simp only: Abs_multiset_inverse)
    1.26    unfolding multiset_def apply force