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

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