1111# ##############################################################################
1212
1313base_ring_type (:: Type{<:UniversalPolyRing{T}} ) where T = mpoly_ring_type (T)
14- base_ring (S:: UniversalPolyRing ) = S. mpoly_ring :: base_ring_type (S)
14+ base_ring (S:: UniversalPolyRing ) = S. base_ring :: base_ring_type (S)
1515
1616coefficient_ring_type (:: Type{<:UniversalPolyRing{T}} ) where T = parent_type (T)
1717coefficient_ring (S:: UniversalPolyRing ) = coefficient_ring (base_ring (S)):: coefficient_ring_type (S)
@@ -237,7 +237,7 @@ function _ensure_variables(S::UniversalPolyRing, v::Vector{<:VarName})
237237 end
238238 if ! isempty (added_symbols)
239239 new_symbols = vcat (current_symbols, added_symbols)
240- S. mpoly_ring = AbstractAlgebra. polynomial_ring_only (coefficient_ring (S), new_symbols; internal_ordering= internal_ordering (S), cached= false )
240+ S. base_ring = AbstractAlgebra. polynomial_ring_only (coefficient_ring (S), new_symbols; internal_ordering= internal_ordering (S), cached= false )
241241 end
242242 return idx
243243end
@@ -248,7 +248,7 @@ function gen(S::UniversalPolyRing, s::VarName)
248248 new_symbols = copy (symbols (S))
249249 push! (new_symbols, Symbol (s))
250250 i = length (new_symbols)
251- S. mpoly_ring = AbstractAlgebra. polynomial_ring_only (coefficient_ring (S), new_symbols; internal_ordering= internal_ordering (S), cached= false )
251+ S. base_ring = AbstractAlgebra. polynomial_ring_only (coefficient_ring (S), new_symbols; internal_ordering= internal_ordering (S), cached= false )
252252 end
253253 return @inbounds gen (S, i)
254254end
0 commit comments