Mercurial > repos > public > sbplib

comparison +sbp/D2.m @ 252:07fa0d6a05bb operator_remake

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Renamned class files and added nonequidistant operators.
author Martin Almquist <martin.almquist@it.uu.se>
date Wed, 07 Sep 2016 13:40:41 +0200
parents
children df3cc9c5dffc
comparison
equal deleted inserted replaced
251:6a5e94bb5e13 252:07fa0d6a05bb
1 classdef D2 < sbp.OpSet
2 properties
3 norms % Struct containing norm matrices such as H,Q, M
4 boundary % Struct contanging vectors for boundry point approximations
5 derivatives % Struct containging differentiation operators
6 borrowing % Struct with borrowing limits for different norm matrices
7 m % Number of grid points.
8 h % Step size
9 end
10
11 methods
12 function obj = D2(m,h,order)
13
14 if order == 2
15 [H, HI, D1, D2, e_1, e_m, M,Q S_1, S_m] = sbp.ordinary2(m,h);
16 obj.borrowing.M.S = 0.4000;
17 elseif order == 4
18 [H, HI, D1, D2, e_1, e_m, M,Q S_1, S_m] = sbp.ordinary4(m,h);
19 obj.borrowing.M.S = 0.2508;
20 elseif order == 6
21 [H, HI, D1, D2, e_1, e_m, M,Q S_1, S_m] = sbp.ordinary6(m,h);
22 obj.borrowing.M.S = 0.1878;
23 elseif order == 8
24 [H, HI, D1, D2, e_1, e_m, M,Q S_1, S_m] = sbp.ordinary8(m,h);
25 obj.borrowing.M.S = 0.0015;
26 elseif order == 10
27 [H, HI, D1, D2, e_1, e_m, M,Q S_1, S_m] = sbp.ordinary10(m,h);
28 obj.borrowing.M.S = 0.0351;
29 else
30 error('Invalid operator order %d.',order);
31 end
32
33 obj.h = h;
34 obj.m = m;
35
36 obj.norms.H = H;
37 obj.norms.HI = HI;
38 obj.norms.Q = Q;
39 obj.norms.M = M;
40
41 obj.boundary.e_1 = e_1;
42 obj.boundary.S_1 = S_1;
43
44 obj.boundary.e_m = e_m;
45 obj.boundary.S_m = S_m;
46
47 obj.derivatives.D1 = D1;
48 obj.derivatives.D2 = D2;
49
50 end
51 end
52
53 methods (Static)
54 function lambda = smallestGrid(obj)
55 error('Not implmented')
56 end
57 end
58 end
59
60
61
62
63