# Set currVelSel to select either the NVS40 or NVS43
set currVelSel 43

namespace eval ::scobj::velocity_selector {
  variable blocked_speeds
  variable velsel_IP
  variable velsel_port

# Set configuration parameters for either the NVS40 or NVS43 velocity selector
  set ::currVelSel [string tolower $::currVelSel]
  switch $::currVelSel {
    40 {
      set velsel_ID "NVS40"
      set velsel_IP "137.157.202.73"
      set velsel_port 10000 
      set m_dTwistAngle 48.30
      set m_dLength     0.250
      set m_iMaxSpeed   28300.0
      set rBeamCenter   0.1100
      set VNeutron      3955.98
      set ::scobj::velocity_selector::UID "NVS"
      set ::scobj::velocity_selector::PWD "NVS"
      set ::scobj::velocity_selector::blocked_speeds {
        -inf  3099
        3600  4999
        7800  10599
        28301 inf
      }
    }
    43 {
      # dc2-lyrebird.nbi.ansto.gov.au
      set velsel_ID "NVS43"
      set velsel_IP "137.157.202.74"
      set velsel_port 10000 
      set m_dTwistAngle 37.6
      set m_dLength     0.250
      set m_iMaxSpeed   21000.0
      set rBeamCenter   0.1100
      set VNeutron      3955.98
      set ::scobj::velocity_selector::UID "NVS"
      set ::scobj::velocity_selector::PWD "NVS"
      set ::scobj::velocity_selector::blocked_speeds {
        -inf  3099
        3600  4999
        7800  9699
        21500 inf
      }
    }
  }
}

#source $cfPath(velsel)/sct_velsel.tcl