src/HOL/Computational_Algebra/Polynomial_Factorial.thy
changeset 80084 173548e4d5d0
parent 76121 f58ad163bb75
--- a/src/HOL/Computational_Algebra/Polynomial_Factorial.thy	Thu Apr 04 11:40:45 2024 +0200
+++ b/src/HOL/Computational_Algebra/Polynomial_Factorial.thy	Thu Apr 04 15:29:41 2024 +0200
@@ -632,6 +632,8 @@
                     semiring_gcd_mult_normalize}") euclidean_ring_gcd
   by (rule euclidean_ring_gcd_class.intro, rule factorial_euclidean_semiring_gcdI) standard
 
+instance poly :: ("{field, normalization_euclidean_semiring, factorial_ring_gcd,
+                    semiring_gcd_mult_normalize}") factorial_semiring_multiplicative ..
   
 subsection \<open>Polynomial GCD\<close>