File tree Expand file tree Collapse file tree 1 file changed +6
-4
lines changed
Expand file tree Collapse file tree 1 file changed +6
-4
lines changed Original file line number Diff line number Diff 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, Γ)
4544end
46- @info " Mesh generation time: $tmesh "
45+ @info " Mesh generation time: $tmsh "
4746
4847interpolation_order = 2
4948VR_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)
5960end
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 ),
You can’t perform that action at this time.
0 commit comments