Skip to content

Commit b57a4fd

Browse files
committed
.. -> Segment
1 parent 28882a0 commit b57a4fd

File tree

2 files changed

+15
-3
lines changed

2 files changed

+15
-3
lines changed

src/DirichletTriangle.jl

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -639,9 +639,9 @@ end
639639
function Dirichlet(D::DirichletTriangle{1,1,1}, k::Int)
640640
@assert k==0
641641
d = domain(D)
642-
Rx=Conversion(DirichletTriangle{1,1,1}(d),DirichletTriangle{1,1,0}(d),DirichletTriangle{1,0,0}(d),Legendre(d.a .. d.c))
643-
Ry=Conversion(DirichletTriangle{1,1,1}(d),DirichletTriangle{1,1,0}(d),DirichletTriangle{0,1,0}(d),Legendre(d.a .. d.b))
644-
Rz=Conversion(DirichletTriangle{1,1,1}(d),DirichletTriangle{0,1,1}(d),DirichletTriangle{0,0,1}(d),Legendre(d.c .. d.b))
642+
Rx=Conversion(DirichletTriangle{1,1,1}(d),DirichletTriangle{1,1,0}(d),DirichletTriangle{1,0,0}(d),Legendre(Segment(d.a,d.c)))
643+
Ry=Conversion(DirichletTriangle{1,1,1}(d),DirichletTriangle{1,1,0}(d),DirichletTriangle{0,1,0}(d),Legendre(Segment(d.a,d.b)))
644+
Rz=Conversion(DirichletTriangle{1,1,1}(d),DirichletTriangle{0,1,1}(d),DirichletTriangle{0,0,1}(d),Legendre(Segment(d.c,d.b)))
645645

646646
DirichletWrapper(InterlaceOperator(Operator{Float64}[Rx;Ry;Rz],DirichletTriangle{1,1,1}(d),PiecewiseSpace((rangespace(Rx),rangespace(Ry),rangespace(Rz)))))
647647
end

src/Triangle.jl

Lines changed: 12 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1367,3 +1367,15 @@ end
13671367
# op=operator_clenshaw2D(jacobioperators(S1)...,plan_evaluate(f).coefficients,jacobioperators(S)...)
13681368
# MultiplicationWrapper(f,op)
13691369
# end
1370+
1371+
1372+
# temporary work around
1373+
import ApproxFun: block, blockbandwidth, Block
1374+
import Base: *
1375+
function *(A_in::Operator, f::Fun{<:JacobiTriangle})
1376+
A = A_in : space(f)
1377+
N = Int(block(space(f), ncoefficients(f)))
1378+
M = A[Block.(1:N+blockbandwidth(A,1)),Block.(1:N)]
1379+
v = pad(coefficients(f),size(M,2))
1380+
Fun(rangespace(A),M*v)
1381+
end

0 commit comments

Comments
 (0)