!> \file no-icethick.f90
!! Pour faire tourner le modele sans variations d'epaisseur
!<

!> SUBROUTINE: NOICETHICK()
!! \author Catherine
!! \date janvier 2005
!! @note Cette routine permet de faire tourner le modele sans variations d'epaisseur
!! @note Used modules:
!! @note    - use module3D_phy
!!
!<
subroutine NOICETHICK()   


       USE module3D_phy


  IMPLICIT NONE
    
      time=time+dtt
      isynchro=1

     return
  end