PHPOffice / PhpSpreadsheet

                        $e[$j] = $cs * $e[$j] - $sn * $this->s[$j];

                        $g = $sn * $this->s[$j + 1];

                        $this->s[$j + 1] = $cs * $this->s[$j + 1];

                        if ($wantv) {

                            for ($i = 0; $i < $this->n; ++$i) {

                                $t = $cs * $this->V[$i][$j] + $sn * $this->V[$i][$j + 1];

                                $this->V[$i][$j + 1] = -$sn * $this->V[$i][$j] + $cs * $this->V[$i][$j + 1];

                                $this->V[$i][$j] = $t;

                            }

                        }

                        $t = hypo($f, $g);

                        $cs = $f / $t;

                        $sn = $g / $t;

                        $this->s[$j + 1] = -$sn * $e[$j] + $cs * $this->s[$j + 1];

                        $g = $sn * $e[$j + 1];

                        $e[$j + 1] = $cs * $e[$j + 1];

                        if ($wantu && ($j < $this->m - 1)) {

                            for ($i = 0; $i < $this->m; ++$i) {

                                $t = $cs * $this->U[$i][$j] + $sn * $this->U[$i][$j + 1];

                                $this->U[$i][$j + 1] = -$sn * $this->U[$i][$j] + $cs * $this->U[$i][$j + 1];

                                $this->U[$i][$j] = $t;

                            }

                        }

                    }

                    $e[$p - 2] = $f;

                    $iter = $iter + 1;