Imaginary base numbers: Difference between revisions

Content added Content deleted
Line 1,324: Line 1,324:
if !inbase4(charvec)
if !inbase4(charvec)
throw("Constructor vector for QuaterImaginary ($charvec) is not base 2i")
throw("Constructor vector for QuaterImaginary ($charvec) is not base 2i")
elseif (i = length(something(findall(x -> x == '-', charvec), []))) > 0
elseif (i = length(findall(x -> x == '-', charvec))) > 0
isneg = (-1) ^ i == -1
isneg = (-1) ^ i == -1
end
end