10 December 2017 9:38:29.194 AM TOMS358_TEST: FORTRAN90 version Test TOMS358 library. CSVD_TEST Call ACM TOMS Algorithm 358 for the singular value decomposition: A = U S V* of an M by N complex matrix. Matrix row order M = 5 Matrix column order N = 2 Number of RHSs = 0 Matrix A: -0.9120 -0.4071 0.3128 0.3466 -0.0128 -0.9827 -0.7187 0.6196 -0.6016 0.0736 -0.3508 -0.5678 0.2714 0.0091 -0.0740 -0.1031 -0.3227 0.4929 -0.3559 0.7209 Singular values: 1.81004 1.30458 U: -0.5586 -0.1611 0.1147 0.2245 -0.4663 -0.3465 0.1409 0.0582 0.1627 -0.4596 -0.0450 -0.7434 -0.0713 -0.1542 0.0247 0.3883 0.0159 0.0840 -0.4480 -0.2388 -0.0587 0.0392 0.6838 -0.0207 0.6198 -0.0129 0.0231 0.0008 0.0615 -0.3720 0.1629 0.0024 -0.0407 -0.0073 0.0462 0.0089 0.9838 -0.0001 0.0124 0.0398 -0.2753 0.0012 -0.1119 -0.6522 -0.0086 0.3529 0.0278 -0.0188 0.5983 -0.0518 V: 0.8166 0.0000 -0.5772 0.0000 -0.3171 0.4823 -0.4486 0.6823 Matrix U S V* (should equal the original A): -0.9120 -0.4071 0.3128 0.3466 -0.0128 -0.9827 -0.7187 0.6196 -0.6016 0.0736 -0.3508 -0.5678 0.2714 0.0091 -0.0740 -0.1031 -0.3227 0.4929 -0.3559 0.7209 Max Deviations: A,U^2,V^2,B: 4.00296604E-16 2.40995487E-16 2.22044605E-16 0.00000000E+00 CSVD_TEST Call ACM TOMS Algorithm 358 for the singular value decomposition: A = U S V* of an M by N complex matrix. Matrix row order M = 6 Matrix column order N = 4 Number of RHSs = 0 Matrix A: -0.7527 0.5377 -0.5164 -0.7941 -0.1074 -0.8040 -0.8550 0.0129 0.4460 -0.0893 -0.2955 -0.2518 0.5717 -0.2751 -0.5393 0.2898 -0.3599 -0.6847 0.9893 -0.0053 -0.1756 -0.3421 0.7435 -0.0097 -0.3257 0.5923 -0.4811 -0.1592 -0.4669 0.7427 -0.0231 -0.9949 0.0109 -0.3166 -0.7655 -0.2702 -0.2562 -0.2240 0.8136 0.5401 -0.1504 -0.7636 0.8069 -0.5715 0.8563 -0.2956 0.0095 -0.8567 Singular values: 2.78277 2.25949 1.02744 0.301255 U: -0.4648 0.4003 -0.0178 0.1630 -0.2305 0.0155 -0.1842 0.5929 0.1564 0.0182 0.0994 0.3512 -0.0261 0.1234 -0.3662 0.1811 0.2441 -0.2848 0.3442 0.0487 -0.2475 -0.4160 -0.5003 0.2665 -0.0451 -0.4339 0.2507 0.2486 -0.2053 0.3419 -0.0054 -0.0568 0.1778 -0.6647 0.0742 0.2095 -0.1470 0.1416 0.2391 -0.5966 0.1196 -0.1201 0.1648 -0.3233 0.3724 -0.0359 -0.0310 0.4939 0.1175 0.0929 0.3520 0.2972 0.5315 -0.5015 -0.2940 0.0513 0.2233 -0.1936 0.2163 -0.0909 -0.3622 -0.4715 -0.2333 0.0427 0.1115 -0.2680 0.5016 0.1344 0.1394 0.1443 0.4403 -0.0466 V: 0.4937 0.0000 -0.3797 0.0000 0.3876 0.0000 0.6796 0.0000 -0.0838 -0.6348 -0.1741 0.0429 -0.1608 0.7236 0.0553 0.0724 -0.0763 -0.2723 -0.6378 0.0374 0.1510 -0.3841 -0.3871 0.4378 0.2989 -0.4206 0.6406 0.0710 0.3271 -0.1514 -0.0458 0.4316 Matrix U S V* (should equal the original A): -0.7527 0.5377 -0.5164 -0.7941 -0.1074 -0.8040 -0.8550 0.0129 0.4460 -0.0893 -0.2955 -0.2518 0.5717 -0.2751 -0.5393 0.2898 -0.3599 -0.6847 0.9893 -0.0053 -0.1756 -0.3421 0.7435 -0.0097 -0.3257 0.5923 -0.4811 -0.1592 -0.4669 0.7427 -0.0231 -0.9949 0.0109 -0.3166 -0.7655 -0.2702 -0.2562 -0.2240 0.8136 0.5401 -0.1504 -0.7636 0.8069 -0.5715 0.8563 -0.2956 0.0095 -0.8567 Max Deviations: A,U^2,V^2,B: 2.20372978E-15 1.11022302E-15 1.88737914E-15 0.00000000E+00 CSVD_TEST Call ACM TOMS Algorithm 358 for the singular value decomposition: A = U S V* of an M by N complex matrix. Matrix row order M = 5 Matrix column order N = 5 Number of RHSs = 0 Matrix A: -0.2646 -0.9364 -0.3122 0.8879 0.0328 -0.1186 0.3750 0.2745 -0.3487 -0.9247 -0.8417 -0.3247 -0.4168 -0.7042 0.1164 -0.7793 0.0053 0.2708 0.0482 0.0512 -0.2465 0.0305 -0.0516 0.7078 0.7356 0.6423 0.1722 0.6432 0.1156 -0.1828 0.5020 0.5880 0.2226 0.1644 -0.4631 -0.3225 0.7442 0.1146 -0.7169 -0.4056 -0.7604 -0.0959 -0.5260 0.5221 0.1653 0.1443 -0.5193 0.3881 0.6387 0.5706 Singular values: 2.37392 1.75423 1.59477 0.665580 0.331521 U: -0.3136 0.2319 -0.1465 0.6178 -0.2979 -0.5161 -0.0055 0.2984 0.0223 0.0094 -0.1468 -0.1454 0.5999 -0.0640 0.2100 -0.5036 -0.0510 -0.3062 0.2348 0.3795 -0.4121 0.1310 -0.1385 0.2990 -0.0850 0.3885 -0.2083 -0.6583 0.2636 0.0003 0.2368 0.5005 -0.2023 -0.1707 -0.1141 -0.2399 -0.1172 -0.3873 -0.5344 0.3216 -0.4667 -0.3061 0.2154 -0.0888 -0.2510 0.2355 -0.3554 0.2185 -0.5271 0.2528 V: 0.3958 0.0000 -0.7626 0.0000 0.3459 0.0000 -0.2128 0.0000 -0.3113 0.0000 0.3379 0.3898 0.2139 0.2272 0.2329 0.4992 0.3901 0.2833 -0.1024 0.3003 -0.2330 0.0259 0.1729 0.4218 0.4879 0.3402 -0.3410 -0.2821 0.0555 -0.4296 0.1164 0.4992 -0.0270 0.0618 -0.0276 -0.1505 -0.4881 -0.1565 0.5172 0.4231 -0.4368 -0.2622 -0.1505 -0.2934 0.3999 0.1995 -0.0859 0.5063 0.3165 0.2611 Matrix U S V* (should equal the original A): -0.2646 -0.9364 -0.3122 0.8879 0.0328 -0.1186 0.3750 0.2745 -0.3487 -0.9247 -0.8417 -0.3247 -0.4168 -0.7042 0.1164 -0.7793 0.0053 0.2708 0.0482 0.0512 -0.2465 0.0305 -0.0516 0.7078 0.7356 0.6423 0.1722 0.6432 0.1156 -0.1828 0.5020 0.5880 0.2226 0.1644 -0.4631 -0.3225 0.7442 0.1146 -0.7169 -0.4056 -0.7604 -0.0959 -0.5260 0.5221 0.1653 0.1443 -0.5193 0.3881 0.6387 0.5706 Max Deviations: A,U^2,V^2,B: 1.19318715E-15 1.33226763E-15 1.33226763E-15 0.00000000E+00 CSVD_TEST Call ACM TOMS Algorithm 358 for the singular value decomposition: A = U S V* of an M by N complex matrix. Matrix row order M = 5 Matrix column order N = 5 Number of RHSs = 2 Matrix A: 0.4666 -0.7890 -0.6677 0.1597 0.2870 -0.3703 0.5283 -0.2448 -0.2769 0.6263 0.4775 -0.7201 -0.2565 -0.8330 -0.2723 0.8187 -0.7220 0.1589 0.1605 0.4931 -0.3683 -0.6271 0.4695 -0.1938 -0.6021 -0.5563 -0.3030 0.2918 0.6391 -0.0836 -0.7235 0.4553 0.2426 -0.6303 0.9818 -0.0603 -0.2604 0.3277 0.5062 0.5357 -0.0547 -0.5939 -0.3236 -0.8967 0.5108 -0.2776 -0.5998 -0.5531 0.5081 -0.7393 Singular values: 2.21244 1.88259 1.79799 1.13444 0.665840 U: 0.1601 -0.0587 -0.4043 0.6320 -0.0078 0.0276 -0.1211 0.0878 0.6033 0.1447 0.0705 -0.5807 -0.3040 -0.1471 -0.0535 -0.4585 -0.4028 -0.1324 -0.0746 -0.3813 -0.1646 -0.2138 0.4699 0.0879 0.3234 -0.1650 -0.4954 -0.0229 0.0256 0.5660 -0.3895 -0.2763 0.0235 -0.2412 -0.2157 0.5796 -0.1166 -0.4270 0.3646 -0.0434 -0.4155 -0.3940 -0.1894 0.0057 0.5084 -0.1160 0.5925 0.0700 0.0400 0.0820 V: 0.5335 0.0000 -0.5707 0.0000 0.4030 0.0000 -0.1851 0.0000 -0.4393 0.0000 0.3982 -0.2118 0.5253 -0.3484 0.0617 0.2999 0.0587 -0.1023 -0.1671 0.5136 -0.3062 -0.1950 -0.4144 0.1297 -0.2397 0.6067 0.3874 -0.1248 -0.2166 0.2039 0.1904 0.3323 -0.1400 0.0917 -0.1034 0.3217 -0.1551 0.6725 0.3837 0.2960 -0.3202 -0.3620 0.2452 0.0150 0.3063 0.3323 -0.3479 0.4345 -0.2798 -0.3373 Matrix U S V* (should equal the original A): 0.4666 -0.7890 -0.6677 0.1597 0.2870 -0.3703 0.5283 -0.2448 -0.2769 0.6263 0.4775 -0.7201 -0.2565 -0.8330 -0.2723 0.8187 -0.7220 0.1589 0.1605 0.4931 -0.3683 -0.6271 0.4695 -0.1938 -0.6021 -0.5563 -0.3030 0.2918 0.6391 -0.0836 -0.7235 0.4553 0.2426 -0.6303 0.9818 -0.0603 -0.2604 0.3277 0.5062 0.5357 -0.0547 -0.5939 -0.3236 -0.8967 0.5108 -0.2776 -0.5998 -0.5531 0.5081 -0.7393 Max Deviations: A,U^2,V^2,B: 1.58595855E-15 1.11022302E-15 5.47425519E-16 9.74612050E-16 TOMS358_TEST: Normal end of execution. 10 December 2017 9:38:29.195 AM