Question: get a expression alone one coeff

p := (g+Delta*g*Zeta/omega-g*Zeta)*a[1]*b[2]+(g+Delta*g*Zeta/omega-g*Zeta)*a[2]*b[1]+(-Delta*g*Zeta/omega+g-g*Zeta)*a[2]*b[2]+(-Delta*g*Zeta/omega+g-g*Zeta)*a[1]*b[1]

q := factor(add(op(i, p), i = 1 .. 2))

q := g*(omega+Delta*Zeta-Zeta*omega)*(a[1]*b[2]+a[2]*b[1])/omega

here,throuth factor ,simplify the expression .yet,if i want the expression like this:

(g+Delta*g*Zeta/omega-g*Zeta))*(a[1]*b[2]+a[2]*b[1])

how do i?

thanks

Please Wait...