Mercurial > repos > public > sbplib
comparison +sbp/+implementations/d2_12.m @ 266:bfa130b7abf6 operator_remake
Added error message for too few grid points to all implementation files.
author | Martin Almquist <martin.almquist@it.uu.se> |
---|---|
date | Fri, 09 Sep 2016 11:03:13 +0200 |
parents | 6009f2712d13 |
children | f7ac3cd6eeaa |
comparison
equal
deleted
inserted
replaced
265:3e0432b3cb68 | 266:bfa130b7abf6 |
---|---|
1 function [H, HI, D1, D2, e_1, e_m, M, Q, S_1, S_m] = d2_12(m,h) | 1 function [H, HI, D1, D2, e_1, e_m, M, Q, S_1, S_m] = d2_12(m,h) |
2 | 2 |
3 % D2 = D1*D1, wide! | 3 % D2 = D1*D1, wide! |
4 | |
5 BP = 15; | |
6 if(m<2*BP) | |
7 error(['Operator requires at least ' num2str(2*BP) ' grid points']); | |
8 end | |
4 | 9 |
5 H=diag(ones(m,1),0); | 10 H=diag(ones(m,1),0); |
6 H(1:15,1:15)=diag([2.880607858916397e-01,... | 11 H(1:15,1:15)=diag([2.880607858916397e-01,... |
7 1.560376162339675e+00,... | 12 1.560376162339675e+00,... |
8 2.403139445479289e-01,... | 13 2.403139445479289e-01,... |