■サマーヴィルの等面四面体(その29)

α=D0x/5とおけば

−α^2|D11−D01,D12−D02,D13−D03,D14−D04,D15−D05|

   |D21−D01,D22−D02,D23−D03,D24−D04,D25−D05|

   |D31−D01,D32−D02,D33−D03,D34−D04,D35−D05|

   |D41−D01,D42−D02,D43−D03,D44−D04,D45−D05|

   |D51−D01,D52−D02,D53−D03,D54−D04,D55−D05|

E55=−D05+(D15−D05)(D51−D01)/D01

−α^2|D11−D01,D12−D02,D13−D03,D14−D04,0|

   |D21−D01,D22−D02,D23−D03,D24−D04,D25−D05|

   |D31−D01,D32−D02,D33−D03,D34−D04,D35−D05|

   |D41−D01,D42−D02,D43−D03,D44−D04,D45−D05|

   |    0,D52−D02,D53−D03,D54−D04,E55|

E44=−D04+(D14−D04)(D41−D01)/D01

−α^2|D11−D01,D12−D02,D13−D03,0,0|

   |D21−D01,D22−D02,D23−D03,D24−D04,D25−D05|

   |D31−D01,D32−D02,D33−D03,D34−D04,D35−D05|

   |    0,D42−D02,D43−D03,E44,D45−D05|

   |    0,D52−D02,D53−D03,D54−D04,E55|

F55=E55+(D25−D05)(D52−D02)/D02

−α^2|D11−D01,D12−D02,D13−D03,    0,0|

   |D21−D01,D22−D02,D23−D03,D24−D04,0|

   |D31−D01,D32−D02,D33−D03,D34−D04,D35−D05|

   |    0,D42−D02,D43−D03,E44   ,D45−D05|

   |    0,    0,D53−D03,D54−D04,F55|

G55=F55+(D35−D05)(D53−D03)/D03

−α^2|D11−D01,D12−D02,D13−D03,    0,0|

   |D21−D01,D22−D02,D23−D03,D24−D04,0|

   |D31−D01,D32−D02,D33−D03,D34−D04,0|

   |    0,D42−D02,D43−D03,E44   ,D45−D05|

   |    0,    0,    0,D54−D04,G55|

F44=E44+(D24−D04)(D42−D02)/D02

−α^2|D11−D01,D12−D02,D13−D03,    0,0|

   |D21−D01,D22−D02,D23−D03,    0,0|

   |D31−D01,D32−D02,D33−D03,D34−D04,0|

   |    0,    0,D43−D03,F44   ,D45−D05|

   |    0,    0,    0,D54−D04,G55|

E33=−D03+(D13−D03)(D31−D01)/D01

−α^2|D11−D01,D12−D02,    0,    0,0|

   |D21−D01,D22−D02,D23−D03,    0,0|

   |    0,D32−D02,E33   ,D34−D04,0|

   |    0,    0,D43−D03,F44   ,D45−D05|

   |    0,    0,    0,D54−D04,G55|

E22=−D02+(D12−D02)(D21−D01)/D01

−α^2|D11−D01,    0,    0,    0,0|

   |    0,   E22,D23−D03,    0,0|

   |    0,D32−D02,E33   ,D34−D04,0|

   |    0,    0,D43−D03,F44   ,D45−D05|

   |    0,    0,    0,D54−D04,G55|

F33=E33−(D23−D03)(D32−D02)/E22

−α^2|D11−D01,0 ,    0,    0,0|

   |    0,E22,    0,    0,0|

   |    0, 0,F33   ,D34−D04,0|

   |    0, 0,D43−D03,F44   ,D45−D05|

   |    0, 0,    0,D54−D04,G55|

G44=F44−(D34−D04)(D43−D03)/F33

−α^2|D11−D01, 0, 0, 0,0|

   |    0,E22  0, 0,0|

   |    0, 0,F33, 0,0|

   |    0, 0, 0,G44,D45−D05|

   |    0, 0,    0,D54−D04,G55|

H55=G55−(D45−D05)(D54−D04)/G44

α^2|D01, 0, 0,0 ,0|

  | 0,E22, 0,0 ,0|

  | 0,  ,F33,0 ,0|

  | 0,  , 0,G44,0|

  | 0,  , 0,0 ,H55|

===================================