diff options
| -rw-r--r-- | fortran/navy_four_levels/FourLevelPulseProp_Double.f95 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 b/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 index 4e0cfc9..30d4fb6 100644 --- a/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 +++ b/fortran/navy_four_levels/FourLevelPulseProp_Double.f95 @@ -40,7 +40,7 @@ program FourLevelPulseProp_v3_Double parameter (nmat=3,npts=100) !matrix size, number of detuning points in dispersion curve !tpts is the number of temporal points in the cell !zpts is the number of z output slices - 1 - parameter (zptsmax=200) ! max Number of slices in z direction + parameter (zptsmax=500) ! max Number of slices in z direction parameter (tpts_max=200) ! max Number of slices in t direction parameter (NWrite=200) !number of frames to actually write |