1
# Copyright (C) 2010 Kristian B. Oelgaard (k.b.oelgaard@gmail.com)
2
# Licensed under the GNU GPL version 3 or any later version
4
# Test all algebra operators on Coefficients.
6
# Compile this form with FFC: ffc AlgebraOperators.ufl
8
element = FiniteElement("Lagrange", triangle, 1)
10
c0 = Coefficient(element)
11
c1 = Coefficient(element)
17
integrand = 5*c0 + 5*p0 + 5*f0\
18
+ s0*c0 + s0*p0 + s0*f0\
20
+ s0/c0 + s0/p0 + s0/f0\
22
+ c0**2 + s0**2 + p0**2 + f0**2\
23
+ c1**2.2 + s0**2.2 + p0**2.2 + f0**2.2\
24
+ c0**c1 + s0**c0 + p0**c0 + f0**c0\
25
+ c0**s0 + s0**p0 + p0**f0 + f0**p0\
26
+ abs(c0) + abs(s0) + abs(p0) + abs(f0)