r3599 | jgn | 2012-06-12 14:10:46 +1000 (Tue, 12 Jun 2012) | 1 line

This commit is contained in:
Jing Chen
2012-06-12 14:10:46 +10:00
committed by Douglas Clowes
parent 97fcb9ecf3
commit 50e508d79b

View File

@@ -1,33 +1,15 @@
# Author Jing Chen (jgn@ansto.gove.au)
source $cfPath(hmm)/hmm_configuration_common_1.tcl
source $cfPath(hmm)/hmm_cylindrical_detector_configuration.tcl
set sim_mode [SplitReply [hmm_simulation]]
proc ::histogram_memory::init_OAT_TABLE {} {
}
proc CAT_TABLE {args} {
}
proc ::histogram_memory::init_CAT_TABLE {} {
}
##
# @brief Return the detector position
proc ::histogram_memory::detector_posn_degrees {} {
return [SplitReply [stth]]
}
proc ::histogram_memory::init_OAT_TABLE {} {}
proc CAT_TABLE {args} {}
proc ::histogram_memory::init_CAT_TABLE {} {}
proc ::histogram_memory::pre_count {} {}
proc ::histogram_memory::post_count {} {}
proc ::histogram_memory::isc_initialize {} {
}
proc histmem {cmd args} {
eval "_histmem $cmd $args"
}
publish histmem user
proc ::histogram_memory::isc_initialize {} {}
proc histmem {cmd args} {}