kalmar/GroupRings.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/GroupRings.jl.git synced 2024-07-30 06:05:31 +02:00
Code Issues Releases Wiki Activity

Revert "reparametrise parent call overloads"

Browse Source 
This reverts commit 4b86d5d075.
This commit is contained in:
kalmar 2017-06-06 22:25:01 +02:00
parent a726462488
commit 962a9e6e73
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/GroupRings.jl
View File

@ -112,23 +112,23 @@ end
# #
############################################################################### ###############################################################################
function {Gr,T}(RG::GroupRing{Gr,T})(S::Type=Int) function (RG::GroupRing)(T::Type=Int)
isdefined(RG, :basis) || throw("Complete the definition of GroupRing first") isdefined(RG, :basis) || throw("Complete the definition of GroupRing first")
return GroupRingElem(spzeros(S,length(RG.basis)), RG) return GroupRingElem(spzeros(T,length(RG.basis)), RG)
end end
function {Gr,T}(RG::GroupRing{Gr,T})(g::GroupElem, S::Type=Int) function (RG::GroupRing)(g::GroupElem, T::Type=Int)
g = try g = try
RG.group(g) RG.group(g)
catch catch
throw("Can't coerce $g to the underlying group of $RG") throw("Can't coerce $g to the underlying group of $RG")
end end
result = RG(S) result = RG(T)
result[g] = one(S) result[g] = one(T)
return result return result
end end
function {Gr,T}(RG::GroupRing{Gr,T})(x::AbstractVector) function (RG::GroupRing)(x::AbstractVector)
length(x) == length(RG.basis) || throw("Can not coerce to $RG: lengths differ") length(x) == length(RG.basis) || throw("Can not coerce to $RG: lengths differ")
result = RG(eltype(x)) result = RG(eltype(x))
result.coeffs = x result.coeffs = x