fileeval $cfPath(source)/sct_reactor_status.tcl

if {[SplitReply [opal_simulation]]=="false"} {
  MakeAsyncQueue aqreactor OPALSTAT neutron.ansto.gov.au 80
  aqreactor timeout 2000
}
add_reactor_status source aqadapter aqreactor

namespace eval ::source {
  proc isc_initialize {} {
  }
}