summaryrefslogtreecommitdiff
path: root/fortran/navy_four_levels
Commit message (Collapse)AuthorAgeFilesLines
* One more loop finished with 'end do'Eugeniy Mikhailov2011-07-131-24/+24
|
* Indent file to improve readabilityEugeniy Mikhailov2011-07-131-70/+71
|
* Do loop switched to F90 format: they finished with 'end do'Eugeniy Mikhailov2011-07-131-6/+6
| | | | * this improves readability
* Remove a lot of unused codeEugeniy Mikhailov2011-07-131-68/+8
|
* Unused subroutines removedEugeniy Mikhailov2011-07-121-70/+0
|
* Remove 1st space from the formated outputEugeniy Mikhailov2011-07-121-1/+1
| | | | * I see no need for this space
* Add the output of the Gaussian peak position in timeEugeniy Mikhailov2011-07-121-0/+1
|
* Calculate canonic EIT caseEugeniy Mikhailov2011-07-121-7/+7
| | | | | | | | * field 1 is weak and has Gaussian temporal profile * field 2 is strong * field 3 is off * vacuum propagated field start similar to field 1 * cell length enlarged to see pulse delay
* Output format changed. Output |Om| instead of amplitudeEugeniy Mikhailov2011-07-121-1/+1
| | | | | * this take care of complex part which seems to be disregarded with current format for write statement
* Remove unused subroutinesEugeniy Mikhailov2011-07-121-124/+0
|
* Permissions fix: sources do not need executable flagEugeniy Mikhailov2011-07-121-0/+0
|
* Replaced FourLevelPulseProp_v*_Double.f95 with FourLevelPulseProp_Double.f95 ↵Simon Rochester2011-07-123-716/+8
| | | | | | and edited makefile accordingly. Added t variable to the output file Movie4level.dat for plotting purposes.
* v2 and v3 are now the same except output filenamesEugeniy Mikhailov2011-07-102-25/+29
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | The v2 and v3 were design to be the same except difference of light fields time profiles in initial conditions. But looks like navy guys during edits drift both versions from correct realization. After bug fixes and mergers of insignificant details. I went peace by peace comparison and removed insignificant differences * print time elapsed * print the same other statements to output * same spaces in the statements so they are not shown as diffs * same number of t point * z frames number calculated the same * L is the same * density is the same * remove trailing semicolons to make lines the same * Omcpeak=0.1 in both files Then I look at crucial differences * k1=1-(W32+W31+W34)*dt -> W34 taken in account * j2=W21*dt * j8=W41*dt added to v3 to take in account decay of rho44 to rho11 * W42=1 in v2 it used to be zero * Omc is constant in both cases * rho14 in v3 had product of two rhos, now it the sum as in v2 * rho24 in v3 was calculated differently form v2: no conjg(Omc) was used * the fix is taken from v2 and seems to match our xmds code The only difference remained is output file names.
* Remove references of Ompeak. Ompeak -> Omcpeak to fix navy's typoEugeniy Mikhailov2011-07-101-2/+2
|
* b2 now initialized before first useEugeniy Mikhailov2011-07-102-2/+2
|
* output file rename to reflect main file versionEugeniy Mikhailov2011-07-101-1/+1
|
* replcae PAUSE with WRITE(*,*) to comply with Fortran 95Eugeniy Mikhailov2011-07-102-2/+2
|
* grumpy about fortranEugeniy Mikhailov2011-07-101-0/+4
|
* output file names match executable versionEugeniy Mikhailov2011-07-101-2/+2
|
* both fortran codes compile nowEugeniy Mikhailov2011-07-101-6/+11
|
* navy v3 added and modified to be compalible with fortranEugeniy Mikhailov2011-07-101-0/+704
|
* edit navy version of code to compile with gfortranEugeniy Mikhailov2011-07-082-0/+724