sext_sens_scan

esrf(:)

0001 %esrf(:)
0002 xi0=[0.3644 0.33475];
0003 %esrf=atreadbeta('/Users/boaznash/work/current_projects/AT/esrfdata/s13s20thick.str');
0004 %esrf=atreadbeta('s13s20thick.str');
0005 esrf=atreadbeta('/Users/boaznash/MyDocs/work_career/current_projects/AT/esrfdata/s13s20thick.str','CavityPass');
0006 esrf0=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0007 esrf0=atfitchrom(esrf0,xi0,{'S13','S20'},'S19');
0008 
0009 esrf=esrf0;
0010 nlchromplot(esrf,-.04,.04,30,16,1,0);
0011 esrf=scalesext(esrf,'S4',.95);
0012 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0013 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0014 nlchromplot(esrf,-.04,.04,30,16,1,1);
0015 title('S4')
0016 
0017 esrf=esrf0;
0018 nlchromplot(esrf,-.04,.04,30,16,2,0);
0019 esrf=scalesext(esrf,'S6',.95);
0020 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0021 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0022 nlchromplot(esrf,-.04,.04,30,16,2,1);
0023 title('S6')
0024 
0025 esrf=esrf0;
0026 nlchromplot(esrf,-.04,.04,30,16,3,0);
0027 esrf=scalesext(esrf,'S13',.95);
0028 %esrf=atfitchrom(esrf,[0.3642 0.3346],'S13','S19');
0029 nlchromplot(esrf,-.04,.04,30,16,3,1);
0030 title('S13 (no xi retune)')
0031 
0032 esrf=esrf0;
0033 nlchromplot(esrf,-.04,.04,30,16,4,0);
0034 esrf=scalesext(esrf,'S19',.95);
0035 %esrf=atfitchrom(esrf,[0.3642 0.3346],'S13','S19');
0036 nlchromplot(esrf,-.04,.04,30,16,4,1);
0037 title('S19 (no xi retune)')
0038 
0039 esrf=esrf0;
0040 nlchromplot(esrf,-.04,.04,30,16,5,0);
0041 esrf=scalesext(esrf,'S20',.95);
0042 %esrf=atfitchrom(esrf,[0.3642 0.3346],'S13','S19');
0043 nlchromplot(esrf,-.04,.04,30,16,5,1);
0044 title('S20 (no xi retune)')
0045 
0046 esrf=esrf0;
0047 nlchromplot(esrf,-.04,.04,30,16,6,0);
0048 esrf=scalesext(esrf,'S22',.95);
0049 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0050 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0051 nlchromplot(esrf,-.04,.04,30,16,6,1);
0052 title('S22')
0053 
0054 esrf=esrf0;
0055 nlchromplot(esrf,-.04,.04,30,16,7,0);
0056 esrf=scalesext(esrf,'S24',.95);
0057 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0058 esrf=atfitchrom(esrf,xi0,{'S13','S20'},'S19');
0059 nlchromplot(esrf,-.04,.04,30,16,7,1);
0060 title('S24')