home bbs files messages ]

Forums before death by AOL, social media and spammers... "We can't have nice things"

   sci.math.symbolic      Symbolic algebra discussion      10,432 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 8,853 of 10,432   
   Axel Vogt to Peter Luschny   
   Re: Simplify trigonometric expressions   
   14 Aug 15 23:45:43   
   
   XPost: comp.soft-sys.math.maple   
   From: &noreply@axelvogt.de   
      
   On 14.08.2015 18:45, Peter Luschny wrote:   
   > On Friday, August 14, 2015 at 4:02:34 PM UTC+2, Axel Vogt wrote:   
   >> On 14.08.2015 15:00, Peter Luschny wrote:   
   >>> How can I teach Maple to simplify these expressions?   
   >>> I thought this would be peanuts for Maple   
   >>> (especially as it is peanuts for the competitor).   
   >>>   
   >> ...   
   >>   
   >> Depends on what one wants do have ... If L denotes   
   >> the list of your equations then for example   
   >>   
   >> convert(L, radical):   
   >> simplify(%);   
   >   
   > OK. So what about these?   
   >   
   > [1] -1/7+x-(2/7)*cos((2/7)*Pi)+(2/7)*cos((3/7)*Pi)+(2/7)*cos((1/7)*Pi)   
   >   
   > [2] (4/7)*x*cos((1/7)*Pi)-(2/7)*cos((1/7)*Pi)-(4/7)*x*cos((2/7   
   *Pi)+(2/7)*cos((2/7)*Pi)+(4/7)*x*cos((3/7)*Pi)-(2/7)*cos((3/7)*P   
   )+1/7-(2/7)*x+x^2   
   >   
   > [3] (2/7)*cos((1/7)*Pi)+(6/7)*x^2*cos((1/7)*Pi)-(6/7)*x*cos((1   
   7)*Pi)-(2/7)*cos((2/7)*Pi)-(6/7)*cos((2/7)*Pi)*x^2+(6/7)*x*cos((   
   /7)*Pi)+(2/7)*cos((3/7)*Pi)+(6/7)*x^2*cos((3/7)*Pi)-(6/7)*x*cos(   
   3/7)*Pi)-1/7+(3/7)*x-(3/7)*x^2+x^3   
   >   
   > [4] -(2/7)*cos((1/7)*Pi)-(12/7)*x^2*cos((1/7)*Pi)+(8/7)*x*cos(   
   1/7)*Pi)+(8/7)*x^3*cos((1/7)*Pi)-(8/7)*cos((2/7)*Pi)*x^3+(2/7)*c   
   s((2/7)*Pi)+(12/7)*cos((2/7)*Pi)*x^2-(8/7)*x*cos((2/7)*Pi)-(2/7)   
   cos((3/7)*Pi)-(12/7)*x^2*cos((3/7)*Pi)+(8/7)*x*cos((3/7)*Pi)   
   +(8/7)*x^3*cos((3/7)*Pi)+1/7-(4/7)*x+(6/7)*x^2-(4/7)*x^3+x^4   
   >   
      
   evalf[20](L): fnormal(%): identify(%); # to have a guess   
      
                                    2   3   4   
                               [x, x , x , x ]   
      
   convert(L, RootOf): # nun aber in echt ...   
   simplify(%);   
                                    2   3   4   
                               [x, x , x , x ]   
      
   I think it is also "what is intended by simplify (and should trig   
   survive)?" Thus I included sci.math.symbolic for further answers.   
      
   PS: would you mind to post as list   
      
   PPS: well, it may break down at some degree   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca