Changeset 4116 for dynamico_lmdz


Ignore:
Timestamp:
Oct 17, 2018, 11:15:53 PM (6 years ago)
Author:
dubos
Message:

aquaplanet : deactivate IOIPSL output to reduce log files

Location:
dynamico_lmdz/aquaplanet/IOIPSL/src
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • dynamico_lmdz/aquaplanet/IOIPSL/src/errioipsl.f90

    r3907 r4116  
    1212PUBLIC :: ipslnlf, ipslerr, ipslerr_act, ipslerr_inq, histerr, ipsldbg, ipslout
    1313!-
    14   INTEGER :: ipslout=6, ilv_cur=0, ilv_max=0
     14  INTEGER :: ipslout=12, ilv_cur=0, ilv_max=0
    1515  LOGICAL :: ioipsl_debug=.FALSE., lact_mode=.TRUE.
    1616!-

  • dynamico_lmdz/aquaplanet/IOIPSL/src/getincom.f90

    r3907 r4116  
    10881088!---------------------------------------------------------------------
    10891089  IF (allread == 0) THEN
     1090     IF(ipslout/=6) OPEN(unit=ipslout, FILE='/dev/null', ACTION='write')
    10901091!-- Allocate a first set of memory.
    10911092    CALL getin_alloctxt ()
Note: See TracChangeset for help on using the changeset viewer.