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

Changeset 7085


Ignore:
Timestamp:
2016-10-25T14:57:14+02:00 (8 years ago)
Author:
malcolmroberts
Message:

Changed diaar5 for general filename and variable

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_GO6_package_MEDUSA_extra_CMIP6_diags/NEMOGCM/NEMO/OPA_SRC/DIA/diaar5.F90

    r7083 r7085  
    233233      IF( lk_mpp )   CALL mpp_sum( vol0 ) 
    234234 
    235       CALL iom_open ( 'sali_ref_clim_monthly', inum ) 
    236       CALL iom_get  ( inum, jpdom_data, 'vosaline' , zsaldta(:,:,:,1), 1  ) 
    237       CALL iom_get  ( inum, jpdom_data, 'vosaline' , zsaldta(:,:,:,2), 12 ) 
     235      CALL iom_open ( TRIM( cn_dir )//TRIM(sn_sal%clname), inum ) 
     236      CALL iom_get  ( inum, jpdom_data, TRIM(sn_sal%clvar), zsaldta(:,:,:,1), 1  ) 
     237      CALL iom_get  ( inum, jpdom_data, TRIM(sn_sal%clvar), zsaldta(:,:,:,2), 12 ) 
    238238      CALL iom_close( inum ) 
    239239 
Note: See TracChangeset for help on using the changeset viewer.