

%Test data PRIMET pupil re-imaging AT3-G2-DL2 with flat STS-VCM (instead of theoretical value of 731 mm)  
% COM6 July 2009

OPL_m=[60
50  
40 
30
20 
10 
];

%curvature in mm-1
Curv_mm=[3.186e-3
2.8e-3
2.416e-3
2.032e-3
1.647e-3
1.262e-3
]

Pressure_bar=[1.3294
1.15
0.973424
0.8
0.62742
0.4566
];

pupil_FWHM_um=[1089
1089
1136
1125
1119
1124
];

ellipticity=[0.968
0.95
0.989
0.995
0.978
0.987
];

Power_mW=[57 
60 
58 
60 
60 
62
];

ROC=1./Curv_mm;

%From DL2_ROC_AT2_G2_flatSTSVCM.m
% radius_DL2VCM_Theoretical_for_flat_STS_VCM
  radius=[339.4139  390.3853  459.3714  557.9722  710.4695  977.6738];
% radius_DL2VCM_Theoretical_for_flat_STS_VCM but PIn DL shifted increased
% by 6.235 m
  radius_shift=[ 313.8627  356.9616  413.7809  492.1128  607.0280  791.9622]


h=figure(1);
set(gca,'FontSize',13);
plot(OPL_m,ROC,'b.-',OPL_m,radius,'k*-',OPL_m,radius_shift,'ko');
grid;
xlabel('OPL in m');ylabel('DL2-VCM ROC in mm');
title('COM6 AT3-G2-DL2-DDL2 with flat STS-VCM')
legend('Optimum for PRIMETB ','theoretical value','theoretical value with DL PIN shifted by 6.235m')
% note: measured on Beam profiler located ~1.06m from FSUB

h=figure(2);
set(gca,'FontSize',13);
bar(OPL_m,pupil_FWHM_um-mean(pupil_FWHM_um) );
grid;
xlabel('OPL in m');ylabel('FWHM -mean(FWHM) in microns');
title('COM6 AT3-G2-DL2-DDL2 with flat STS-VCM')
legend('PRIMETB, mean FWHM=1113 microns')






