From 2fc161713a2ed0f613ad24322170c61f1cc8421f Mon Sep 17 00:00:00 2001
From: Ferdi Franceschini <ffr@ansto.gov.au>
Date: Mon, 3 Feb 2014 23:15:52 +1100
Subject: [PATCH] Configure OAT_TABLE for Bilby. TODO Set correct tube spacing

---
 .../bilby/config/hmm/hmm_configuration.tcl     | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/site_ansto/instrument/bilby/config/hmm/hmm_configuration.tcl b/site_ansto/instrument/bilby/config/hmm/hmm_configuration.tcl
index f13b11d2..42d6507e 100644
--- a/site_ansto/instrument/bilby/config/hmm/hmm_configuration.tcl
+++ b/site_ansto/instrument/bilby/config/hmm/hmm_configuration.tcl
@@ -6,12 +6,12 @@ proc ::histogram_memory::init_OAT_TABLE {} {
   if [ catch {
   # We don't need a MAX_CHAN parameter for time because the time channel 
   # is scaled by calling the ::histogram_memory::clock_scale function
-    OAT_TABLE X -setdata MAX_CHAN 192
-    OAT_TABLE Y -setdata MAX_CHAN 192
+    OAT_TABLE X -setdata MAX_CHAN 240
+    OAT_TABLE Y -setdata MAX_CHAN 256
     OAT_TABLE X -setdata BMIN -0.5
-    OAT_TABLE X -setdata BMAX  191.5
+    OAT_TABLE X -setdata BMAX  239.5
     OAT_TABLE Y -setdata BMIN -0.5
-    OAT_TABLE Y -setdata BMAX  191.5
+    OAT_TABLE Y -setdata BMAX  255.5
 
     set clock_scale 1000
     set freq 50
@@ -19,7 +19,7 @@ proc ::histogram_memory::init_OAT_TABLE {} {
     hmm configure fat_frame_frequency $freq
     hmm configure fat_frame_source INTERNAL
 
-    OAT_TABLE -set X { 191.5 190.5 } NXC 192 Y { -0.5 0.5 } NYC 192 T { 0 20000 } NTC 1 
+    OAT_TABLE -set X { 239.5 238.5 } NXC 240 Y { -0.5 0.5 } NYC 256 T { 0 20000 } NTC 1 
   } message ] {
     return -code error $message
   }
@@ -35,8 +35,8 @@ proc ::histogram_memory::isc_initialize {} {
     ::histogram_memory::init_hmm_objs
     if {$::sim_mode == "true"} {
         hmm configure oat_ntc_eff 1
-        hmm configure $INST_NYC 127
-        hmm configure $INST_NXC 127
+        hmm configure $INST_NYC 256
+        hmm configure $INST_NXC 240
     }
     BAT_TABLE -init
     CAT_TABLE -init
@@ -45,8 +45,8 @@ proc ::histogram_memory::isc_initialize {} {
     FAT_TABLE -init
     ::histogram_memory::ic_initialize
 
-    detector_active_height_mm [expr 5.08 * 192]
-    detector_active_width_mm  [expr 5.08 * 192]
+    detector_active_height_mm [expr 5.08 * 256]
+    detector_active_width_mm  [expr 5.08 * 240]
     detector_active_height_mm lock
     detector_active_width_mm  lock