% Jon Newman
% Plot the x/y profile of the illumination pattern for c3 Kohler train.


fid = 'c3_x-profile_yellow-led_formatted.txt';
xsec = textread(fid,'','delimiter' ,';');
% fid = 'c3_7-profile_yellow-led_formatted.txt';
% ysec = textread(fid,'','delimiter' ,';');

figure
hold on
plot(6.45*xsec(:,1),smooth(xsec(:,2),5));
plot(6.45*xsec(:,3),smooth(xsec(:,4),5),'r')
set(gca,'TickDir','out','TickLength',[0.01 0.025])

%%
export_fig 'c3_led_cross-sections' r400 -transparent
export_fig 'c3_led_cross-sections' -pdf -transparent