找回密码
 快速注册
搜索
查看: 74|回复: 3

[几何] 给定棱长的四面体体积 2个公式

[复制链接]

3149

主题

8387

回帖

6万

积分

$\style{scale:11;fill:#eff}꩜$

积分
65397
QQ

显示全部楼层

hbghlyj 发表于 2023-7-3 01:30 |阅读模式
本帖最后由 hbghlyj 于 2023-7-3 01:57 编辑 AOPS - High School Math Formula for Volume of Tetrahedron with given lengths
unitsize(1cm);

pair A = (-2, 0);
pair B = (2, 0);
pair C = (0, 3);
pair P = (0, 1);

label("$U$", A--B, S);
label("$V$", B--C, E);
label("$W$", C--A, W);

draw(A--B--C--cycle);
draw("$v$",P--A);
draw("$w$",P--B);
draw("$u$",C--P);

验证给定棱长的四面体体积 2个公式相等,需要证明以下恒等式\[\det\left(\begin{array}{ccccc}0 & u^{2} & v^{2} & w^{2} & 1 \\ u^{2} & 0 & W^{2} & V^{2} & 1 \\ v^{2} & W^{2} & 0 & U^{2} & 1 \\ w^{2} & V^{2} & U^{2} & 0 & 1 \\ 1 & 1 & 1 & 1 & 0\end{array}\right) =\frac {(-a+b+c+d)(a-b+c+d)(a+b-c+d)(a+b+c-d)}{128u^2v^2w^2}\]其中\begin{aligned}a&={\sqrt {xYZ}}\\b&={\sqrt {yZX}}\\c&={\sqrt {zXY}}\\d&={\sqrt {xyz}}\\X&=(w-U+v)\,(U+v+w)\\x&=(U-v+w)\,(v-w+U)\\Y&=(u-V+w)\,(V+w+u)\\y&=(V-w+u)\,(w-u+V)\\Z&=(v-W+u)\,(W+u+v)\\z&=(W-u+v)\,(u-v+W).\end{aligned}

点评

这种公式太繁了。记忆不堪忍受啊。  发表于 2023-7-3 22:55

3149

主题

8387

回帖

6万

积分

$\style{scale:11;fill:#eff}꩜$

积分
65397
QQ

显示全部楼层

 楼主| hbghlyj 发表于 2023-7-3 01:54

3149

主题

8387

回帖

6万

积分

$\style{scale:11;fill:#eff}꩜$

积分
65397
QQ

显示全部楼层

 楼主| hbghlyj 发表于 2023-7-3 02:07

SageMath

  1. u, v, w, U, V, W = var('u v w U V W')
  2. X = (w-U+v)*(U+v+w)
  3. x = (U-v+w)*(v-w+U)
  4. Y = (u-V+w)*(V+w+u)
  5. y = (V-w+u)*(w-u+V)
  6. Z = (v-W+u)*(W+u+v)
  7. z = (W-u+v)*(u-v+W)
  8. a = sqrt(x*Y*Z)
  9. b = sqrt(y*Z*X)
  10. c = sqrt(z*X*Y)
  11. d = sqrt(x*y*z)
  12. M = Matrix([[0, u^2, v^2, w^2, 1],
  13.             [u^2, 0, W^2, V^2, 1],
  14.             [v^2, W^2, 0, U^2, 1],
  15.             [w^2, V^2, U^2, 0, 1],
  16.             [1, 1, 1, 1, 0]])
  17. expand((-a+b+c+d)*(a-b+c+d)*(a+b-c+d)*(a+b+c-d)-(128*u**2*v**2*w**2)*M.determinant())
复制代码

expand的结果不是0,不知哪里输入错了

手机版|悠闲数学娱乐论坛(第3版)

GMT+8, 2025-3-4 18:15

Powered by Discuz!

× 快速回复 返回顶部 返回列表