init_reinke_variables Subroutine

  subroutine init_reinke_variables
    !! Initialise module variables
    implicit none

    impvardiv = 9
    lhat = 4.33D0
    fzmin = 0.0D0
    fzactual = 0.001D0
    reinke_mode = 0
  end subroutine init_reinke_variables