kalmar/GroupRings.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/GroupRings.jl.git synced 2024-12-28 18:50:29 +01:00
Code Issues Releases Wiki Activity

add supp, rename augmentation -> aug

Browse Source
This commit is contained in:
kalmarek 2018-08-13 19:27:43 +02:00
parent 9f6b7f4236
commit 2318128f6d
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/GroupRings.jl
View File

@ -66,7 +66,7 @@ mutable struct GroupRingElem{T, A<:AbstractVector, GR<:GroupRing} <: RingElem
end
end
export GroupRing, GroupRingElem, complete!, create_pm, star
export GroupRing, GroupRingElem, complete!, create_pm, star, aug, supp
###############################################################################
#
@ -509,7 +509,9 @@ length(X::GroupRingElem) = countnz(X.coeffs)
norm(X::GroupRingElem, p=2) = norm(X.coeffs, p)
augmentation(X::GroupRingElem) = sum(X.coeffs)
aug(X::GroupRingElem) = sum(X.coeffs)
supp(X::GroupRingElem) = parent(X).basis[findn(X.coeffs)]
function rationalize{T<:Integer, S<:Integer}(::Type{T}, X::GroupRingElem{S})
return convert(Rational{T}, X)