let variables_proc t = Variable.Set.filter Variable.is_proc (variables t)