Skip to content
Snippets Groups Projects
Commit fd6474e8 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann
Browse files

delete redundancy

parent 6a35ad17
No related branches found
No related tags found
No related merge requests found
...@@ -5,9 +5,6 @@ MODULE initial_par ...@@ -5,9 +5,6 @@ MODULE initial_par
IMPLICIT NONE IMPLICIT NONE
PRIVATE PRIVATE
! To restart the simulation or look for saved state
LOGICAL, PUBLIC, PROTECTED :: RESTART=.true.
CHARACTER(len=128), PUBLIC :: backup_file
! Initial background level ! Initial background level
REAL(dp), PUBLIC, PROTECTED :: initback_moments=0._dp REAL(dp), PUBLIC, PROTECTED :: initback_moments=0._dp
! Initial background level ! Initial background level
...@@ -39,8 +36,6 @@ CONTAINS ...@@ -39,8 +36,6 @@ CONTAINS
USE prec_const USE prec_const
IMPLICIT NONE IMPLICIT NONE
NAMELIST /INITIAL_CON/ RESTART
NAMELIST /INITIAL_CON/ backup_file
NAMELIST /INITIAL_CON/ only_Na00 NAMELIST /INITIAL_CON/ only_Na00
NAMELIST /INITIAL_CON/ initback_moments NAMELIST /INITIAL_CON/ initback_moments
NAMELIST /INITIAL_CON/ initnoise_moments NAMELIST /INITIAL_CON/ initnoise_moments
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment