kalmar
/
GroupRings.jl
mirror of https://github.com/kalmarek/GroupRings.jl.git
1
0
Fork 0
Code Issues Releases Wiki Activity

rationalize

This commit is contained in:
kalmar 2017-05-16 18:45:56 +02:00
parent fc837ff481
commit d13a8b27df
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/GroupAlgebras.jl
View File

@ -185,14 +185,15 @@ norm(X::GroupRingElem, p=2) = norm(X.coeffs, p)
augmentation(X::GroupRingElem) = sum(X.coeffs)
end
function rationalize{T<:Integer, S<:Number}(
::Type{T}, X::GroupAlgebraElement{S}; tol=eps(S))
v = rationalize(T, X.coefficients, tol=tol)
return GroupAlgebraElement(v, X.product_matrix)
function rationalize{T<:Integer, S<:Number}(::Type{T}, X::GroupRingElem{S};
tol=eps(S))
v = rationalize(T, X.coeffs, tol=tol)
return GroupRingElem(v, parent(X))
end
end
end
end