Changeset 12641 for NEMO/trunk/src/OFF/nemogcm.F90
- Timestamp:
- 2020-04-01T14:33:59+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OFF/nemogcm.F90
r12377 r12641 209 209 IF( lwm ) CALL ctl_opn( numond, 'output.namelist.dyn', 'REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, -1, .FALSE. ) 210 210 ! open /dev/null file to be able to supress output write easily 211 IF( Agrif_Root() ) THEN 211 212 CALL ctl_opn( numnul, '/dev/null', 'REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, -1, .FALSE. ) 213 #ifdef key_agrif 214 ELSE 215 numnul = Agrif_Parent(numnul) 216 #endif 217 ENDIF 212 218 ! 213 219 ! !--------------------!
Note: See TracChangeset
for help on using the changeset viewer.