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

early unique in basis generation

Browse Source
This commit is contained in:
kalmar 2017-01-13 18:05:29 +01:00
parent aa184ebb29
commit bbd3027f95
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
property(T).jl
View File

@ -12,9 +12,9 @@ function products{T<:Real}(S1::Array{Array{T,2},1}, S2::Array{Array{T,2},1})
end
function generate_B₂_and_B₄(identity, S₁)
S₂ = products(S₁, S₁);
S₃ = products(S₁, S₂);
S₄ = products(S₂, S₂);
S₂ = unique(products(S₁, S₁));
S₃ = unique(products(S₁, S₂));
S₄ = unique(products(S₂, S₂));
B₂ = unique(vcat([identity],S₁,S₂));
B₄ = unique(vcat(B₂, S₃, S₄));