)
99988 FORMAT( 'The factor ', I2, ' is ' )
99987 FORMAT( 'IWARN on exit from MB03BD = ', I2 )
      END
</PRE>
<B>Program Data</B>
<PRE>
MB03BD EXAMPLE PROGRAM DATA
   S   C   I   3   3   2   1   3
  -1     1    -1
   2.0   0.0   1.0
   0.0  -2.0  -1.0
   0.0   0.0   3.0
   1.0   2.0   0.0
   4.0  -1.0   3.0
   0.0   3.0   1.0
   1.0   0.0   1.0
   0.0   4.0  -1.0
   0.0   0.0  -2.0

</PRE>
<B>Program Results</B>
<PRE>
MB03BD EXAMPLE PROGRAM RESULTS
The matrix A on exit is 
The factor  1 is 
  -2.1306   0.