Changeset 571 for trunk/NEMO/OPA_SRC/IOM/iom_def.F90

Timestamp:

2006-11-13T15:10:21+01:00 (17 years ago)

Author:

opalod

Message:

nemo_v1_bugfix_077:RB: this should end Agrif/IOM love story with a happy end. To be continued (?) ...

File:

• trunk/NEMO/OPA_SRC/IOM/iom_def.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/IOM/iom_def.F90

@@ -45 +45 @@
    INTEGER, PARAMETER, PUBLIC ::   jpmax_digits =  5   !: maximum number of digits for the cpu number in the file name
 
+!$AGRIF_DO_NOT_TREAT
    INTEGER, PUBLIC            ::   iom_init = 0        !: used to initialize iom_file(:)%nfid to 0
-!$AGRIF_DO_NOT_TREAT
+
    TYPE, PUBLIC ::   file_descriptor
       CHARACTER(LEN=240)                        ::   name     !: name of the file