init_itv_161 Subroutine

  subroutine init_itv_161
    !! <LI> (161) fbeta_min (f-value for equation 84)
    use constraint_variables, only: fbeta_min
    use numerics, only: lablxc, boundl, boundu
    implicit none
    lablxc(161) = 'fbeta_min     '
    boundl(161) = 0.010D0
    boundu(161) = 1.000D0
  end subroutine init_itv_161