| @@ 438-440 (lines=3) @@ | ||
| 435 | for ($m = $low + 1; $m <= $high - 1; ++$m) { |
|
| 436 | // Scale column. |
|
| 437 | $scale = 0.0; |
|
| 438 | for ($i = $m; $i <= $high; ++$i) { |
|
| 439 | $scale = $scale + abs($this->H[$i][$m - 1]); |
|
| 440 | } |
|
| 441 | ||
| 442 | if ($scale != 0.0) { |
|
| 443 | // Compute Householder transformation. |
|
| @@ 497-499 (lines=3) @@ | ||
| 494 | ||
| 495 | for ($m = $high - 1; $m >= $low + 1; --$m) { |
|
| 496 | if ($this->H[$m][$m - 1] != 0.0) { |
|
| 497 | for ($i = $m + 1; $i <= $high; ++$i) { |
|
| 498 | $this->ort[$i] = $this->H[$i][$m - 1]; |
|
| 499 | } |
|
| 500 | ||
| 501 | for ($j = $m; $j <= $high; ++$j) { |
|
| 502 | $g = 0.0; |
|