0001 if nargin<2, sLinLog='log'; end
0002
0003
0004 figure('Name','Wavelength dependence of LFIEF averages');
0005
0006 lambda=stEsurf.lambda;
0007 plot(lambda,stEsurf.MLocPerpAve,lambda,stEsurf.MLocParaAve, ...
0008 lambda,stEsurf.MLocAve,lambda,sqrt(stEsurf.F0E4Ave));
0009
0010 xlabel('Wavelength [nm]');
0011 ylabel('Average field EFs');
0012 legend('<M_{Loc}^{perp}>','<M_{Loc}^{//}>','<M_{Loc}>','(F_{E4}^0)^{1/2}');
0013 title(['Wavelength dependence of LFIEF averages at r=' num2str(stEsurf.r0) 'nm']);
0014
0015 if ~strcmpi(sLinLog,'linear')
0016 set(gca,'Yscale','log')
0017 end