Augmentation epsilon function

2017-01-13 17:59:30 +01:00 · 2017-01-13 17:59:30 +01:00 · 73500f4931
parent 0cf908ee13
commit 73500f4931
1 changed files with 1 additions and 0 deletions
--- a/GroupAlgebras.jl
+++ b/GroupAlgebras.jl
@ -112,6 +112,7 @@ end
 length(X::GroupAlgebraElement) = length(X.coefficients)
 size(X::GroupAlgebraElement) = size(X.coefficients)
 norm(X::GroupAlgebraElement, p=2) = norm(X.coefficients, p)
+ɛ(X::GroupAlgebraElement) = sum(X.coefficients)

 rationalize{T<:Integer, S<:Number}(::Type{T}, X::GroupAlgebraElement{S};
    tol=eps(S)) =