XIAN-FEM-2026June/三维matlab代码/matlab 3D一阶散射问题/getGaussPoints.m

15 lines
561 B
Matlab

function [u,v,w,weight,nbrGP]=getGaussPoints(type)
if type==1 %四面体
u = [ 0.25, 0.166666666667, 0.166666666667, 0.166666666667,0.5 ];
v = [ 0.25, 0.166666666667, 0.166666666667, 0.5,0.166666666667 ];
w = [ 0.25, 0.166666666667, 0.5, 0.166666666667,0.166666666667 ];
weight = [-0.133333333333, 0.075, 0.075, 0.075, 0.075];
nbrGP = 5;
else %三角形
nbrGP=4;
u=[0.333333333333333, 0.6, 0.2, 0.2];
v=[0.3333333333333333, 0.2, 0.6, 0.2];
w=[0,0,0,0];
weight=[-0.28125, .260416666666, .260416666666, .260416666666];
end