提问：怎么用mathematica处理符号矩阵的运算，稍微复杂点的suan'

代码如下
A = MatrixForm[{{exp@(\[Beta]*H), exp@(-\[Beta]*H)}, {\[Beta]*exp@(\[Beta]*H), -\[Beta]*
exp@(-\[Beta]*H)}}]
B = MatrixForm[{{1/(2*(exp@(\[Beta]*h))), 1/(2*\[Beta]*(exp@(\[Beta]*h)))}, {1/(2*(exp@(-\[Beta]*h))), -1/(2*\[Beta]*(exp@(-\[Beta]*h)))}}]
A + B

A = ({
{E^(H \[Beta]), E^(-H \[Beta])},
{E^(H \[Beta]) \[Beta], -E^(-H \[Beta]) \[Beta]}
})
B = ({
{E^(-h \[Beta])/2, E^(-h \[Beta])/(2 \[Beta])},
{E^(h \[Beta])/2, -(E^(h \[Beta])/(2 \[Beta]))}
})
A + B