diff --git a/Inst_eddies/config.f90 b/Inst_eddies/config.f90 index 7216be7f33bc3682aaf4220c2f5a8a618dffaa84..5854cebd7234fce9a3b4bb28211c50ebf0f513df 100644 --- a/Inst_eddies/config.f90 +++ b/Inst_eddies/config.f90 @@ -19,8 +19,6 @@ contains subroutine config(exist) - use, intrinsic:: ISO_FORTRAN_ENV - ! Libraries: use jumble, only: new_unit @@ -39,8 +37,6 @@ contains read(unit, nml = main_nml) close(unit) else - write(unit = error_unit, nml = main_nml) - write(unit = error_unit, fmt = *) "config: Enter namelist main_nml." open(unit, file = "main_nml.txt", status = "old", action = "read", & position = "rewind") read(unit, nml = main_nml)