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 8669 – NEMO

Changeset 8669


Ignore:
Timestamp:
2017-11-01T16:14:23+01:00 (7 years ago)
Author:
andmirek
Message:

fix error in iom_set_zoom_domain_attr

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r7864_XIOS_defs/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90

    r7867 r8669  
    13041304          IF(PRESENT(ibegin)) CALL xios_set_zoom_domain_attr     ( cdid, ibegin=ibegin) 
    13051305          IF(PRESENT(jbegin)) CALL xios_set_zoom_domain_attr     ( cdid, jbegin=jbegin) 
    1306           IF(PRESENT(nj)) CALL xios_set_zoom_domain_attr     ( cdid, ni=ni) 
     1306          IF(PRESENT(ni)) CALL xios_set_zoom_domain_attr     ( cdid, ni=ni) 
    13071307          IF(PRESENT(ni)) CALL xios_set_zoom_domain_attr     ( cdid, nj=nj) 
    13081308     ENDIF 
Note: See TracChangeset for help on using the changeset viewer.