Modified the simulated hmm configurations so that they now source the common config and override the hmc control, the histogram::initialize and the histogram::hmmdititemval procs.

r1753 | ffr | 2007-03-31 11:27:52 +1000 (Sat, 31 Mar 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-03-31 11:27:52 +10:00
committed by Douglas Clowes
parent 53e7a69cb0
commit 7526a7b93d
3 changed files with 39 additions and 70 deletions

View File

@@ -1,32 +1,22 @@
MakeHM hmm SIM
hmm configure HistMode Normal
hmm configure OverFlowMode Ceil
hmm configure dim0 512
hmm configure dim1 [expr 480 * 8 - 1]
hmm configure rank 2
hmm configure BinWidth 4
#hmm configure BinWidth 1
hmm preset 100.
hmm CountMode Timer
hmm configure Counter counter
hmm configure init 0
hmm init
#MakeHMControl_ANSTO hmc bm hmm
source $cfPath(hmm)/hmm_configuration_common_1.tcl
#MakeScanCommand hmscan bm scan.hdd recover.bin
namespace eval histogram_memory {
proc prepare {} {}
proc finish {} {}
proc count_bm_controlled {mode preset} {
hmm countmode $mode
hmm preset $preset
proc ::histogram_memory::hmc {_start _preset _mode _pause} {
hmm countmode $_mode
hmm preset $_preset
hmm countblock
}
proc hmm_initialize {} {}
proc hmm_setup {mode bankNum rankNum nyc nxc ntc} {}
proc ::histogram_memory::hmmdictitemval {histomem dictitem} {
array set dict [list stitch_nyc 512 stitch_nxc [expr 480 * 8 - 1] oat_ntc_eff 1 ]
return $dict($dictitem);
}
publish ::histogram_memory::prepare user
publish ::histogram_memory::finish user
publish ::histogram_memory::count_bm_controlled user
proc ::histogram_memory::hmm_initialize {} {
}
::histogram_memory::hmm_initialize
::histogram_memory::hmm_setup transparent 7000000 3 stitch_nyc stitch_nxc oat_ntc_eff
hmm_start 0