Changeset 8322


Ignore:
Timestamp:
2017-07-12T01:23:03+02:00 (3 years ago)
Author:
clem
Message:

change slightly the call to before fields so it more adequate

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icestp.F90

    r8321 r8322  
    195195         IF( ln_limthd .AND. ln_bdy ) CALL bdy_ice_lim( kt )   ! -- bdy ice thermo  
    196196         ! previous lead fraction and ice volume for flux calculations 
    197                                       CALL ice_bef                         
    198197                                      CALL lim_var_glo2eqv     ! ht_i and ht_s for ice albedo calculation 
    199198                                      CALL lim_var_agg(1)      ! at_i for coupling  
     199                                      CALL ice_bef 
    200200 
    201201         !------------------------------------------------------! 
Note: See TracChangeset for help on using the changeset viewer.