1;


load './cached/total_circ_relative_transmission_vs_theta.mat'

% let's create sideband transmission vs angle vectors
% 1st of all we need to create matrix instead of a vector
% with rows corresponding to absorption for each sideband
% and columns to each phi angle

N_detunings=length(detuning_freq);
N_angles=length(thetas);

transmission_matrix=reshape(total_relative_transmission_vs_theta, N_detunings, N_angles);

% the last sideband is not in two-photon resonance
% we use it as a reference for background transmission
background_vector=transmission_matrix(N_detunings,:);
background_transmission=repmat( background_vector , N_detunings, 1);

transmission_matrix=-background_transmission+transmission_matrix;



line_colors= [ ...
	[ 0,   0,   1]; ...
	[ 1,   0,   0]; ...
	[ 0,   1,   0]; ...
	[ 0,   0,   0]; ...
	[ 0, 0.8,   0]; ...
	[ 1,   0,   1]; ...
	[ 0,   0,  .6] ...
	];

figure(1);
clf();
hold off;
labels={};
for i=1:N_detunings-1
	%we will skip the very last row since it the reference transmission

	zoom_factor=1;
	%plot_style=strcat("-", num2str(i));
	%plot( thetas, zoom_factor*(transmission_matrix(i,:)), plot_style);  
	labels = {labels{:}, strcat("a_{", num2str(i-4), "}")};
	line( thetas, zoom_factor*(transmission_matrix(i,:)), "color", line_colors(i,:) );  
	hold on;
endfor
  
set(gca, 'XTick', [0,pi/4, pi/2, 3*pi/4, pi])
set(gca, 'XTickLabel', {'0', '\pi/4', '\pi/2', '3\pi/4', '\pi'})
title("Relative sidebands amplitudes");
xlabel('Angle \theta, between B-field and light propagation direction');
ylabel("Amplitude");
legend(labels);
print('compass_circ_sidebands_vs_theta.png')

hold off;

figure(2)
j=4; k= 3;
j=2; k= 7;
% plotting parametric line of a sideband amplitude (j) vs another one (k)
z = zeros(1,N_angles);
col = thetas;  % This is the color, vary with x in this case.
surface([zoom_factor*(transmission_matrix(j,:));zoom_factor*(transmission_matrix(j,:))], ...
  [zoom_factor*(transmission_matrix(k,:));zoom_factor*(transmission_matrix(k,:))], ...
  [z;z],[col;col],...
  'facecol','no',...
  'edgecol','interp',...
  'linew',2);
%plot(zoom_factor*(transmission_matrix(j,:)), zoom_factor*(transmission_matrix(k,:)))
xlabel( labels{j});
ylabel( labels{k});
%clabel('\theta');
colorbar;
set(gca, 'ZTick', [0,pi/4, pi/2, 3*pi/4, pi])
set(gca, 'ZTickLabel', {'0', '\pi/4', '\pi/2', '3\pi/4', '\pi'})

%colorbar('Ticks',[0, pi/2, pi], 'TicksLabels', ['0', '\pi/2', '\pi'])
%ctickslabel(['0', '\pi/2', '\pi'])
title('One sideband amplitude vs another for different angles theta');
print('compass_circ_sidebands_combo_vs_theta.png')


% vim: ts=2:sw=2:fdm=indent