From 3c8ff1b86d8368942dc0b869bfadba1d88effa9a Mon Sep 17 00:00:00 2001 From: Eugeniy Mikhailov Date: Thu, 25 Aug 2011 15:15:55 -0400 Subject: Comment about W variables as decay rates --- fortran/navy_four_levels/FourLevelPulseProp_Double.f95 | 1 + 1 file changed, 1 insertion(+) diff --git a/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 b/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 index 62c050e..9279e69 100644 --- a/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 +++ b/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 @@ -94,6 +94,7 @@ program FourLevelPulseProp_v3_Double Gamma_super=2*pi*6e6 ! Characteristic decay of upper level in [1/s] lambda=794.7e-9 ! Wavelength in [m] Ndensity=1e10*(1e6) ! Density in m^-1 + ! atomic decay parameters in units of Gamma_super W41=0 W42=1 W43=0 -- cgit v1.2.3