!> \file fake-routines-ant_mod.f90
!! Module qui contient des routines vides
!<

!> \namespace fake_ant
!! Module qui contient des routines vides
!! \author ...
!! \date ...
!! @note Used module
!! @note   - use module3D_phy
!<
! contient des routines vides 

module fake_grice2sea

use module3d_phy

implicit none

integer :: fake

contains
!____________________________________________________
subroutine initial_heino

!if (itracebug.eq.1)  call tracebug(' Entree dans routine fake initial_heino')
fake=1

return
end subroutine initial_heino

!____________________________________________________
subroutine track_change_T

if (itracebug.eq.1)  call tracebug(' Entree dans routine fake track_change_T')
fake=1
return
end subroutine track_change_T

!____________________________________________________
subroutine  massb_perturb_Tparam

if (itracebug.eq.1)  call tracebug(' Entree dans routine fake massb_perturb_Tparam  ')
fake=1
end subroutine massb_perturb_Tparam
!____________________________________________________
subroutine massb_anteis_forcage

if (itracebug.eq.1)  call tracebug(' Entree dans routine fake massb_perturb_Tparam  ')
fake=1
end subroutine massb_anteis_forcage
!____________________________________________________
subroutine time_step_recul

! quand on n'utilise pas le recul
end subroutine time_step_recul

end module fake_grice2sea
!