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 10380 for NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/OCE/SBC/sbcrnf.F90 – NEMO

Ignore:
Timestamp:
2018-12-11T09:27:54+01:00 (5 years ago)
Author:
smasson
Message:

dev_r10164_HPC09_ESIWACE_PREP_MERGE: iom cleaning: (1) get rid of jpnf90, jprstlib, jlibalt, iolib and (2) improve iom_getatt and iom_putatt, see #2133

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/OCE/SBC/sbcrnf.F90

    r10297 r10380  
    423423         IF( nn_rnf_depth_file == 1 ) THEN      !  save  output nb levels for runoff 
    424424            IF(lwp) WRITE(numout,*) '   ==>>>   create runoff depht file' 
    425             CALL iom_open  ( TRIM( sn_dep_rnf%clname ), inum, ldwrt = .TRUE., kiolib = jprstlib ) 
     425            CALL iom_open  ( TRIM( sn_dep_rnf%clname ), inum, ldwrt = .TRUE. ) 
    426426            CALL iom_rstput( 0, 0, inum, 'rodepth', h_rnf ) 
    427427            CALL iom_close ( inum ) 
Note: See TracChangeset for help on using the changeset viewer.