Skip to content

Commit 03a5e0d

Browse files
committed
Fix scalar 3D vdim test script
1 parent 451edc6 commit 03a5e0d

File tree

1 file changed

+6
-4
lines changed

1 file changed

+6
-4
lines changed

test/convergence/vdim_potential_script_3d.jl

Lines changed: 6 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -35,15 +35,14 @@ tmsh = @elapsed begin
3535
crvmsh = Inti.curve_mesh(
3636
msh,
3737
ψ,
38-
θ,
39-
50 * round(Int, 1 / meshsize);
38+
θ;
4039
face_element_on_curved_surface = face_element_on_curved_surface,
4140
)
4241

4342
Ωₕ = view(crvmsh, Ω)
4443
Γₕ = view(crvmsh, Γ)
4544
end
46-
@info "Mesh generation time: $tmesh"
45+
@info "Mesh generation time: $tmsh"
4746

4847
interpolation_order = 2
4948
VR_qorder = Inti.Tetrahedron_VR_interpolation_order_to_quadrature_order(interpolation_order)
@@ -55,7 +54,9 @@ tquad = @elapsed begin
5554
dict = Dict(E => Q for E in Inti.element_types(Ωₕ))
5655
Ωₕ_quad = Inti.Quadrature(Ωₕ, dict)
5756
# Ωₕ_quad = Inti.Quadrature(Ωₕ; qorder = qorders[1])
58-
Γₕ_quad = Inti.Quadrature(Γₕ; qorder = bdry_qorder)
57+
Qbdry = Inti.Gauss(; domain = :triangle, order = bdry_qorder)
58+
dictbdry = Dict(E => Qbdry for E in Inti.element_types(Γₕ))
59+
Γₕ_quad = Inti.Quadrature(Γₕ, dictbdry)
5960
end
6061
@info "Quadrature generation time: $tquad"
6162

@@ -98,6 +99,7 @@ tvol = @elapsed begin
9899
method = :dim,
99100
interpolation_order,
100101
maxdist = 5 * meshsize,
102+
boundary = Γₕ_quad,
101103
S_b2d = S_b2d,
102104
D_b2d = D_b2d,
103105
),

0 commit comments

Comments
 (0)