make sum return explicit

This commit is contained in:
Thomas (Tom) C. Gorordo 2024-09-03 17:17:12 -07:00
parent f1fcb1876d
commit d2c6e12c13
Signed by: tgorordo
GPG key ID: 0CBED22BB0D94490

View file

@ -454,7 +454,7 @@ function compute9jseries(a, b, c, d, e, f, g, h, j)
I2 = min(h + d, b + f, a + j) I2 = min(h + d, b + f, a + j)
krange = I1:I2 krange = I1:I2
sum(krange) do k return sum(krange) do k
p = iseven(2k) ? big(2k + 1) : -big(2k + 1) p = iseven(2k) ? big(2k + 1) : -big(2k + 1)
b₁ = let (m₁, m₂, m₃, m₄, m₅, m₆) = (a, b, c, f, j, k) b₁ = let (m₁, m₂, m₃, m₄, m₅, m₆) = (a, b, c, f, j, k)