Testing the fixes for issue #770

gridap · Mar 22, 2022 · 4aeb153 · 4aeb153
1 parent acdf47f
commit 4aeb153
Show file tree

Hide file tree

Showing 2 changed files with 28 additions and 0 deletions.
diff --git a/test/GridapTests/issue_770.jl b/test/GridapTests/issue_770.jl
@@ -0,0 +1,26 @@
+module Issue770
+
+using Gridap
+using Test
+
+domain = (0,1,0,1)
+cells = (2,2)
+model = CartesianDiscreteModel(domain,cells) |> simplexify
+Ω = Interior(model)
+dΩ = Measure(Ω,4)
+m = 2
+u(x) = VectorValue(sum(x)^m, sum(x)^m)
+reffe = ReferenceFE(lagrangian,VectorValue{2,Float64},m)
+V = FESpace(Ω,reffe)
+uh = interpolate(u,V)
+t = Δ(u) - Δ(uh)
+@test sum(∫(t⋅t)dΩ) < 1.0e-12
+
+s(x) = sum(x)^m
+reffe = ReferenceFE(lagrangian,Float64,m)
+V = FESpace(Ω,reffe)
+sh = interpolate(s,V)
+t = Δ(s) - Δ(sh)
+@test sum(∫(t⋅t)dΩ) < 1.0e-12
+
+end # module
diff --git a/test/GridapTests/runtests.jl b/test/GridapTests/runtests.jl
@@ -42,4 +42,6 @@ using Test
 
 @time @testset "Issue760" begin include("issue_760.jl") end
 
+@time @testset "Issue770" begin include("issue_770.jl") end
+
 end # module