From: ivgroups@onlinehome.de   
      
   Hallo,   
      
   using Maple, I have an expression ( a[1]^(1/c) + a[2]^(1/c) + ... +   
   a[n]^(1/c) )^m whereby c, n and m are given positive integers. I type expand   
   and simplify/symbolic. How can I bracket out all root terms and collect all   
   summands with the same root factors? My target is to count the number of   
   *different* roots in the expression.   
      
   Example:   
   For c=3, n = 3 and m = 7, it is not enough to factor out a[1]^(1/3),   
   a[2]^(1/3), a[3]^(1/3) and its combinations. We have to factor out also the   
   powers with the exponent 2/3 and their combinations. That are all powers   
   with exponents e where (e mod c) <> 0.   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)