Change number? to map? so as to find all constants (ASSUMPTION: all arguments to ugens that are maps are ugens. This might prove not to be true in future - watch out!)