Ignore:
Timestamp:
2017-08-08T14:18:46+02:00 (3 years ago)
Author:
clem
Message:

changing names

File:
1 edited

Legend:

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

    r8414 r8420  
    2424   USE dom_oce         ! ocean space and time domain 
    2525   USE ice             ! LIM-3: ice variables 
    26    USE thd_ice         ! LIM-3: thermodynamical variables 
     26   USE ice1D           ! LIM-3: thermodynamical variables 
    2727   ! 
    2828   USE sbc_oce         ! Surface boundary condition: ocean fields 
     
    261261      ierr =        ice_alloc        ()      ! ice variables 
    262262      ierr = ierr + sbc_ice_alloc    ()      ! surface forcing  
    263       ierr = ierr + thd_ice_alloc    ()      ! thermodynamics 
     263      ierr = ierr + ice1D_alloc      ()      ! thermodynamics 
    264264      IF( ln_limdyn )   ierr = ierr + ice_rdgrft_alloc ()      ! ridging/rafting 
    265265      ! 
Note: See TracChangeset for help on using the changeset viewer.