comparison +scheme/Elastic2dVariableAnisotropic.m @ 1335:8d9fc7981796 feature/D2_boundary_opt

Calculate width for all orders
author Vidar Stiernström <vidar.stiernstrom@it.uu.se>
date Sat, 07 May 2022 10:41:22 +0200
parents a38e80fdbf60
children da61892884a4
comparison
equal deleted inserted replaced
1334:df8c71b80c33 1335:8d9fc7981796
200 e2_s = (e_scalar_s'*E{2}')'; 200 e2_s = (e_scalar_s'*E{2}')';
201 e2_n = (e_scalar_n'*E{2}')'; 201 e2_n = (e_scalar_n'*E{2}')';
202 202
203 203
204 % D2 204 % D2
205 width = order+1;
205 switch order 206 switch order
206 case 2 207 case 2
207 width = 3;
208 nBP = 2; 208 nBP = 2;
209 case 4 209 case 4
210 width = 5;
211 nBP = 6; 210 nBP = 6;
212 case 6 211 case 6
213 width = 7;
214 nBP = 9; 212 nBP = 9;
215 end 213 end
216 for j = 1:dim 214 for j = 1:dim
217 for k = 1:dim 215 for k = 1:dim
218 for l = 1:dim 216 for l = 1:dim