# Author Jing Chen (jgn@ansto.gove.au)
# Note: all following functions's bodies need to be implemented in real Taipan deployment

source $cfPath(hmm)/hmm_configuration_common_1.tcl
set sim_mode [SplitReply [hmm_simulation]]

proc ::histogram_memory::init_OAT_TABLE {} {
}

proc ::histogram_memory::pre_count {} {}
proc ::histogram_memory::post_count {} {}
proc ::histogram_memory::isc_initialize {} {

  if [ catch {
    ::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
    }
    #BAT_TABLE -init
    #CAT_TABLE -init
    #SAT_TABLE -init
    #OAT_TABLE -init
    #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 lock
    #detector_active_width_mm  lock

    ::histogram_memory::init_OAT_TABLE
    ::histogram_memory::upload_config Filler_defaults

    #set ::histogram_memory::histmem_axes(HOR) /instrument/detector/x_pixel_offset
    #set ::histogram_memory::histmem_axes(VER) /instrument/detector/y_pixel_offset
  } message ] {
    return -code error $message
  }
}

proc histmem {cmd args} {
  eval "_histmem $cmd $args"
}
publish histmem user