# Implementation#

Author: Jørgen S. Dokken

## Test problem#

To solve a test problem, we need to choose the right hand side \(f\) and the coefficient \(q(u)\) and the boundary \(u_D\). Previously, we have worked with manufactured solutions that can be reproduced without approximation errors. This is more difficult in non-linear porblems, and the algebra is more tedious. Howeve, we will utilize UFLs differentiation capabilities to obtain a manufactured solution.

For this problem, we will choose \(q(u) = 1 + u^2\) and define a two dimensional manufactured solution that is linear in \(x\) and \(y\):

```
import ufl
import numpy
from mpi4py import MPI
from petsc4py import PETSc
from dolfinx import mesh, fem, io, nls, log
def q(u):
return 1 + u**2
domain = mesh.create_unit_square(MPI.COMM_WORLD, 10, 10)
x = ufl.SpatialCoordinate(domain)
u_ufl = 1 + x[0] + 2*x[1]
f = - ufl.div(q(u_ufl)*ufl.grad(u_ufl))
```

Note that since `x`

is a 2D vector, the first component (index 0) resemble \(x\), while the second component (index 1) resemble \(y\). The resulting function `f`

can be directly used in variational formulations in DOLFINx.

As we now have defined our source term and exact solution, we can create the appropriate function space and boundary conditions.
Note that as we have already defined the exact solution, we only have to convert it to a python function that can be evaluated in the interpolation function. We do this by employing the Python `eval`

and `lambda`

-functions.

```
V = fem.FunctionSpace(domain, ("CG", 1))
u_exact = lambda x: eval(str(u_ufl))
u_D = fem.Function(V)
u_D.interpolate(u_exact)
fdim = domain.topology.dim - 1
boundary_facets = mesh.locate_entities_boundary(domain, fdim, lambda x: numpy.full(x.shape[1], True, dtype=bool))
bc = fem.dirichletbc(u_D, fem.locate_dofs_topological(V, fdim, boundary_facets))
```

We are now ready to define the variational formulation. Note that as the problem is non-linear, we have replace the `TrialFunction`

with a `Function`

, which serves as the unknown of our problem.

```
uh = fem.Function(V)
v = ufl.TestFunction(V)
F = q(uh)*ufl.dot(ufl.grad(uh), ufl.grad(v))*ufl.dx - f*v*ufl.dx
```

## Newton’s method#

The next step is to define the non-linear problem. As it is non-linear we will use Newtons method.
For details about how to implement a Newton solver, see Custom Newton solvers.
Newton’s method requires methods for evaluating the residual `F`

(including application of boundary conditions), as well as a method for computing the Jacobian matrix. DOLFINx provides the function `NonlinearProblem`

that implements these methods. In addition to the boundary conditions, you can supply the variational form for the Jacobian (computed if not supplied), and form and jit parameters, see the JIT parameters section.

```
problem = fem.petsc.NonlinearProblem(F, uh, bcs=[bc])
```

Next, we use the dolfinx Newton solver. We can set the convergence criterions for the solver by changing the absolute tolerance (`atol`

), relative tolerance (`rtol`

) or the convergence criterion (`residual`

or `incremental`

).

```
solver = nls.petsc.NewtonSolver(MPI.COMM_WORLD, problem)
solver.convergence_criterion = "incremental"
solver.rtol = 1e-6
solver.report = True
```

We can modify the linear solver in each Newton iteration by accessing the underlying `PETSc`

object.

```
ksp = solver.krylov_solver
opts = PETSc.Options()
option_prefix = ksp.getOptionsPrefix()
opts[f"{option_prefix}ksp_type"] = "cg"
opts[f"{option_prefix}pc_type"] = "gamg"
opts[f"{option_prefix}pc_factor_mat_solver_type"] = "mumps"
ksp.setFromOptions()
```

We are now ready to solve the non-linear problem. We assert that the solver has converged and print the number of iterations.

```
log.set_log_level(log.LogLevel.INFO)
n, converged = solver.solve(uh)
assert(converged)
print(f"Number of interations: {n:d}")
```

```
Number of interations: 8
```

```
2023-03-27 08:07:52.155 ( 0.876s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.156 ( 0.877s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.001295, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.156 ( 0.877s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.158 ( 0.879s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.001533, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.160 ( 0.882s) [main ] NewtonSolver.cpp:36 INFO| Newton iteration 2: r (abs) = 20.3795 (tol = 1e-10) r (rel) = 0.922547(tol = 1e-06)
2023-03-27 08:07:52.161 ( 0.882s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.162 ( 0.883s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.001015, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.162 ( 0.883s) [main ] NewtonSolver.cpp:36 INFO| Newton iteration 3: r (abs) = 6.95284 (tol = 1e-10) r (rel) = 0.314744(tol = 1e-06)
2023-03-27 08:07:52.162 ( 0.883s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.163 ( 0.884s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.001000, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.163 ( 0.884s) [main ] NewtonSolver.cpp:36 INFO| Newton iteration 4: r (abs) = 2.93579 (tol = 1e-10) r (rel) = 0.132899(tol = 1e-06)
2023-03-27 08:07:52.163 ( 0.885s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.164 ( 0.886s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.001025, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.165 ( 0.886s) [main ] NewtonSolver.cpp:36 INFO| Newton iteration 5: r (abs) = 0.700635 (tol = 1e-10) r (rel) = 0.0317166(tol = 1e-06)
2023-03-27 08:07:52.165 ( 0.886s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.166 ( 0.887s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.000990, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.166 ( 0.887s) [main ] NewtonSolver.cpp:36 INFO| Newton iteration 6: r (abs) = 0.0490873 (tol = 1e-10) r (rel) = 0.0022221(tol = 1e-06)
2023-03-27 08:07:52.167 ( 0.889s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.168 ( 0.890s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.001055, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.169 ( 0.890s) [main ] NewtonSolver.cpp:36 INFO| Newton iteration 7: r (abs) = 0.00029971 (tol = 1e-10) r (rel) = 1.35674e-05(tol = 1e-06)
2023-03-27 08:07:52.169 ( 0.890s) [main ] petsc.cpp:675 INFO| PETSc Krylov solver starting to solve system.
2023-03-27 08:07:52.170 ( 0.891s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.001114, 0.000000, 0.000000 (PETSc Krylov solver)
2023-03-27 08:07:52.170 ( 0.891s) [main ] NewtonSolver.cpp:36 INFO| Newton iteration 8: r (abs) = 1.51622e-08 (tol = 1e-10) r (rel) = 6.86368e-10(tol = 1e-06)
2023-03-27 08:07:52.170 ( 0.891s) [main ] NewtonSolver.cpp:255 INFO| Newton solver finished in 8 iterations and 90 linear solver iterations.
```

We observe that the solver converges after \(8\) iterations. If we think of the problem in terms of finite differences on a uniform mesh, \(\mathcal{P}_1\) elements mimic standard second-order finite differences, which compute the derivative of a linear or quadratic funtion exactly. Here \(\nabla u\) is a constant vector, which is multiplied by \(1+u^2\), which is a second order polynomial in \(x\) and \(y\), which the finite difference operator would compute exactly. We can therefore, even with \(\mathcal{P}_1\) elements, expect the manufactured solution to be reproduced by the numerical method. However, if we had chosen a nonlinearity, such as \(1+u^4\), this would not be the case, and we would need to verify convergence rates.

```
# Compute L2 error and error at nodes
V_ex = fem.FunctionSpace(domain, ("CG", 2))
u_ex = fem.Function(V_ex)
u_ex.interpolate(u_exact)
error_local = fem.assemble_scalar(fem.form((uh - u_ex)**2 * ufl.dx))
error_L2 = numpy.sqrt(domain.comm.allreduce(error_local, op=MPI.SUM))
if domain.comm.rank == 0:
print(f"L2-error: {error_L2:.2e}")
# Compute values at mesh vertices
error_max = domain.comm.allreduce(numpy.max(numpy.abs(uh.x.array -u_D.x.array)), op=MPI.MAX)
if domain.comm.rank == 0:
print(f"Error_max: {error_max:.2e}")
```

```
L2-error: 3.11e-15
Error_max: 8.44e-15
```

```
2023-03-27 08:07:52.185 ( 0.906s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.000023, 0.000000, 0.000000 (Init dofmap from element dofmap)
2023-03-27 08:07:52.185 ( 0.906s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.000007, 0.000000, 0.000000 (Compute dof reordering map)
2023-03-27 08:07:52.185 ( 0.906s) [main ] MPI.cpp:165 INFO| Computing communication graph edges (using NBX algorithm). Number of input edges: 0
2023-03-27 08:07:52.185 ( 0.906s) [main ] MPI.cpp:236 INFO| Finished graph edge discovery using NBX algorithm. Number of discovered edges 0
2023-03-27 08:07:52.185 ( 0.906s) [main ] MPI.cpp:165 INFO| Computing communication graph edges (using NBX algorithm). Number of input edges: 0
2023-03-27 08:07:52.185 ( 0.906s) [main ] MPI.cpp:236 INFO| Finished graph edge discovery using NBX algorithm. Number of discovered edges 0
2023-03-27 08:07:52.185 ( 0.906s) [main ] MPI.cpp:165 INFO| Computing communication graph edges (using NBX algorithm). Number of input edges: 0
2023-03-27 08:07:52.185 ( 0.906s) [main ] MPI.cpp:236 INFO| Finished graph edge discovery using NBX algorithm. Number of discovered edges 0
2023-03-27 08:07:52.185 ( 0.907s) [main ] MPI.cpp:165 INFO| Computing communication graph edges (using NBX algorithm). Number of input edges: 0
2023-03-27 08:07:52.185 ( 0.907s) [main ] MPI.cpp:236 INFO| Finished graph edge discovery using NBX algorithm. Number of discovered edges 0
2023-03-27 08:07:52.185 ( 0.907s) [main ] TimeLogger.cpp:28 INFO| Elapsed wall, usr, sys time: 0.000284, 0.000000, 0.000000 (Build dofmap data)
```