Fix beamstop targets in Bilby selbs command.

This commit is contained in:
Ferdi Franceschini
2014-09-10 14:46:28 +10:00
parent f0202fad51
commit 3c51b17eb9

View File

@ -1,7 +1,7 @@
source $cfPath(commands)/commands_common.tcl source $cfPath(commands)/commands_common.tcl
namespace eval beamstops { namespace eval beamstops {
array set bs_target {bs3 66.5 bs4 66 bs5 64} array set bs_target {3 66.5 4 66 5 64}
namespace export selbs namespace export selbs
} }
namespace eval motor { namespace eval motor {
@ -47,7 +47,7 @@ command ::beamstops::selbs {int=3,4,5 bs} {
} }
"5" { "5" {
set bsmot "bs5" set bsmot "bs5"
set bsdownCmd "drive bs4 $bsl(4) bs5 $bsl(5)" set bsdownCmd "drive bs3 $bsl(3) bs4 $bsl(4)"
} }
default { default {
error "beamstop selection must be an integer from 3 to 5" error "beamstop selection must be an integer from 3 to 5"