LaguerreEig: marletta.m - File Exchange

Code covered by the BSD License

Highlights from
LaguerreEig

D=deriv(n)
P=param physiological values of the parameters
X=mult(n)
[Ps,Pu,L,V]=proj(A) calculates the projection operators, the eigenvalues
[x,A,f,kont]=jacob(x) calculates the critical points x and the corresponding Jacobian A
[x,coef,sol]=leuclag1(n,bas,P...
[x,w,T,iT,X,D]=lagtool(n,b) Tools for Laguerre spectral method
[x,w]=pd(n) Nodes and weights for Gauss-Laguerre quadrature
events_leuc( t,u )
f=leucemia3d(t,u)
laguer(a, x) http://dip.sun.ac.za/~weideman/research/mfiles/laguer.m
main_fermi
t=x2t(n,x)
airy_LagEig.m
anharmonic.m
hydrogen.m
laguerrestartup.m
main_leuc.m
marletta.m
pryce.m
siyyam.m
siyyam1.m
work2.m
View all files

from LaguerreEig by Damian Trif
Calculates numerical eigenvalues and eigenfunctions of Schroedinger problems on (0,infinity).

marletta.m

n=50;
[x,w]=pd(n);t=x2t(n,x);D=deriv(n);X=mult(n);
V=0.75*(X-31*eye(n))*inv((eye(n)+X)*(4*eye(n)+X)^2);
A=-D^2+V;
A(n,:)=sum(5*eye(n)+8*D);
B=zeros(n);
B(n,:)=A(n,:)/(1.e10);
for i=1:n-1 B(i,i)=1;end;
[v,l]=eig(A,B);
L=diag(l);
[L,ind]=sort(L);
psi=v(:,ind);
L(1:11)

Highlights from LaguerreEig

Highlights from
LaguerreEig