9.14 DeRhamComplex

The domain constructor DeRhamComplex creates the class of differential forms of arbitrary degree over a coefficient ring. The De Rham complex constructor takes two arguments: a ring, coefRing, and a list of coordinate variables.

This is the ring of coefficients.

coefRing := Integer
\[\]
Integer

Type: Domain

These are the coordinate variables.

lv : List Symbol := [x,y,z]
\[\]
[x,y,z]

Type: List Symbol

This is the De Rham complex of Euclidean three-space using coordinates x, y and z.

der := DERHAM(coefRing,lv)
\[\]
DeRhamComplex(Integer,[x,y,z])

Type: Domain

This complex allows us to describe differential forms having expressions of integers as coefficients. These coefficients can involve any number of variables, for example, f(x,t,r,y,u,z). As we’ve chosen to work with ordinary Euclidean three-space, expressions involving these forms are treated as functions of x, y and z with the additional arguments t, r and u regarded as symbolic constants.

Here are some examples of coefficients.

R := Expression coefRing
\[\]
ExpressionInteger

Type: Domain

f : R := x^2*y*z-5*x^3*y^2*z^5
\[\]
-5x3y2z5+x2yz

Type: Expression Integer

g : R := z^2*y*cos(z)-7*sin(x^3*y^2)*z^2
\[\]
-7z2sin(x3y2)+yz2cos(z)

Type: Expression Integer

h : R :=x*y*z-2*x^3*y*z^2
\[\]
-2x3yz2+xyz

Type: Expression Integer

We now define the multiplicative basis elements for the exterior algebra over R.

dx : der := generator(1)
\[\]
dx

Type: DeRhamComplex(Integer,[x,y,z])

dy : der := generator(2)
\[\]
dy

Type: DeRhamComplex(Integer,[x,y,z])

dz : der := generator(3)
\[\]
dz

Type: DeRhamComplex(Integer,[x,y,z])

This is an alternative way to give the above assignments.

[dx,dy,dz] := [generator(i)$der for i in 1..3]
\[\]
[dx,dy,dz]

Type: List DeRhamComplex(Integer,[x,y,z])

Now we define some one-forms.

alpha : der := f*dx + g*dy + h*dz
\[\]
(-2x3yz2+xyz)dz+(-7z2sin(x3y2)+yz2cos(z))dy+(-5x3y2z5+x2yz)dx

Type: DeRhamComplex(Integer,[x,y,z])

beta : der := cos(tan(x*y*z)+x*y*z)*dx + x*dy
\[\]
xdy+cos(tan(xyz)+xyz)dx

Type: DeRhamComplex(Integer,[x,y,z])

A well-known theorem states that the composition of exteriorDifferentialexteriorDifferentialDeRhamComplex with itself is the zero map for continuous forms. Let’s verify this theorem for alpha.

exteriorDifferential alpha
\[\]
(yz2sin(z)+14zsin(x3y2)-2yzcos(z)-2x3z2+xz)dydz+(25x3y2z4-6x2yz2+yz-x2y)dxdz+(-21x2y2z2cos(x3y2)+10x3yz5-x2z)dxdy

Type: DeRhamComplex(Integer,[x,y,z])

We see a lengthy output of the last expression, but nevertheless, the composition is zero.

exteriorDifferential %
\[\]
0

Type: DeRhamComplex(Integer,[x,y,z])

Now we check that exteriorDifferentialexteriorDifferentialDeRhamComplex is a graded derivation D, that is, D satisfies:

D(a*b) = D(a)*b + (-1)^degree(a)*a*D(b)
gamma := alpha * beta
\[\]
(2x4yz2-x2yz)dydz+(2x3yz2-xyz)cos(tan(xyz)+xyz)dxdz+((7z2sin(x3y2)-yz2cos(z))cos(tan(xyz)+xyz)-5x4y2z5+x3yz)dxdy

Type: DeRhamComplex(Integer,[x,y,z])

We try this for the one-forms alpha and beta.

exteriorDifferential(gamma) - (exteriorDifferential(alpha)*beta - alpha
  • exteriorDifferential(beta))
\[\]
0

Type: DeRhamComplex(Integer,[x,y,z])

Now we define some basic operators (see OperatorXmpPage ).

a : BOP := operator('a)
\[\]
a

Type: BasicOperator

b : BOP := operator('b)
\[\]
b

Type: BasicOperator

c : BOP := operator('c)
\[\]
c

Type: BasicOperator

We also define some indeterminate one- and two-forms using these operators.

sigma := a(x,y,z) * dx + b(x,y,z) * dy + c(x,y,z) * dz
\[\]
c(x,y,z)dz+b(x,y,z)dy+a(x,y,z)dx

Type: DeRhamComplex(Integer,[x,y,z])

theta := a(x,y,z) * dx * dy + b(x,y,z) * dx * dz + c(x,y,z) * dy *

dz

\[\]
c(x,y,z)dydz+b(x,y,z)dxdz+a(x,y,z)dxdy

Type: DeRhamComplex(Integer,[x,y,z])

This allows us to get formal definitions for the gradient ...

totalDifferential(a(x,y,z))$der
\[\]
a,3(x,y,z)dz+a,2(x,y,z)dy+a,1(x,y,z)dx

Type: DeRhamComplex(Integer,[x,y,z])

the curl ...

exteriorDifferential sigma
\[\]
(c,2(x,y,z)-b,3(x,y,z))dydz+(c,1(x,y,z)-a,3(x,y,z))dxdz+(b,1(x,y,z)-a,2(x,y,z))dxdy

Type: DeRhamComplex(Integer,[x,y,z])

and the divergence.

exteriorDifferential theta
\[\]
(c,1(x,y,z)-b,2(x,y,z)+a,3(x,y,z))dxdydz

Type: DeRhamComplex(Integer,[x,y,z])

Note that the De Rham complex is an algebra with unity. This element 1 is the basis for elements for zero-forms, that is, functions in our space.

one : der := 1
\[\]
1

Type: DeRhamComplex(Integer,[x,y,z])

To convert a function to a function lying in the De Rham complex, multiply the function by one.

g1 : der := a([x,t,y,u,v,z,e]) * one
\[\]
a(x,t,y,u,v,z,e)

Type: DeRhamComplex(Integer,[x,y,z])

A current limitation of FriCAS forces you to write functions with more than four arguments using square brackets in this way.

h1 : der := a([x,y,x,t,x,z,y,r,u,x]) * one
\[\]
a(x,y,x,t,x,z,y,r,u,x)

Type: DeRhamComplex(Integer,[x,y,z])

Now note how the system keeps track of where your coordinate functions are located in expressions.

exteriorDifferential g1
\[\]
a,6(x,t,y,u,v,z,e)dz+a,3(x,t,y,u,v,z,e)dy+a,1(x,t,y,u,v,z,e)dx

Type: DeRhamComplex(Integer,[x,y,z])

exteriorDifferential h1
\[\]
a,6(x,y,x,t,x,z,y,r,u,x)dz+(a,7(x,y,x,t,x,z,y,r,u,x)+a,2(x,y,x,t,x,z,y,r,u,x))dy+(a,10(x,y,x,t,x,z,y,r,u,x)+a,5(x,y,x,t,x,z,y,r,u,x)+a,3(x,y,x,t,x,z,y,r,u,x)+a,1(x,y,x,t,x,z,y,r,u,x))dx

Type: DeRhamComplex(Integer,[x,y,z])

In this example of Euclidean three-space, the basis for the De Rham complex consists of the eight forms: 1, dx, dy, dz, dx*dy, dx*dz, dy*dz, and dx*dy*dz.

coefficient(gamma, dx*dy)
\[\]
(7z2sin(x3y2)-yz2cos(z))cos(tan(xyz)+xyz)-5x4y2z5+x3yz

Type: Expression Integer

coefficient(gamma, one)
\[\]
0

Type: Expression Integer

coefficient(g1,one)
\[\]
a(x,t,y,u,v,z,e)

Type: Expression Integer