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 5081 for branches/2014/dev_r4765_CNRS_agrif/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90 – NEMO

Ignore:
Timestamp:
2015-02-13T10:51:27+01:00 (9 years ago)
Author:
smasson
Message:

dev_r4765_CNRS_agrif: final version of tke/agrif?

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2014/dev_r4765_CNRS_agrif/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90

    r4785 r5081  
    14381438            END DO 
    14391439 
     1440            IF( jn == 1 .AND. TRIM(Agrif_CFixed()) /= '0' )   clname = TRIM(Agrif_CFixed())//"_"//TRIM(clname) 
    14401441            IF( jn == 1 )   CALL iom_set_file_attr( cdid, name        = clname ) 
    14411442            IF( jn == 2 )   CALL iom_set_file_attr( cdid, name_suffix = clname ) 
Note: See TracChangeset for help on using the changeset viewer.