Mercurial > repos > public > sbplib
diff +sbp/+implementations/d1_upwind_7.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/d1_upwind_7.m Fri Sep 09 10:41:31 2016 +0200 +++ b/+sbp/+implementations/d1_upwind_7.m Fri Sep 09 11:03:13 2016 +0200 @@ -1,5 +1,10 @@ function [H, HI, Dp, Dm, e_1, e_m] = d1_upwind_7(m,h) + BP = 6; + if(m<2*BP) + error(['Operator requires at least ' num2str(2*BP) ' grid points']); + end + Hv=ones(m,1); Hv(1:6) = [0.19087e5/0.60480e5; 0.84199e5/0.60480e5; 0.18869e5/0.30240e5; 0.37621e5/0.30240e5; 0.55031e5/0.60480e5; 0.61343e5/0.60480e5; ]; Hv(m-5:m)=rot90(Hv(1:6),2);