Mercurial > repos > public > sbplib

view operator_def/assemble_D2.m @ 830:e15a667ffde2 feature/operator_files

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add quadrature stencils and operator assembly. Add tests
author Vidar Stiernström <vidar.stiernstrom@it.uu.se>
date Mon, 10 Sep 2018 19:27:27 +0200
parents e0913772dc1c
children
line wrap: on
line source

function [D2,e_l,e_r,d1_l,d1_r] = assemble_D2(stencil,h,m)
  stencil_variables = read_stencil(stencil);  
  D2 = assemble_op(stencil_variables.inner_stencil,stencil_variables.boundary_stencils,m,1)/h^2;
  [e_l, e_r] = assemble_boundary_op(stencil_variables.e,m);
  [d1_l, d1_r] = assemble_boundary_op(stencil_variables.d1,m);
  d1_l = d1_l/h;
  d1_r = -d1_r/h;
  end