toggle-baf-interest.tcl