let clear () = cpt_mk_var := 0; ma := MA.empty