Ignore:
Timestamp:
2017-08-08T15:58:05+02:00 (3 years ago)
Author:
clem
Message:

continue naming

File:
1 edited

Legend:

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

    r8420 r8422  
    3434   USE icerhg          ! Ice rheology 
    3535   USE iceadv          ! Ice advection 
    36    USE limthd          ! Ice thermodynamics 
     36   USE icethd          ! Ice thermodynamics 
    3737   USE icerdgrft       ! Ice ridging/rafting 
    3838   USE iceupdate       ! sea surface boundary condition 
     
    4848   ! END MV MP 2016 
    4949   USE iceistate       ! LIM initial state 
    50    USE limthd_sal      ! LIM ice thermodynamics: salinity 
     50   USE icethd_sal      ! LIM ice thermodynamics: salinity 
    5151   ! 
    5252   USE c1d             ! 1D vertical configuration 
     
    190190         !----------------------------! 
    191191         ! --- zap this if no ice thermo --- ! 
    192          IF( ln_limthd )              CALL lim_thd( kt )        ! -- Ice thermodynamics       
     192         IF( ln_limthd )              CALL ice_thd( kt )        ! -- Ice thermodynamics       
    193193 
    194194         ! MV MP 2016 
     
    271271      CALL ice_itd_init                ! ice thickness distribution initialization 
    272272      ! 
    273       CALL lim_thd_init                ! set ice thermodynics parameters 
    274       ! 
    275       CALL lim_thd_sal_init            ! set ice salinity parameters 
     273      CALL ice_thd_init                ! set ice thermodynics parameters 
     274      ! 
     275      CALL ice_thd_sal_init            ! set ice salinity parameters 
    276276        
    277277      ! MV MP 2016 
Note: See TracChangeset for help on using the changeset viewer.