New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 10459 for NEMO/trunk/src/SAS/nemogcm.F90 – NEMO

Ignore:
Timestamp:
2019-01-07T12:43:49+01:00 (5 years ago)
Author:
mathiot
Message:

add ctl_opn for numnul in SAS/nemogcm

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/src/SAS/nemogcm.F90

    r10425 r10459  
    302302         ! 
    303303      ENDIF 
     304      ! open /dev/null file to be able to supress output write easily 
     305      CALL ctl_opn( numnul, '/dev/null', 'REPLACE', 'FORMATTED', 'SEQUENTIAL', -1, 6, .FALSE. ) 
     306      ! 
    304307      !                                      ! Domain decomposition 
    305308      CALL mpp_init                          ! MPP 
Note: See TracChangeset for help on using the changeset viewer.