# HG changeset patch # User gedeone-octave # Date 1380966006 -3600 # Node ID 7190852cf57fd73de9fd304527b1232a3b2c9d31 # Parent 5f22232b9fcc0a393ddee9a2c73691460c597f7e Update the examples giving two input parameters to the BilinearForm. diff -r 5f22232b9fcc -r 7190852cf57f inst/example/Biharmonic/Biharmonic.m --- a/inst/example/Biharmonic/Biharmonic.m Sat Oct 05 10:30:39 2013 +0100 +++ b/inst/example/Biharmonic/Biharmonic.m Sat Oct 05 10:40:06 2013 +0100 @@ -14,7 +14,7 @@ f = Expression ('f', @(x,y) 4.0*pi^4.*sin(pi.*x).*sin(pi.*y)); g = Expression ('alpha', @(x,y) 8); -a = BilinearForm (problem, V, g); +a = BilinearForm (problem, V, V, g); L = LinearForm (problem, V, f); [A, b] = assemble_system (a, L, bc); diff -r 5f22232b9fcc -r 7190852cf57f inst/example/Evolution/Evolution.m --- a/inst/example/Evolution/Evolution.m Sat Oct 05 10:30:39 2013 +0100 +++ b/inst/example/Evolution/Evolution.m Sat Oct 05 10:40:06 2013 +0100 @@ -17,7 +17,7 @@ u0 = Expression ('u0', @(x,y) 10*exp(-((x - 0.5)^2 + (y - 0.5)^2) / 0.02)); -a = BilinearForm (problem, V, k); +a = BilinearForm (problem, V, V, k); L = LinearForm (problem, V, k, u0); A = assemble (a, bc); diff -r 5f22232b9fcc -r 7190852cf57f inst/example/Mixed-Poisson/MixedPoisson.m --- a/inst/example/Mixed-Poisson/MixedPoisson.m Sat Oct 05 10:30:39 2013 +0100 +++ b/inst/example/Mixed-Poisson/MixedPoisson.m Sat Oct 05 10:40:06 2013 +0100 @@ -9,7 +9,7 @@ f = Expression ('f', @(x,y) 10*exp(-((x - 0.5)^2 + (y - 0.5)^2) / 0.02)); -a = BilinearForm ('MixedPoisson', V); +a = BilinearForm ('MixedPoisson', V, V); L = LinearForm ('MixedPoisson', V, f); # Define essential boundary diff -r 5f22232b9fcc -r 7190852cf57f inst/example/NavierStokes/NS.m --- a/inst/example/NavierStokes/NS.m Sat Oct 05 10:30:39 2013 +0100 +++ b/inst/example/NavierStokes/NS.m Sat Oct 05 10:40:06 2013 +0100 @@ -46,13 +46,13 @@ f = Constant ('f', [0; 0]); # Tentative velocity step. -a1 = BilinearForm ('TentativeVelocity', V, k); +a1 = BilinearForm ('TentativeVelocity', V, V, k); # Pressure update. -a2 = BilinearForm ('PressureUpdate', Q); +a2 = BilinearForm ('PressureUpdate', Q, Q); # Velocity update -a3 = BilinearForm ('VelocityUpdate', V); +a3 = BilinearForm ('VelocityUpdate', V, V); # Assemble matrices A1 = assemble (a1, noslip); diff -r 5f22232b9fcc -r 7190852cf57f inst/example/Poisson/Poisson.m --- a/inst/example/Poisson/Poisson.m Sat Oct 05 10:30:39 2013 +0100 +++ b/inst/example/Poisson/Poisson.m Sat Oct 05 10:40:06 2013 +0100 @@ -13,7 +13,7 @@ f = Expression ('f', @(x,y) 10*exp(-((x - 0.5)^2 + (y - 0.5)^2) / 0.02)); g = Expression ('g', @(x,y) sin (5.0 * x)); -a = BilinearForm ('Poisson', V); +a = BilinearForm ('Poisson', V, V); L = LinearForm ('Poisson', V, f, g); # Compute solution