1;


load 'total_absorption_vs_detuning.mat' ;

figure(1);
hold off;
max_abs=max(total_absorption_vs_detuning); 
zoom_factor=1/max_abs;
%plot(detuning_freq, zoom_factor*(max_abs- total_absorption_vs_detuning), '-');  
plot( zoom_factor*(max_abs- total_absorption_vs_detuning), '-');  
title("relative transmission");
xlabel("two photon detuning");

%load 'xi_vs_detuning.mat' ;

%figure(1); 
	%hold off;
	%plot(detuning_freq, imag(xi_linear), '-1;linear;');  
	%hold on;
	%plot(detuning_freq, imag(xi_left),   '-2;left;');  
	%plot(detuning_freq, imag(xi_right),  '-3;right;');  
	%title("probe absorption");
	%hold off;
%figure(2); 
	%hold off;
	%plot(detuning_freq, real(xi_linear), '-1;linear;');  
	%hold on;
	%plot(detuning_freq, real(xi_left),   '-2;left;');  
	%plot(detuning_freq, real(xi_right),  '-3;right;');  
	%title("probe dispersion");
	%hold off;