Skip to content

Commit 6aee859

Browse files
committed
back to no conversion...
1 parent 72ae82d commit 6aee859

1 file changed

Lines changed: 3 additions & 4 deletions

File tree

src/ElementaryPDESolutions.jl

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -513,7 +513,6 @@ function solve_laplace(Q::Polynomial{N, T}) where {N, T}
513513
@assert is_homogeneous(Q) "source term `Q` must be a homogeneous polynomial"
514514
n = degree(Q)
515515
γ = (k, p) -> 2 * (k + 1) * (2k + 2p + N) # γₖᵖ
516-
# Note: convert to big for the intermediate computations, then back to T at the end
517516
cₖ = big(1) // γ(0, n) # c₀
518517
P = cₖ * multiply_by_r(deepcopy(Q), 2)
519518
ΔᵏQ = deepcopy(Q)
@@ -524,7 +523,7 @@ function solve_laplace(Q::Polynomial{N, T}) where {N, T}
524523
ΔP = cₖ * (multiply_by_r(ΔᵏQ, 2k + 2))
525524
P = P + ΔP
526525
end
527-
return convert_coefs(P, T)
526+
return P
528527
end
529528

530529
"""
@@ -563,7 +562,7 @@ function solve_anisotropic_laplace(A::AbstractMatrix{T}, Q::Polynomial{N, T}) wh
563562
ΔP = cₖ * (multiply_by_anisotropic_r(A, ΔᵏQ, 2k + 2))
564563
P = P + ΔP
565564
end
566-
return convert_coefs(P, T)
565+
return P
567566
end
568567

569568
"""
@@ -633,7 +632,7 @@ function solve_anisotropic_advect(β::AbstractVector, Q::Polynomial{N, T}) where
633632
betagradellq = sum(β[i] * gradient(betagradellq)[i] for i in 1:N)
634633
P = P + cₗ * multiply_by_anisotropic_β_r(β, betagradellq, l + 1)
635634
end
636-
return (1 / β2) * convert_coefs(P, T)
635+
return (1 / β2) * P
637636
end
638637

639638
"""

0 commit comments

Comments
 (0)