kalmar/PropertyT.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/PropertyT.jl.git synced 2024-11-23 16:20:28 +01:00
Code Issues Releases Wiki Activity

better specialised groupring_square

Browse Source
This commit is contained in:
kalmar 2017-07-05 12:28:29 +02:00
parent 6b9d2b5d28
commit dad6576365
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/CheckSolution.jl
View File

@ -27,8 +27,8 @@ function EOI{T<:Number}(Δ::GroupRingElem{T}, λ::T)
return Δ*Δ - λ*Δ return Δ*Δ - λ*Δ
end end
function groupring_square(vect, elt) function groupring_square(vect::Vector, elt::GroupRingElem)
zzz = zeros(eltype(vect), elt.coeffs) zzz = zeros(eltype(vect), length(elt.coeffs))
zzz[1:length(vect)] = vect zzz[1:length(vect)] = vect
return GroupRings.mul(zzz, zzz, parent(elt).pm) return GroupRings.mul(zzz, zzz, parent(elt).pm)
end end