http://www.mapleprimes.com/questions/42154-Factor-Out-A-Common-Coefficient en-us 2026 Maplesoft, A Division of Waterloo Maple Inc. Maplesoft Document System Sat, 13 Jun 2026 18:36:02 GMT Sat, 13 Jun 2026 18:36:02 GMT The latest answers and comments added to the Question, Factor out a common coefficient? http://www.mapleprimes.com/images/mapleprimeswhite.jpg http://www.mapleprimes.com/questions/42154-Factor-Out-A-Common-Coefficient http://www.mapleprimes.com/questions/42154-Factor-Out-A-Common-Coefficient?ref=Feed:MaplePrimes:Factor out a common coefficient?:Comments#answer78794 You could do something like this: S := collect(a0+sum(an*cos(n*x*Pi/L),n=1..8),1/Pi); It is not exactly what you wanted , but I hope it helps. Later edit. On reflection, one can improve on the above thus: Sn := sum(an*cos(n*x*Pi/L),n=1..8): Sn := algsubs(4/Pi=a,Sn): Sn := collect(Sn,a): Sn := subs(a=(Pi/4),Sn): S := a0 + Sn; This is what you asked for, though not in quite the same order. Hope it will be adequate for your purpose. J. Tarr You could do something like this: S := collect(a0+sum(an*cos(n*x*Pi/L),n=1..8),1/Pi); It is not exactly what you wanted , but I hope it helps. Later edit. On reflection, one can improve on the above thus: Sn := sum(an*cos(n*x*Pi/L),n=1..8): Sn := algsubs(4/Pi=a,Sn): Sn := collect(Sn,a): Sn := subs(a=(Pi/4),Sn): S := a0 + Sn; This is what you asked for, though not in quite the same order. Hope it will be adequate for your purpose. J. Tarr 78794 Mon, 11 Dec 2006 02:51:53 Z Mariner Mariner