!< \file fake_beta_iter_vitbil_mod.f90
!< Module fake pour compatibilite avec iteration beta
!< A appeler depuis les modules de dragging



module fake_beta_iter_vitbil_mod

  use module3d_phy
  
  implicit none
  
  real                   :: time_iter=1000000.       !< temps de debut des iterations
  real                   :: time_iter_end=1000001.   !< temps de fin des iterations
  integer                :: nb_iter_vitbil           !< nombre d'iteratiosn avant de changer de pas de temps
  
  contains
  
  subroutine beta_iter_vitbil(m_iter) 
    integer :: m_iter ! indice bloucle iteration
    if (itracebug.eq.1)  call tracebug(' Entree dans routine fake_beta_iter_vitbil')
  end subroutine beta_iter_vitbil
  
end module fake_beta_iter_vitbil_mod