公告:1)网站程序升级:Q2A升级到1.8.6,Wordpress升级到5.7.2
2)修复了头像加载慢与提交问题反应慢等问题
2021-06-16

欢迎来到 Mathematica 问答社区

提问时请贴上文本代码

语法高亮:在编辑器中点击

被禁止的话题:广告破解

请阅读:《提问的智慧》

备用域名:mma.ooo

支持LaTex数学公式
行内公式标识符:\$ 或“$\backslash ($”+“$\backslash )$”,
行间公式标识符:\$\$ 或 “$\backslash [$”+“$\backslash ]$”

社区建议QQ群:365716997

分类

–3 投票
242 浏览
D[Subscript[z, 1][Subscript[T, 1]], Subscript[T, 1]] = 
  Subscript[z, 2][Subscript[T, 
    1]] == \[PartialD]H/\[PartialD]Subscript[z, 2][Subscript[T, 1]];
D[Subscript[z, 2][Subscript[T, 1]], Subscript[T, 1]] = -Subscript[
\!\(\*OverscriptBox[\(\[Mu]\), \(~\)]\), 1] Subscript[z, 1][Subscript[
      T, 1]] + 
    Subscript[\[Eta], 1] Subscript[z, 1][Subscript[T, 1]]^3 + 
    2 Subscript[\[Beta], 12]
      Subscript[z, 1][Subscript[T, 1]] l[Subscript[T, 
      1]]^2 == -(\[PartialD]H/\[PartialD]Subscript[z, 1][Subscript[T, 
      1]]);
D[l[Subscript[T, 1]], Subscript[T, 1]] = 
  0 == \[PartialD]H/\[PartialD]\[Phi][Subscript[T, 1]];
l[Subscript[T, 1]] D[\[Phi][Subscript[T, 1]], Subscript[T, 
    1]] = -Subscript[\[Sigma], 2] l[Subscript[T, 1]] + 
    2 Subscript[\[Beta], 12]
      l[Subscript[T, 1]] Subscript[z, 1][Subscript[T, 1]]^2 + 
    3/2 Subscript[\[Beta], 24]
      l[Subscript[T, 1]]^3 == -(\[PartialD]H/\[PartialD]l[Subscript[T,
       1]]);

H = 1/2 Subscript[z, 2]^2 + 1/2 Subscript[
\!\(\*OverscriptBox[\(\[Mu]\), \(~\)]\), 1] Subscript[z, 1]^2 - 
  1/4 Subscript[\[Eta], 1] Subscript[z, 1]^4 + 
  1/2 Subscript[\[Sigma], 2] l^2 - 3/8 Subscript[\[Beta], 24] l^4 - 
  Subscript[\[Beta], 12] l^2 Subscript[z, 1]^2



 上面的方程组,怎么通过MMA求得最后的H的表达式

问题关闭原因: 问题问错了
分类:方程 | 用户: scorpio (61 分)
已关闭 用户:scorpio
...