1
# Copyright (c) 2005-2007 Anders Logg
2
# Licensed under the GNU LGPL Version 2.1
5
# Last changed: 2007-04-30
7
# The bilinear form a(v, u) and Linear form L(v) for the Stokes
8
# equations using a mixed formulation (equal-order stabilized).
10
# Compile this form with FFC: ffc -l dolfin Stokes.form
12
vector = VectorElement("Lagrange", "triangle", 1)
13
scalar = FiniteElement("Lagrange", "triangle", 1)
14
system = vector + scalar
16
(v, q) = TestFunctions(system)
17
(u, p) = TrialFunctions(system)
25
a = (inner(grad(v), grad(u)) - div(v)*p + q*div(u) + delta*dot(grad(q), grad(p)))*dx
26
L = dot(v + delta*grad(q), f)*dx