Changeset 9604 for NEMO/trunk/src/ICE/icethd_dh.F90

Timestamp:

2018-05-18T09:53:22+02:00 (6 years ago)

Author:

clem

Message:

change history of the ice routines

File:

• NEMO/trunk/src/ICE/icethd_dh.F90 (modified) (2 diffs)

NEMO/trunk/src/ICE/icethd_dh.F90

@@ -4 +4 @@
    !!   seaice : thermodynamic growth and melt 
    !!======================================================================
-   !! History :  LIM  ! 2003-05 (M. Vancoppenolle) Original code in 1D
-   !!                 ! 2005-06 (M. Vancoppenolle) 3D version 
-   !!            3.2  ! 2009-07 (M. Vancoppenolle, Y. Aksenov, G. Madec) bug correction in wfx_snw & wfx_ice
-   !!            3.4  ! 2011-02 (G. Madec) dynamical allocation
-   !!            3.5  ! 2012-10 (G. Madec & co) salt flux + bug fixes 
+   !! History :       !  2003-05  (M. Vancoppenolle) Original code in 1D
+   !!                 !  2005-06  (M. Vancoppenolle) 3D version 
+   !!            4.0  !  2018     (many people)      SI3 [aka Sea Ice cube]
    !!----------------------------------------------------------------------
 #if defined key_si3
@@ -125 +123 @@
       END DO
       !
-      ! ---------------------------------------------- !
-      ! Available heat for surface and bottom ablation !
-      ! ---------------------------------------------- !
-      !
+      !                       ! ============================================== !
+      !                       ! Available heat for surface and bottom ablation !
+      !                       ! ============================================== !
       SELECT CASE( nice_jules )
       !