init_itv_111 Subroutine

  subroutine init_itv_111
    !! <LI> (111) fniterpump: f-value for constraint that number
    use numerics, only: lablxc, boundl, boundu
    implicit none
    !!       of vacuum pumps <  TF coils (f-value for equation 63)
    lablxc(111) = 'fniterpump    '
    boundl(111) = 0.001D0
    boundu(111) = 1.000D0
  end subroutine init_itv_111