# Laplace and Poisson equations

## Contents

# 13.3. Laplace and Poisson equations¶

Consider the heat equation \(u_t=u_{xx}+u_{yy}\). After a long time, the distribution of temperature will stop changing. This steady-state solution must satisfy the PDE \(u_{xx}+u_{yy}=0\), which is our third and final canonical PDE.

The **Poisson equation** in two dimensions is

A common notation for it is \(\Delta u = f\), where \(\Delta\) is known as the **Laplacian operator**.

The function \(f\) is sometimes called a *forcing function*. If \(f\) is identically zero, then (13.3.1) is the **Laplace equation**.

The Laplace/Poisson equation is the archetype of an **elliptic PDE**. All linear, constant-coefficient PDEs with no higher than second derivatives can be classified as either parabolic, hyperbolic, or elliptic. No time variable appears in (13.3.1). Although variable names are arbitrary, elliptic PDEs often do represent systems at steady state.

In order to get a fully specified problem, the Laplace or Poisson equations must be complemented with a boundary condition. Because both \(x\) and \(y\) are spatial variables, this is our first encounter with a boundary that is not simply a pair of points. We will consider only the Dirichlet condition \(u(x,y)=g(x,y)\) around the entire boundary.

## Sylvester equation¶

With the unknown solution represented by its values \(\mathbf{U}=\mtx(u)\) on a rectangular grid, and second-derivative finite-difference or spectral differentiation matrices \(\mathbf{D}_{xx}\) and \(\mathbf{D}_{yy}\), the Poisson equation (13.3.1) becomes the discrete equation

where \(\mathbf{F}=\mtx(f)\). Equation (13.3.2), with an unknown matrix \(\mathbf{U}\) multiplied on the left and right in different terms, is known as a **Sylvester equation**. We will use a new matrix operation to solve it.

## Kronecker product¶

Let \(\mathbf{A}\) be \(m\times n\) and \(\mathbf{B}\) be \(p\times q\). The **Kronecker product** \(\mathbf{A}\otimes \mathbf{B}\) is the \(mp\times nq\) matrix given by

```
A = [1 2; -2 0]
```

```
2×2 Matrix{Int64}:
1 2
-2 0
```

```
B = [ 1 10 100; -5 5 3 ]
```

```
2×3 Matrix{Int64}:
1 10 100
-5 5 3
```

Applying the definition manually, we get

```
A_kron_B = [ A[1,1]*B A[1,2]*B;
A[2,1]*B A[2,2]*B ]
```

```
4×6 Matrix{Int64}:
1 10 100 2 20 200
-5 5 3 -10 10 6
-2 -20 -200 0 0 0
10 -10 -6 0 0 0
```

But `kron`

is a built-in function.

```
kron(A,B)
```

```
4×6 Matrix{Int64}:
1 10 100 2 20 200
-5 5 3 -10 10 6
-2 -20 -200 0 0 0
10 -10 -6 0 0 0
```

The Kronecker product obeys several natural-looking identities:

Given matrices for which the non-Kronecker operations make sense, the following hold.

\(\mathbf{A}\otimes (\mathbf{B} + \mathbf{C}) = \mathbf{A}\otimes \mathbf{B} + \mathbf{A}\otimes \mathbf{C}\)

\((\mathbf{A} + \mathbf{B}) \otimes \mathbf{C} = \mathbf{A}\otimes \mathbf{C} + \mathbf{B}\otimes \mathbf{C}\)

\((\mathbf{A} \otimes \mathbf{B}) \otimes \mathbf{C} = \mathbf{A} \otimes (\mathbf{B} \otimes \mathbf{C})\)

\((\mathbf{A} \otimes \mathbf{B})^T = \mathbf{A}^T \otimes \mathbf{B}^T\)

\((\mathbf{A} \otimes \mathbf{B})^{-1} = \mathbf{A}^{-1} \otimes \mathbf{B}^{-1}\)

\((\mathbf{A} \otimes \mathbf{B})(\mathbf{C}\otimes \mathbf{D}) = (\mathbf{A}\mathbf{C}) \otimes (\mathbf{B}\mathbf{D})\)

For the vec operation defined in Definition 13.2.1 and matrices of compatible sizes,

(Partial proof.) These all boil down to algebraic manipulations. For instance, for item 5, let \(\mathbf{Z}=\mathbf{A}^{-1}\). Then

## Poisson as a linear system¶

We can use (13.3.4) to express the Sylvester form (13.3.2) of the discrete Poisson equation as an ordinary linear system. First, we pad (13.3.2) with identity matrices,

where \(\mathbf{I}_{x}\) and \(\mathbf{I}_{y}\) are the \((m+1)\times (m+1)\) and \((n+1)\times (n+1)\) identities, respectively. Upon taking the vec of both sides and applying (13.3.4), we obtain

This is in the form of a standard linear system in \((m+1)(n+1)\) variables.

Boundary conditions of the PDE must yet be applied to modify (13.3.5). As has been our practice for one-dimensional boundary-value problems, we replace the collocation equation for the PDE at each boundary point with an equation that assigns that boundary point its prescribed value. The details are a bit harder to express algebraically in the two-dimensional geometry, though, than in the 1D case.

Say that \(N=(m+1)(n+1)\) is the number of entries in the unknown \(\mathbf{U}\), and let \(B\) be a subset of \(\{1,\dots,N\}\) such that \(i\in B\) if and only if \((x_i,y_i)\) is on the boundary. Then for each \(i\in B\), we want to replace row \(i\) of the system \(\mathbf{A}\mathbf{u}=\mathbf{b}\) with the equation

Hence from \(\mathbf{A}\) we should subtract away its \(i\)th row and add \(\mathbf{e}_i^T\) back in. When this is done for all \(i\in B\), the result is the replacement of the relevant rows of \(\mathbf{A}\) with relevant rows of the identity:

where \(\mathbf{I}_B\) is a matrix with zeros everywhere except for ones at \((i,i)\) for all \(i\in B\). A similar expression can be derived for the modification of \(\mathbf{b}\). However, rather than implementing a literal interpretation of (13.3.6), the changes to \(\mathbf{A}\) and \(\mathbf{b}\) are made more easily through logical indexing. A small example is more illuminating than further description.

Here is a forcing function for Poisson’s equation.

```
f = (x,y) -> x^2 - y + 2;
```

We make a crude discretization for illustrative purposes.

```
m,n = 6,5
x,Dx,Dxx = FNC.diffmat2(m,[0,3])
y,Dy,Dyy = FNC.diffmat2(n,[-1,1])
unvec = u -> reshape(u,m+1,n+1);
```

Next, we evaluate \(\phi\) on the grid.

```
F = [ f(x,y) for x in x, y in y ]
```

```
7×6 Matrix{Float64}:
3.0 2.6 2.2 1.8 1.4 1.0
3.25 2.85 2.45 2.05 1.65 1.25
4.0 3.6 3.2 2.8 2.4 2.0
5.25 4.85 4.45 4.05 3.65 3.25
7.0 6.6 6.2 5.8 5.4 5.0
9.25 8.85 8.45 8.05 7.65 7.25
12.0 11.6 11.2 10.8 10.4 10.0
```

Here are the equations for the PDE collocation, before any modifications are made for the boundary conditions.

```
A = kron(I(n+1),Dxx) + kron(Dyy,I(m+1))
b = vec(F);
```

The number of equations is equal to \((m+1)(n+1)\), which is the total number of points on the grid.

```
@show N = length(F);
```

```
N = length(F) = 42
```

The combination of Kronecker products and finite differences produces a characteristic sparsity pattern.

```
spy(sparse(A),color=:blues,m=3,
title="System matrix before boundary conditions")
```

We now construct a Boolean array the same size as `F`

to indicate where the boundary points lie in the grid.

```
isboundary = trues(m+1,n+1)
isboundary[2:m,2:n] .= false
idx = vec(isboundary);
```

```
spy(sparse(isboundary),m=3,color=:darkblue,legend=:none,
title="Boundary points",
xaxis=("column index",[0,n+2]),yaxis=("row index",[0,m+2]) )
```

In order to impose Dirichlet boundary conditions, we replace the boundary rows of the system by rows of the identity.

```
I_N = I(N)
A[idx,:] .= I_N[idx,:]; # Dirichlet conditions
```

```
spy(sparse(A),color=:blues,m=3,
title="System matrix with boundary conditions")
```

Finally, we must replace the rows in the vector \(\mathbf{b}\) by the boundary values being assigned to the boundary points. Here, we let the boundary values be zero everywhere.

```
b[idx] .= 0; # Dirichlet values
```

Now we can solve for \(\mathbf{u}\) and reinterpret it as the matrix-shaped \(\mathbf{U}\), the solution on our grid.

```
u = A\b
U = unvec(u)
```

```
7×6 Matrix{Float64}:
0.0 0.0 4.23103e-16 -1.27734e-15 1.96159e-15 0.0
-2.84217e-16 -0.549304 -0.758277 -0.712098 -0.453391 0.0
1.06581e-15 -0.917873 -1.30273 -1.24377 -0.798473 0.0
2.06057e-15 -1.21928 -1.74064 -1.67911 -1.09539 0.0
7.67386e-15 -1.39869 -1.97682 -1.91786 -1.27929 0.0
5.68434e-15 -1.21024 -1.65843 -1.61225 -1.11433 0.0
0.0 0.0 -1.9111e-15 2.57711e-15 0.0 0.0
```

## Implementation¶

Function 13.3.6 is our code to solve the Poisson equation.

**Solve Poisson’s equation by finite differences**

```
1"""
2 poissonfd(f,g,m,xspan,n,yspan)
3
4Solve Poisson's equation on a rectangle by finite differences.
5Function `f` is the forcing function and function `g` gives the
6Dirichlet boundary condition. The rectangle is the tensor product of
7intervals `xspan` and `yspan`, and the discretization uses `m`+1
8and `n`+1 points in the two coordinates.
9
10Returns vectors defining the grid and a matrix of grid solution values.
11"""
12function poissonfd(f,g,m,xspan,n,yspan)
13 # Discretize the domain.
14 x,Dx,Dxx = FNC.diffmat2(m,xspan)
15 y,Dy,Dyy = FNC.diffmat2(n,yspan)
16 mtx = h -> [ h(x,y) for x in x, y in y ]
17 X,Y = mtx((x,y)->x),mtx((x,y)->y)
18 N = (m+1)*(n+1) # total number of unknowns
19
20 # Form the collocated PDE as a linear system.
21 A = kron(I(n+1),sparse(Dxx)) + kron(sparse(Dyy),I(m+1))
22 b = vec( mtx(f) )
23
24 # Identify boundary locations.
25 isboundary = trues(m+1,n+1)
26 isboundary[2:m,2:n] .= false
27 idx = vec(isboundary)
28
29 # Apply Dirichlet condition.
30 scale = maximum(abs,A[n+2,:])
31 A[idx,:] = scale * I(N)[idx,:] # Dirichlet assignment
32 b[idx] = scale * g.(X[idx],Y[idx]) # assigned values
33
34 # Solve the linear system and reshape the output.
35 u = A\b
36 U = reshape(u,m+1,n+1)
37 return x,y,U
38end
```

We use Demo 13.3.5 as a template: create the linear system, modify it for the boundary conditions, solve it using backslash, and reshape to get a grid function. The matrix is \(N=(m+1)(n+1)\) on each side and very sparse, so we take care to use sparse matrices in the code to exploit that structure. There is a small but important change from Demo 13.3.5: the boundary conditions are rescaled to read \(\sigma u(x,y)=\sigma g(x,y)\), where \(\sigma\) is the largest element of a row of \(\mathbf{A}\). This tweak improves the condition number of the final matrix.

We can engineer an example by choosing the solution first. Let \(u(x,y)=\sin(3xy-4y)\). Then one can derive \(f=\Delta u = -\sin(3xy-4y)\bigl(9y^2+(3x-4)^2\bigr)\) for the forcing function and use \(g=u\) on the boundary.

First we define the problem on \([0,1]\times[0,2]\).

```
f = (x,y) -> -sin(3*x*y-4*y)*(9*y^2+(3*x-4)^2);
g = (x,y) -> sin(3*x*y-4*y);
xspan = [0,1]; yspan = [0,2];
```

Here is the finite-difference solution.

```
x,y,U = FNC.poissonfd(f,g,40,xspan,60,yspan);
```

```
surface(x,y,U',color=:viridis,
title="Solution of Poisson's equation",
xaxis=(L"x"), yaxis=(L"y"), zaxis=(L"u(x,y)"))
```

The error is a smooth function of \(x\) and \(y\). It must be zero on the boundary; otherwise, we have implemented boundary conditions incorrectly.

```
error = [g(x,y) for x in x, y in y] - U;
M = maximum(abs,error)
contour(x,y,error',levels=17,aspect_ratio=1,
clims=(-M,M),color=:redsblues,colorbar=:bottom,
title="Error",xaxis=(L"x"),yaxis=(L"y") )
plot!([0,1,1,0,0],[0,0,2,2,0],l=(2,:black))
```

## Accuracy and efficiency¶

In Function 13.3.6 we used second-order finite differences for the discretization. Let’s simplify the discussion by assuming that \(m=n\). The error in the solution can be expected to be \(O(n^{-2})\).

The matrix \(\mathbf{A}\) has size \(N=O(n^2)\). The upper and lower bandwidths of the matrix \(\mathbf{A}\) are both \(O(n)\). It can be shown that the matrix is symmetric and negative definite, so sparse Cholesky factorization can be applied to \(-\mathbf{A}\), taking \(O(n^2N)=O(n^4)\) operations.

As \(n\) increases, the truncation error decreases while the operation count increases. The growth in operations is faster than the corresponding decrease in error, making it costly to get high accuracy. Suppose we have fixed running time \(T\) at our disposal. Then \(n=O(T^{1/4})\), and the convergence is \(O(1/\sqrt{T})\). For example, reduction of the error by a factor of 10 requires 100 times the computational effort.

If we chose a Chebyshev spectral discretization instead, the calculus changes. Provided that the solution is smooth, we expect convergence at a rate \(K^{-n}\) for some \(K>1\). However, the system matrix is no longer sparse nor symmetric, and solution by LU factorization takes \(O(N^3)=O(n^6)\) flops. Hence as a function of running time \(T\), we expect a convergence rate on the order of \(K^{-T^{1/6}}\). It’s not simple to compare this directly to the finite-difference case. In the long run, the spectral method will be much more efficient, but if the accuracy requirement is undemanding, second-order finite differences might be faster. For the specific case of Poisson’s equation on a rectangle, there are specialized fast solution methods that are beyond the scope of this discussion.

## Exercises¶

✍ Using general \(2\times 2\) matrices, verify identities 4 and 6 in Theorem 13.3.4.

✍ Prove that the matrix \(\mathbf{A}\) defined in (13.3.5) is symmetric if \(\mathbf{D}_{xx}\) and \(\mathbf{D}_{yy}\) are symmetric.

⌨ Use Function 13.3.6 to solve the following problems on \([0,1]\times[0,1]\) using \(m=n=50\). In each case, make a plot of the solution and a plot of the error.

**(a)**\(u_{xx}+u_{yy} = 2x^2[x^2(x-1)+(10x-6)(y^2-y)]\), with \(u=0\) on the boundary.Solution: \(u(x,y) = x^4(1-x)y(1-y)\).

**(b)**\(u_{xx}+u_{yy} = \left(16 x^2 + (1-4 y)^2\right) \sinh (4 x y-x)\), with \(u=\sinh(4xy-x)\) on the boundary.Solution: \(u(x,y) = \sin(4\pi x))\).

**(c)**\(u_{xx}+u_{yy} = -(20\pi^2) \sin (4\pi x) \cos (2\pi y)\), with \(u = \sin (4\pi x) \cos (2\pi y)\) on the boundary.Solution: \(u(x,y) = \sin (4\pi x) \cos (2\pi y)\).

⌨ For each case in Exercise 3, solve the problem using Function 13.3.6 with \(m=n=20,30,40,\ldots,120\). For each numerical solution compute the maximum absolute error on the grid. On a log-log plot, compare the convergence of the error as a function of \(n\) to theoretical second-order accuracy.

⌨ Copy Function 13.3.6 to a new function named

`poischeb`

, and modify it to use a Chebyshev discretization rather than finite differences. For each item in Exercise 3, solve the problem using`poischeb`

for \(m=n=10,15,20,\ldots,40\). For each numerical solution compute the maximum absolute error on the grid. Show the convergence of the error as a function of \(n\) on a log-linear plot.⌨ Sometimes boundary conditions are specified using a piecewise definition, with a different formula for each side of the domain. Use Function 13.3.6 with \(m=n=60\) to solve the Laplace equation on \([0,1]^2\) with boundary conditions

\[ u(0,y) = u(1,y) \equiv 0, \quad u(x,0) = \sin(3\pi x), \quad u(x,1) = e^{2x}(x-x^2). \]Make a surface plot of your numerical solution.