source $cfPath(scan)/scan_common_1.tcl ::scan::runscan_reset_position true ## # @brief Make sure that the chopper is ready before starting a scan. proc ::scan::pre_hmm_scan_prepare {} { if [catch {::histogram_memory::tochfreq} errmsg] { return -code error $errmsg } } proc ::scan::isc_initialize {} { ::scan::ic_initialize }