Skip to content
Snippets Groups Projects
Commit 23677214 authored by Dominic Kempf's avatar Dominic Kempf
Browse files

Port all the sumfact tests

parent 372f0333
No related branches found
No related tags found
No related merge requests found
Showing
with 17 additions and 20 deletions
......@@ -9,7 +9,6 @@ extension = vtu
[formcompiler]
sumfact = 1
exact_solution_expression = g
compare_l2errorsquared = 1e-5
vectorize_quad = 1
vectorize_grads = 0
......
......@@ -13,7 +13,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 0
exact_solution_expression = g
compare_l2errorsquared = 1e-8
sumfact = 1
opcounter = 1
......
......@@ -11,7 +11,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 0
exact_solution_expression = g
compare_l2errorsquared = 1e-8
sumfact = 1
opcounter = 1
......
......@@ -15,7 +15,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 1, 0 | expand num
exact_solution_expression = g
compare_l2errorsquared = 4e-5, 4e-9 | expand deg
sumfact = 1
vectorize_grads = 1, 0 | expand grad
......
......@@ -5,8 +5,11 @@ c = (0.5-x[0])**2 + (0.5-x[1])**2
g = exp(-1.*c)
f = 2*(2.-2*c)*g
V = FiniteElement("CG", cell, degree, dirichlet_expression=g)
V = FiniteElement("CG", cell, degree)
u = TrialFunction(V)
v = TestFunction(V)
forms = [(inner(grad(u), grad(v)) - f*v)*dx]
exact_solution = g
is_dirichlet = 1
dirichlet_expression = g
......@@ -16,7 +16,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 1, 0 | expand num
exact_solution_expression = g
compare_l2errorsquared = 1e-4, 1e-8 | expand deg
sumfact = 1
vectorize_quad = 1, 0 | expand quad
......
......@@ -5,8 +5,11 @@ c = (0.5 - x[0])**2 + (0.5 - x[1])**2 + (0.5 - x[2])**2
g = exp(-1.*c)
f = 2*(3.-2*c)*g
V = FiniteElement("CG", cell, degree, dirichlet_expression=g)
V = FiniteElement("CG", cell, degree)
u = TrialFunction(V)
v = TestFunction(V)
forms = [(inner(grad(u), grad(v)) - f*v)*dx]
exact_solution = g
is_dirichlet = 1
dirichlet_expression = g
......@@ -16,7 +16,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 1, 0 | expand num
sumfact = 1
exact_solution_expression = g
compare_l2errorsquared = 5e-5, 5e-7 | expand deg
vectorize_quad = 1, 0 | expand quad
vectorize_grads = 1, 0 | expand grad
......
......@@ -30,3 +30,4 @@ r = inner(grad(u), grad(v))*dx \
- gamma*g*v*ds
forms = [r]
exact_solution = g
......@@ -16,7 +16,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 1, 0 | expand num
sumfact = 1
exact_solution_expression = g
compare_l2errorsquared = 1e-4, 5e-6 | expand deg
vectorize_quad = 1, 0 | expand quad
vectorize_grads = 1, 0 | expand grad
......
......@@ -30,3 +30,4 @@ r = inner(grad(u), grad(v))*dx \
- gamma*g*v*ds
forms = [r]
exact_solution = g
......@@ -13,7 +13,6 @@ extension = vtu
[formcompiler]
sumfact = 1
exact_solution_expression = g
compare_l2errorsquared = 3e-4
vectorize_quad = 1, 0 | expand quad
vectorize_grads = 1, 0 | expand grad
......
......@@ -33,3 +33,4 @@ r = (inner(A*grad(u), grad(v)) + c*u*v)*dx \
- gamma*g*v*ds
forms = [r]
exact_solution = g
......@@ -14,7 +14,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 0
sumfact = 1
exact_solution_expression = g
compare_l2errorsquared = 1e-4
vectorize_quad = 1, 0 | expand quadvec
vectorize_grads = 1, 0 | expand gradvec
......
......@@ -14,7 +14,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 0
sumfact = 1
exact_solution_expression = g
compare_l2errorsquared = 1e-4
vectorize_quad = 1, 0 | expand quadvec
vectorize_grads = 1, 0 | expand gradvec
......
......@@ -9,7 +9,6 @@ extension = vtu
[formcompiler]
sumfact = 1
exact_solution_expression = g
compare_l2errorsquared = 1e-5
vectorize_quad = 1
vectorize_grads = 0
......
......@@ -12,7 +12,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 1, 0 | expand num
exact_solution_expression = g
compare_l2errorsquared = 1e-12
sumfact = 1
......
......@@ -3,10 +3,9 @@ cell = quadrilateral
x = SpatialCoordinate(cell)
v_bctype = conditional(x[0] < 1. - 1e-8, 1, 0)
g_v = as_vector((4.*x[1]*(1.-x[1]), 0.0))
g_p = 8.*(1.-x[0])
g = (g_v, g_p)
P2 = VectorElement("Lagrange", cell, 2, dirichlet_constraints=v_bctype, dirichlet_expression=g_v)
P2 = VectorElement("Lagrange", cell, 2)
P1 = FiniteElement("Lagrange", cell, 1)
TH = P2 * P1
......@@ -16,3 +15,6 @@ u, p = TrialFunctions(TH)
r = (inner(grad(v), grad(u)) - div(v)*p - q*div(u))*dx
forms = [r]
exact_solution = g_v, 8.*(1.-x[0])
dirichlet_expression = g_v, None
is_dirichlet = v_bctype, v_bctype, None
\ No newline at end of file
......@@ -12,7 +12,6 @@ extension = vtu
[formcompiler]
numerical_jacobian = 0, 1 | expand num
exact_solution_expression = g
compare_l2errorsquared = 1e-8
sumfact = 1
......
......@@ -2,8 +2,6 @@ cell = quadrilateral
x = SpatialCoordinate(cell)
g_v = as_vector((4*x[1]*(1.-x[1]), 0.0))
g_p = 8*(1.-x[0])
g = (g_v, g_p)
bctype = conditional(x[0] < 1. - 1e-8, 1, 0)
P2 = VectorElement("DG", cell, 2)
......@@ -35,3 +33,4 @@ r = inner(grad(u), grad(v))*dx \
- q*inner(g_v, n)*ds
forms = [r]
exact_solution = g_v, 8*(1.-x[0])
\ No newline at end of file
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment