不好意思，最近尝试要把所有用到的方程式打进电脑里里，方便管理也顺便验算，
但目前碰到一个很小的问题跨越不了 QQ 就是该如何化简方程式。
举例来说：
Clear["Global`*"]
d11 = (p11)^(-\[Sigma]) (P1)^(\[Sigma] - 1) Y1
d12 = (p12)^(-\[Sigma]) (P2)^(\[Sigma] - 1) Y2
p12 = (\[Tau])*(p11)
d11
d12
h = ((\[Sigma] - 1)/\[Sigma]) (d11 + \[Tau] (d12))
Factor[h]
Expand[h]

ExpandAll 再 Simplify 看看?

回到原样，大哭QQ

ComplexExpand?

谢谢楼上各位，我只是肖想漂亮的结果，可以省下人工化简的时间拉QQ

可以使用PowerExpand[h] ^_^

Mathematica is being agnosgic about branch cutsIf you are sure, "/. {(a_ b_)^c_ -> a^c b^c}" will do