Skip to content

Commit

Permalink
format files
Browse files Browse the repository at this point in the history
  • Loading branch information
felix-roehrich committed Dec 7, 2024
1 parent 5d10592 commit fa3c59d
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 5 deletions.
8 changes: 4 additions & 4 deletions experimental/LieAlgebras/src/CartanMatrix.jl
Original file line number Diff line number Diff line change
Expand Up @@ -182,7 +182,7 @@ julia> cartan_symmetrizer(cartan_matrix(:B, 2))
"""
function cartan_symmetrizer(gcm::ZZMatrix; check::Bool=true)
ct, ord = cartan_type_with_ordering(gcm; check=check)

i = 1
d = ones(ZZRingElem, length(ord))
for (fam, rk) in ct
Expand All @@ -195,13 +195,13 @@ function cartan_symmetrizer(gcm::ZZMatrix; check::Bool=true)
i += rk
elseif fam == :C
i += rk
d[i-1] = 2
d[i - 1] = 2
elseif fam == :D
i += rk
elseif fam == :E
i += rk
elseif fam == :F
d[i] = d[i+1] = 2
d[i] = d[i + 1] = 2
i += rk
elseif fam == :G
d[i] = 3
Expand All @@ -210,7 +210,7 @@ function cartan_symmetrizer(gcm::ZZMatrix; check::Bool=true)
error("unreachable")
end
end

return invpermute!(d, ord)
end

Expand Down
2 changes: 1 addition & 1 deletion experimental/LieAlgebras/test/CartanMatrix-test.jl
Original file line number Diff line number Diff line change
Expand Up @@ -126,7 +126,7 @@
swap_cols!(cm, i, j)
end
end

bil = cartan_bilinear_form(cm)
if !is_symmetric(bil)
println(cm)
Expand Down

0 comments on commit fa3c59d

Please sign in to comment.