Mercurial > repos > public > sbplib
diff +sbp/+implementations/d2_8.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 |
line wrap: on
line diff
--- a/+sbp/+implementations/d2_8.m Fri Sep 09 10:41:31 2016 +0200 +++ b/+sbp/+implementations/d2_8.m Fri Sep 09 11:03:13 2016 +0200 @@ -1,4 +1,11 @@ function [H, HI, D1, D2, e_1, e_m, M, Q, S_1, S_m] = d2_8(m,h) + + + BP = 8; + if(m<2*BP) + error(['Operator requires at least ' num2str(2*BP) ' grid points']); + end + H=diag(ones(m,1),0); H(1:8,1:8)=diag([1498139/5080320, 1107307/725760, 20761/80640, 1304999/725760, 299527/725760, 103097/80640, 670091/725760, 5127739/5080320]); H(m-7:m,m-7:m)=fliplr(flipud(diag([1498139/5080320, 1107307/725760, 20761/80640, 1304999/725760, 299527/725760, 103097/80640, 670091/725760, 5127739/5080320])));