lapack/gonum: rewrite Dlartg to use safe scaling from https://doi.org/10.1145/3061665

This commit is contained in:
Vladimir Chalupecky
2021-03-16 21:54:37 +01:00
committed by Vladimír Chalupecký
parent 13102a112c
commit 7a88995ca8
7 changed files with 102 additions and 118 deletions

View File

@@ -138,29 +138,29 @@ func ExampleCC() {
//
// ccors = [0.9451 0.6787 0.5714 0.2010]
//
// pVecs = ⎡-0.2574 0.0158 0.2122 -0.0946⎤
// ⎢-0.4837 0.3837 0.1474 0.6597⎥
// ⎢-0.0801 0.3494 0.3287 -0.2862⎥
// ⎢ 0.1278 -0.7337 0.4851 0.2248⎥
// ⎢-0.6969 -0.4342 -0.3603 0.0291⎥
// ⎢-0.0991 0.0503 0.6384 0.1022⎥
// ⎣ 0.4260 0.0323 -0.2290 0.6419⎦
// pVecs = ⎡-0.2574 -0.0158 -0.2122 -0.0946⎤
// ⎢-0.4837 -0.3837 -0.1474 0.6597⎥
// ⎢-0.0801 -0.3494 -0.3287 -0.2862⎥
// ⎢ 0.1278 0.7337 -0.4851 0.2248⎥
// ⎢-0.6969 0.4342 0.3603 0.0291⎥
// ⎢-0.0991 -0.0503 -0.6384 0.1022⎥
// ⎣ 0.4260 -0.0323 0.2290 0.6419⎦
//
// qVecs = ⎡ 0.0182 -0.1583 -0.0067 -0.9872⎤
// ⎢-0.2348 0.9483 -0.1462 -0.1554⎥
// ⎢-0.9701 -0.2406 -0.0252 0.0209⎥
// ⎣ 0.0593 -0.1330 -0.9889 0.0291⎦
// qVecs = ⎡ 0.0182 0.1583 0.0067 -0.9872⎤
// ⎢-0.2348 -0.9483 0.1462 -0.1554⎥
// ⎢-0.9701 0.2406 0.0252 0.0209⎥
// ⎣ 0.0593 0.1330 0.9889 0.0291⎦
//
// phiVs = ⎡-0.0027 0.0093 0.0490 -0.0155⎤
// ⎢-0.0429 -0.0242 0.0361 0.1839⎥
// ⎢-1.2248 5.6031 5.8094 -4.7927⎥
// ⎢-0.0044 -0.3424 0.4470 0.1150⎥
// ⎢-0.0742 -0.1193 -0.1116 0.0022⎥
// ⎢-0.0233 0.1046 0.3853 -0.0161⎥
// ⎣ 0.0001 0.0005 -0.0030 0.0082⎦
// phiVs = ⎡-0.0027 -0.0093 -0.0490 -0.0155⎤
// ⎢-0.0429 0.0242 -0.0361 0.1839⎥
// ⎢-1.2248 -5.6031 -5.8094 -4.7927⎥
// ⎢-0.0044 0.3424 -0.4470 0.1150⎥
// ⎢-0.0742 0.1193 0.1116 0.0022⎥
// ⎢-0.0233 -0.1046 -0.3853 -0.0161⎥
// ⎣ 0.0001 -0.0005 0.0030 0.0082⎦
//
// psiVs = ⎡ 0.0302 -0.3002 0.0878 -1.9583⎤
// ⎢-0.0065 0.0392 -0.0118 -0.0061⎥
// ⎢-0.0052 -0.0046 -0.0023 0.0008⎥
// ⎣ 0.0020 0.0037 -0.1293 0.1038⎦
// psiVs = ⎡ 0.0302 0.3002 -0.0878 -1.9583⎤
// ⎢-0.0065 -0.0392 0.0118 -0.0061⎥
// ⎢-0.0052 0.0046 0.0023 0.0008⎥
// ⎣ 0.0020 -0.0037 0.1293 0.1038⎦
}