Set Heating$Dir <Obey$Dir>
WimpSlot -min 32K -max 32K
Dir <Heating$Dir>
Run <Heating$Dir>.CH_Calc
