summaryrefslogtreecommitdiff
path: root/fortran/navy_four_levels
diff options
context:
space:
mode:
Diffstat (limited to 'fortran/navy_four_levels')
-rw-r--r--fortran/navy_four_levels/FourLevelPulseProp_Double.f952
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 c5a6565..abb7fca 100644
--- a/fortran/navy_four_levels/FourLevelPulseProp_Double.f95
+++ b/fortran/navy_four_levels/FourLevelPulseProp_Double.f95
@@ -30,7 +30,7 @@ program FourLevelPulseProp_v3_Double
! SYSTEM DEFAULTS
! ---------------------------------------------------------------------------
integer zpts
- parameter (zpts=10) ! Number of slices in z direction
+ parameter (zpts=200) ! Number of slices in z direction
! ---------------------------------------------------------------------------