Fix type and units on kookaburra parameters.

This commit is contained in:
Ferdi Franceschini
2014-02-20 10:56:29 +11:00
parent df49a9d5b6
commit c036a05035

View File

@ -10,7 +10,7 @@ foreach {var lname type priv units klass} {
wavelength wavelength float user Angstrom crystal
MainDeadTime MainDeadTime float user s detector
TransDeadTime TransDeadTime float user s detector
TransmissionTube TransmissionTube float user none detector
TransmissionTube TransmissionTube int user none detector
bkgLevel bkgLevel float user 1 experiment
deg2QConv deg2QConv float user none experiment
dOmega dOmega float user degrees experiment
@ -18,7 +18,7 @@ foreach {var lname type priv units klass} {
gDQv gDQv float user none experiment
level level float user none experiment
thickness thickness float user mm sample
defaultMCR defaultMCR float user mm monitor
defaultMCR defaultMCR float user count/sec monitor
} {
::utility::mkVar $var $type $priv $lname true $klass true true
if {$units != "none"} {