1
0
mirror of https://github.com/kalmarek/Groups.jl.git synced 2024-12-26 02:20:30 +01:00

remove unnecessary ::Bools

This commit is contained in:
kalmar 2017-05-12 19:46:08 +02:00
parent 2e6cd65d39
commit 9dafd3c09c

View File

@ -177,7 +177,7 @@ function r_multiply!(W::GWord, x; reduced::Bool=true)
return W return W
end end
function l_multiply!(W::GWord, x; reduced::Bool=true) function l_multiply!(W::GWord, x; reduced=true)
if length(x) > 0 if length(x) > 0
unshift!(W.symbols, reverse(x)...) unshift!(W.symbols, reverse(x)...)
end end
@ -187,9 +187,9 @@ function l_multiply!(W::GWord, x; reduced::Bool=true)
return W return W
end end
r_multiply(W::GWord, x; reduced::Bool=true) = r_multiply(W::GWord, x; reduced=true) =
r_multiply!(deepcopy(W),x, reduced=reduced) r_multiply!(deepcopy(W),x, reduced=reduced)
l_multiply(W::GWord, x; reduced::Bool=true) = l_multiply(W::GWord, x; reduced=true) =
l_multiply!(deepcopy(W),x, reduced=reduced) l_multiply!(deepcopy(W),x, reduced=reduced)
(*)(W::GWord, Z::GWord) = r_multiply(W, Z.symbols) (*)(W::GWord, Z::GWord) = r_multiply(W, Z.symbols)