From 7a1fcfbda1b032a082390221870fa58cbb2810c3 Mon Sep 17 00:00:00 2001
From: Eugeniy Mikhailov <evgmik@gmail.com>
Date: Thu, 20 Sep 2012 23:30:39 -0400
Subject: added imaginary one to propagation equation into the polarization

---
 xmds2/realistic_Rb/realistic_Rb.xmds | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/xmds2/realistic_Rb/realistic_Rb.xmds b/xmds2/realistic_Rb/realistic_Rb.xmds
index 598715f..3f558bb 100644
--- a/xmds2/realistic_Rb/realistic_Rb.xmds
+++ b/xmds2/realistic_Rb/realistic_Rb.xmds
@@ -521,10 +521,10 @@
         <integration_vectors>E_field</integration_vectors>
 				<dependencies>density_matrix</dependencies>
           <![CDATA[
-					dE1_dz = 0.16666666666666666*eta1*(2.449489742783178*r0309 + 4.242640687119286*r0410 + 6.*r0511) - Lt[E1];
-					dE2_dz = -0.8164965809277261*eta1*(r0709 + r0810) - Lt[E2];
-					dE3_dz = -1.*eta2*(1.7320508075688772*r0614 + 3.*r0715 + 4.242640687119286*r0816) - Lt[E3];
-					dE4_dz = (4*eta2*(2.449489742783178*r0113 + 3*r0214 + 3*r0315 + 2.449489742783178*r0416))/3. - Lt[E4];
+					dE1_dz = i*0.16666666666666666*eta1*(2.449489742783178*r0309 + 4.242640687119286*r0410 + 6.*r0511) - Lt[E1];
+					dE2_dz = -i*0.8164965809277261*eta1*(r0709 + r0810) - Lt[E2];
+					dE3_dz = -i*1.*eta2*(1.7320508075688772*r0614 + 3.*r0715 + 4.242640687119286*r0816) - Lt[E3];
+					dE4_dz = i*(4*eta2*(2.449489742783178*r0113 + 3*r0214 + 3*r0315 + 2.449489742783178*r0416))/3. - Lt[E4];
           ]]>
 			</operators>
 		</integrate>
-- 
cgit v1.2.3