Changeset 9122


Ignore:
Timestamp:
2017-12-18T21:37:07+01:00 (3 years ago)
Author:
clem
Message:

fix a first issue with restarts when ponds are activated

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/LIM_SRC_3/icerst.F90

    r9019 r9122  
    210210      CALL iom_get( numrir, jpdom_autoglo, 't_su', t_su ) 
    211211      ! Melt ponds 
    212       id1 = iom_varid( numrir, 'a_ip_htc01' , ldstop = .FALSE. ) 
     212      id1 = iom_varid( numrir, 'a_ip' , ldstop = .FALSE. ) 
    213213      IF( id1 > 0 ) THEN                       ! fields exist (melt ponds) 
    214214         CALL iom_get( numrir, jpdom_autoglo, 'a_ip' , a_ip ) 
Note: See TracChangeset for help on using the changeset viewer.