 
TOMS358_PRB:
  Test the ACM TOMS 358 Algorithm CSVD.
 
TEST01
  Call ACM TOMS Algorithm 358 for the
  singular value decomposition:
    A = U S V*
  of an M by N complex matrix.
 
  Matrix A:
 
  0.4499 -0.1267 -0.2361  0.0775  0.5008 -0.7799 -0.7702 -0.3143 -0.5084  0.5621
 -0.8432 -0.3443  0.0186 -0.6332  0.3505  0.0166 -0.8892  0.2657 -0.5066  0.6005
  0.5896  0.2601  0.8928  0.0103  0.4350 -0.2666 -0.7799 -0.5512 -0.1022 -0.4500
  0.3911  0.3234 -0.5605  0.7638 -0.2009  0.2707  0.0314 -0.4336 -0.1046  0.3267
 -0.1395 -0.1561  0.3064  0.0263 -0.0975  0.9019  0.2491  0.5787  0.4106 -0.8102
 
  Singular values:
 
     2.43285    
     1.94345    
     1.15708    
    0.705795    
    0.248448    
 
  U:
 
  0.2242 -0.4836 -0.2151 -0.3438  0.0537  0.0352 -0.3236  0.2017  0.3038  0.5564
 -0.0470 -0.5195  0.3621  0.0569 -0.7086 -0.0724  0.0222 -0.2600  0.0696 -0.1153
  0.5033 -0.1529 -0.2687  0.2132  0.1156  0.5523  0.0944 -0.3937  0.2180 -0.2752
  0.0390  0.1680 -0.3397 -0.3904 -0.1128 -0.3801 -0.4899 -0.2989  0.1194 -0.4491
 -0.0944  0.3583  0.1730  0.5346 -0.1006  0.0531 -0.5220 -0.1440  0.4013  0.2825
 
  V:
 
  0.2731  0.0000 -0.4363  0.0000  0.5986  0.0000 -0.4818  0.0000 -0.3803  0.0000
  0.3175 -0.0395 -0.1459  0.5963 -0.1079  0.3004  0.3116  0.2061 -0.1692 -0.5007
  0.4497 -0.0720  0.2791 -0.1763 -0.3194  0.4403 -0.3277  0.4089 -0.0848  0.3256
 -0.1286  0.6084  0.2933 -0.2009  0.2858 -0.0985  0.2001  0.5267 -0.2325 -0.1550
 -0.3842  0.2852 -0.3889  0.2152 -0.1289  0.3687  0.1898 -0.0146 -0.2733  0.5568
 
  Matrix U S V*
  (should equal the original A):
 
  0.4499 -0.1267 -0.2361  0.0775  0.5008 -0.7799 -0.7702 -0.3143 -0.5084  0.5621
 -0.8432 -0.3443  0.0186 -0.6332  0.3505  0.0166 -0.8892  0.2657 -0.5066  0.6005
  0.5896  0.2601  0.8928  0.0103  0.4350 -0.2666 -0.7799 -0.5512 -0.1022 -0.4500
  0.3911  0.3234 -0.5605  0.7638 -0.2009  0.2707  0.0314 -0.4336 -0.1046  0.3267
 -0.1395 -0.1561  0.3064  0.0263 -0.0975  0.9019  0.2491  0.5787  0.4106 -0.8102
 
TEST02
  Call LINPACK routine CSVDC for the
  singular value decomposition:
    A = U S V*
  of an M by N complex matrix.
 
  Matrix A:
 
  0.4499 -0.1267 -0.2361  0.0775  0.5008 -0.7799 -0.7702 -0.3143 -0.5084  0.5621
 -0.8432 -0.3443  0.0186 -0.6332  0.3505  0.0166 -0.8892  0.2657 -0.5066  0.6005
  0.5896  0.2601  0.8928  0.0103  0.4350 -0.2666 -0.7799 -0.5512 -0.1022 -0.4500
  0.3911  0.3234 -0.5605  0.7638 -0.2009  0.2707  0.0314 -0.4336 -0.1046  0.3267
 -0.1395 -0.1561  0.3064  0.0263 -0.0975  0.9019  0.2491  0.5787  0.4106 -0.8102
