source: trunk/SOURCES/no_sliding.f90 @ 334

!> \file no_sliding.f90
!! Module permet de ne pas passer dans le sliding
!<

!> \namespace no_sliding
!! Module qui permet de ne pas tenir compte des lacs proglaciaires
!! \author ...
!! \date ...
!<

module no_sliding

! pour ne pas passer dans le sliding

USE module3D_phy
USE param_phy_mod

implicit none


contains
!-------------------------------------------------------------------------------
subroutine init_sliding


ddby(:,:) = 0.
ddbx(:,:) = 0.

end subroutine init_sliding


!________________________________________________________________________________
subroutine sliding


end subroutine sliding
end module no_sliding