From c680b440e6963ab1f507ca0fcefdc3ce982db8af Mon Sep 17 00:00:00 2001 From: Eugeniy Mikhailov Date: Mon, 21 Dec 2009 22:48:07 +0000 Subject: calculation of total absorption is added --- liouville.m | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'liouville.m') diff --git a/liouville.m b/liouville.m index 29b07f9..fd991a5 100644 --- a/liouville.m +++ b/liouville.m @@ -87,9 +87,11 @@ fflush (stderr); % once we define all problems the main job is done here %kappa_p=cellfun( @susceptibility_steady_state_at_freq, problems_cell_array); %kappa_p=parcellfun(2, @susceptibility_steady_state_at_freq, problems_cell_array); -[xi_linear, xi_left, xi_right]=parcellfun(2, @susceptibility_steady_state_at_freq, problems_cell_array); +%[xi_linear, xi_left, xi_right]=parcellfun(2, @susceptibility_steady_state_at_freq, problems_cell_array); +total_absorption_vs_detuning=parcellfun(2, @total_field_absorption, problems_cell_array); -save 'xi_vs_detuning.mat' detuning_freq xi_linear xi_left xi_right ; +%save 'xi_vs_detuning.mat' detuning_freq xi_linear xi_left xi_right ; +save 'total_absorption_vs_detuning.mat' detuning_freq total_absorption_vs_detuning; output_results; -- cgit v1.2.3