From 2a5bfba3daa81bfa0d0be0f863865bfda3101db7 Mon Sep 17 00:00:00 2001
From: Sylvain Tricot <sylvain.tricot@univ-rennes1.fr>
Date: Mon, 7 Mar 2022 11:53:48 +0100
Subject: [PATCH] Output is redirected to stdout by default.

---
 src/fortran/_dfm.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/fortran/_dfm.f90 b/src/fortran/_dfm.f90
index d895b3a..e71b065 100644
--- a/src/fortran/_dfm.f90
+++ b/src/fortran/_dfm.f90
@@ -156,7 +156,7 @@ SUBROUTINE EPSILON(MYINFILE, MYOUTDIR)
 !  Opening input/log data files
 !
         OPEN(UNIT=5,FILE=TRIM(INPDATA(JF)),STATUS='OLD')            !
-        OPEN(UNIT=6,FILE=TRIM(LOGFILE(JF)),STATUS='UNKNOWN')        !
+!        OPEN(UNIT=6,FILE=TRIM(LOGFILE(JF)),STATUS='UNKNOWN')        !
 !
 !  Printing the headers
 !
@@ -317,7 +317,7 @@ SUBROUTINE EPSILON(MYINFILE, MYOUTDIR)
 !  Closing input/log data files
 !
         CLOSE(5)                                                    !
-        CLOSE(6)                                                    !
+!        CLOSE(6)                                                    !
 !
         IF(SQO_TYPE == 'UTI') THEN                                  !
           CLOSE(1)                                                  !