src.asv

来自「五点差分型多重网格方法：各种插值算子的比较）」· ASV 代码 · 共 5 行

%======design right function of FEM  =================================
%
function z=SRC(x,y)
 %z= 2*((1-6*x.*x).*y.*y.*(1-y.*y)+(1-6*y.*y).*x.*x.*(1-x.*x)); 
  z= (2*pi*pi+1)*cos(pi*x).*cos(pi*y);