# HG changeset patch
# User Eugenio Gianniti <eugenio.gianniti@mail.polimi.it>
# Date 1403620993 -7200
# Node ID b96f6b12f8cabf7b6c838a7f18aafaa8254a6a4e
# Parent  418a5119047b9c5deba6c145b9f9c057fb65d44c
Move ufl to m-file in Poisson example

diff -r 418a5119047b -r b96f6b12f8ca inst/example/Poisson/Poisson.m
--- a/inst/example/Poisson/Poisson.m	Mon Jun 23 20:28:28 2014 +0200
+++ b/inst/example/Poisson/Poisson.m	Tue Jun 24 16:43:13 2014 +0200
@@ -14,7 +14,18 @@
 ## this program; if not, see <http://www.gnu.org/licenses/>.
 
 pkg load fem-fenics msh
-import_ufl_Problem ('Poisson')
+
+ufl start Poisson
+ufl 'element = FiniteElement("Lagrange", triangle, 1)'
+ufl
+ufl u = TrialFunction(element)
+ufl v = TestFunction(element)
+ufl f = Coefficient(element)
+ufl g = Coefficient(element)
+ufl
+ufl "a = inner(grad(u), grad(v))*dx"
+ufl L = f*v*dx + g*v*ds
+ufl end
 
 # Create mesh and define function space
 x = y = linspace (0, 1, 33);
diff -r 418a5119047b -r b96f6b12f8ca inst/example/Poisson/Poisson.ufl
--- a/inst/example/Poisson/Poisson.ufl	Mon Jun 23 20:28:28 2014 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,10 +0,0 @@
-# Copyright (C) 2005-2009 Anders Logg
-element = FiniteElement("Lagrange", triangle, 1)
-
-u = TrialFunction(element)
-v = TestFunction(element)
-f = Coefficient(element)
-g = Coefficient(element)
-
-a = inner(grad(u), grad(v))*dx
-L = f*v*dx + g*v*ds