lcesari.m

来自「LiScNLS is a Matlab application for the 」· M 代码 · 共 11 行

function [p,dp,q,r,alp,dom,x,wint,wipr]=LCesari(n)
dom=[0,1];alpha=(dom(2)-dom(1))/2;beta=(dom(2)+dom(1))/2;
e1=ones(n,1)/2;e2=e1;e2(2)=1;X=spdiags([e1,e2],[-1,1],n,n);
X=alpha*X+beta*eye(n);
p=1;
dp=0;
q=-1;
r=1;
alp=[1,0;1,1];
[x,wint]=pd(n,dom);
wipr=ones(n,1);