Skip to content
Snippets Groups Projects
Commit 35bb8a2b authored by Gaelle Tanguy's avatar Gaelle Tanguy Committed by WAUTELET Philippe
Browse files

Gaelle 29/04/2014 : increase len(youtfile) to 50

parent 327be1fb
No related branches found
No related tags found
No related merge requests found
......@@ -45,7 +45,7 @@ IMPLICIT NONE
!* 0.1 declarations of local variables
!
CHARACTER (LEN=28), DIMENSION(1) :: YINIFILE ! names of the INPUT FM-file
CHARACTER (LEN=28) :: YOUTFILE ! names of the OUTPUT FM-file
CHARACTER (LEN=50) :: YOUTFILE ! names of the OUTPUT FM-file
INTEGER :: IRESP ! return code in FM routines
INTEGER :: ILUOUT0 ! Logical unit number for the output listing
INTEGER :: ILUNAM ! Logical unit numbers for the namelist file
......
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