remove broken divexact

This commit is contained in:
kalmarek 2018-08-13 20:54:15 +02:00
parent e472a42d09
commit 68c6d116a9
1 changed files with 0 additions and 14 deletions

View File

@ -445,20 +445,6 @@ function *{T<:Number, S<:Number}(X::GroupRingElem{T}, Y::GroupRingElem{S}, check
return result
end
function divexact{T}(X::GroupRingElem{T}, Y::GroupRingElem{T})
if length(Y) != 1
throw("Can not divide by a non-primitive element: $(Y)!")
else
idx = findfirst(Y)
c = Y[idx]
c != 0 || throw("Can not invert: $c not found in $Y")
g = parent(Y).basis[idx]
return X*1//c*parent(Y)(inv(g))
end
end
###############################################################################
#
# *-involution