onpolygon.m

来自「本代码为基于matlab的求解偏微分方程的利用径向基函数的无网格方法的源码」· M 代码 · 共 16 行

function z=onpolygonRO(h,vertex)
% defines values on  a boundary
%which is defined by a closed polygonal curve 
% determined by the vertices "vertex"
z1=[];
vertex=[vertex;vertex(1,:)];
for i=1:max(size(vertex))-1
p1=vertex(i,:);    
p2=vertex(i+1,:);
n=ceil(norm(p1-p2)/h);
trueh=norm(p1-p2)/n;
for j=1:n
    z1=[z1; p1+((j-1)/n)*(p2-p1)];
    end;
end;
z=z1;