fig4_10

 FIG4_10  Script to produce  Fig 4.10, pag. 203 CHQZ2
 
 Legendre collocation first-derivative eigenvalues computation and plot

 Reference: CHQZ2 = C. Canuto, M.Y. Hussaini, A. Quarteroni, T.A. Zang,
                    "Spectral Methods. Fundamentals in Single Domains"
                    Springer Verlag, Berlin Heidelberg New York, 2006.

0001 % FIG4_10  Script to produce  Fig 4.10, pag. 203 CHQZ2
0002 %
0003 % Legendre collocation first-derivative eigenvalues computation and plot
0004 %
0005 % Reference: CHQZ2 = C. Canuto, M.Y. Hussaini, A. Quarteroni, T.A. Zang,
0006 %                    "Spectral Methods. Fundamentals in Single Domains"
0007 %                    Springer Verlag, Berlin Heidelberg New York, 2006.
0008 
0009 %   Written by Paola Gervasio
0010 %   $Date: 2007/04/01$
0011 
0012 
0013 N=[8,16,32,64];
0014     nu=1;
0015     pbl=0;
0016 % left
0017 for nx=N
0018     [d,A]=lgl_eig(nx,nu,pbl);
0019 fig=figure(...,
0020     'Name',['Fig. 4.10 N=',num2str(nx)],...
0021     'Visible','on');
0022 plot(real(d),imag(d),'ko'); grid on
0023 xlabel('Real'); ylabel('Imag');
0024 axis equal
0025 legend(['N=',num2str(nx)]);
0026 end