Mercurial > repos > public > sbplib
diff +sbp/D4CompatibleVariable.m @ 268:4b9310edcdf8 operator_remake
Renamned boundary operators!
| author | Martin Almquist <martin.almquist@it.uu.se> |
|---|---|
| date | Fri, 09 Sep 2016 15:06:03 +0200 |
| parents | 8a625c5a3633 |
| children | fefb2f9884f7 |
line wrap: on
line diff
--- a/+sbp/D4CompatibleVariable.m Fri Sep 09 14:53:41 2016 +0200 +++ b/+sbp/D4CompatibleVariable.m Fri Sep 09 15:06:03 2016 +0200 @@ -4,20 +4,20 @@ H % Norm matrix HI % H^-1 Q % Skew-symmetric matrix - e_1 % Left boundary operator - e_m % Right boundary operator + e_l % Left boundary operator + e_r % Right boundary operator D2 % SBP operator for second derivative M % Norm matrix, second derivative - S_1 % Left boundary first derivative - S_m % Right boundary first derivative + d1_l % Left boundary first derivative + d1_r % Right boundary first derivative D3 % SBP operator for third derivative Q3 % Skew-symmetric matrix in third derivative - S2_1 % Left boundary second derivative - S2_m % Right boundary second derivative + d2_l % Left boundary second derivative + d2_r % Right boundary second derivative D4 % SBP operator for fourth derivative M4 % Norm matrix, fourth derivative - S3_1 % Left boundary third derivative - S3_m % Right boundary third derivative + d3_l % Left boundary third derivative + d3_r % Right boundary third derivative m % Number of grid points. h % Step size x % grid @@ -36,23 +36,23 @@ obj.x = linspace(x_l,x_r,m)'; if order == 2 - [obj.H, obj.HI, ~, obj.D2, ~, obj.D4, obj.e_1, obj.e_m,... - obj.M4, ~, obj.S2_1, obj.S2_m, obj.S3_1,... - obj.S3_m, obj.S_1, obj.S_m] =... + [obj.H, obj.HI, ~, obj.D2, ~, obj.D4, obj.e_l, obj.e_r,... + obj.M4, ~, obj.d2_l, obj.d2_r, obj.d3_l,... + obj.d3_r, obj.d1_l, obj.d1_r] =... sbp.implementations.d4_compatible_halfvariable_2(m,obj.h); obj.borrowing.N.S2 = 1.2500; obj.borrowing.N.S3 = 0.4000; elseif order == 4 - [obj.H, obj.HI, obj.D2, obj.D4, obj.e_1, obj.e_m, obj.M4,... - obj.S2_1, obj.S2_m, obj.S3_1, obj.S3_m, obj.S_1,... - obj.S_m] =... + [obj.H, obj.HI, obj.D2, obj.D4, obj.e_l, obj.e_r, obj.M4,... + obj.d2_l, obj.d2_r, obj.d3_l, obj.d3_r, obj.d1_l,... + obj.d1_r] =... sbp.implementations.d4_compatible_halfvariable_4(m,obj.h); obj.borrowing.N.S2 = 0.5055; obj.borrowing.N.S3 = 0.9290; elseif order == 6 - [obj.H, obj.HI, obj.D2, obj.D4, obj.e_1, obj.e_m, obj.M4,... - obj.S2_1, obj.S2_m, obj.S3_1, obj.S3_m, obj.S_1,... - obj.S_m] =... + [obj.H, obj.HI, obj.D2, obj.D4, obj.e_l, obj.e_r, obj.M4,... + obj.d2_l, obj.d2_r, obj.d3_l, obj.d3_r, obj.d1_l,... + obj.d1_r] =... sbp.implementations.d4_compatible_halfvariable_6(m,obj.h); obj.borrowing.N.S2 = 0.3259; obj.borrowing.N.S3 = 0.1580;