From 9d93adcbc78004e9b24b35b08c26c00ea5b7d2af Mon Sep 17 00:00:00 2001
From: Eugeniy Mikhailov <evgmik@gmail.com>
Date: Tue, 23 Aug 2011 11:15:08 -0400
Subject: Output of the pulse before and after the cell

---
 fortran/navy_four_levels/pp.m | 17 ++++++++++++++---
 1 file changed, 14 insertions(+), 3 deletions(-)

(limited to 'fortran')

diff --git a/fortran/navy_four_levels/pp.m b/fortran/navy_four_levels/pp.m
index e0bc0ec..4aeecca 100644
--- a/fortran/navy_four_levels/pp.m
+++ b/fortran/navy_four_levels/pp.m
@@ -2,20 +2,31 @@ d=load('Movie4level.dat');
 
 t=d(:,1);
 z=d(:,2);
+t=t*1e6;  % switch to uS
 Om1=d(:,3);
 Om2=d(:,4);
 Om3=d(:,5);
 Om_vac=d(:,6);
 
+% figure(1)
 % plot3( t, z, Om1);
+xlabel('Time (uS)');
+ylabel('z (m)');
+zlabel('Rabi frequency');
+
+
+%% End points time dependence
 
 d=load('Movie4level_EndPoints.dat');
 t=d(:,1);
 t=t*1e6;  % switch to uS
-Om1=d(:,2);
-Om_vac=d(:,3);
+Om1_strt=d(:,2);
+Om_vac_strt=d(:,3);
+Om1_end=d(:,4);
+Om_vac_end=d(:,5);
 
-plot(t,Om1, '-;Om1;', t,Om_vac, '-;Om_{vac};');
+figure(2)
+plot(t, Om1_strt, '-;Om1_{strt};', t, Om_vac_strt, '-;Om_{vac_{strt}};', t,  Om1_end, '-;Om1_{end};', t,Om_vac_end, '-;Om_{vac_{end}};');
 xlabel('Time (uS)');
 ylabel('Rabi frequency');
 
-- 
cgit v1.2.3