summaryrefslogtreecommitdiff
path: root/xmds2/Genas_system/Genas_system.xmds
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2011-08-24 20:24:06 -0400
committerEugeniy Mikhailov <evgmik@gmail.com>2011-08-24 20:24:06 -0400
commit0b31b0f3a57807f92b39ebf51c0961c9e0a20e3d (patch)
treee771c20c2a1196efd8a8ffc8b50ae95ff6cbaa4c /xmds2/Genas_system/Genas_system.xmds
parent702914af66cfc1b364ad9b6624a49cef6e013ab6 (diff)
downloadNresonances-0b31b0f3a57807f92b39ebf51c0961c9e0a20e3d.tar.gz
Nresonances-0b31b0f3a57807f92b39ebf51c0961c9e0a20e3d.zip
Added function which defines shift of level |3> as function of z
Diffstat (limited to 'xmds2/Genas_system/Genas_system.xmds')
-rw-r--r--xmds2/Genas_system/Genas_system.xmds12
1 files changed, 12 insertions, 0 deletions
diff --git a/xmds2/Genas_system/Genas_system.xmds b/xmds2/Genas_system/Genas_system.xmds
index 189c0a6..64b6a7d 100644
--- a/xmds2/Genas_system/Genas_system.xmds
+++ b/xmds2/Genas_system/Genas_system.xmds
@@ -68,6 +68,18 @@
complex Exc, Eyc; // Complex-conjugated Rabi frequency
complex r21, r31, r41, r32, r42, r43, r44; // density matrix elements
+
+ double delta0z(double z) {
+ // calculates detuning/shift of exited m=0 sublevel as a function of z
+ double delta;
+ // printf("z=%g \t delta0= %g\n", z, delta0);
+ if (z <= 0.09) {
+ delta = 1.0*delta0;
+ } else {
+ delta = -1.0*delta0;
+ }
+ return delta;
+ }
]]>
</globals>
<benchmark />