F01CWF Example Program Results

 TRANSA = 'N', TRANSB = 'N',
 ALPHA = ( 1.0000E+00, 0.0000E+00), BETA = ( 1.0000E+00, 0.0000E+00)
 Matrix C:
             1          2          3
 1      3.0000     0.0000     2.0000
        3.0000     1.5000    -1.0000
 
 2     -1.0000     3.0000     0.0000
       -2.0000    -2.5000    -2.5000
 
 3      2.0000     4.5000     1.5000
       -2.0000    -0.5000     4.0000
 
 4      0.0000    -4.0000     0.0000
       -1.5000     4.0000     5.0000

 TRANSA = 'N', TRANSB = 'T',
 ALPHA = ( 1.0000E+00, 0.0000E+00), BETA = (-1.0000E+00, 0.0000E+00)
 Matrix C:
             1          2          3
 1     -1.0000     1.5000     4.5000
        0.0000    -1.5000     2.0000
 
 2      0.5000     1.0000    -4.0000
       -2.5000     0.0000    -1.5000