= 'F';
               L2 = NX*(NX+1)/2,    if ALG = 'D' and STOR = 'P';
               L2 = 3*NX + NSMP*L,  if ALG = 'I',
               with BSN  = NN*( L + 2 ) + 1,
                    LTHS = N*( L + M + 1 ) + L*M.
          For optimum performance LDWORK should be larger.

</PRE>
<B>Warning Indicator</B>
<PRE>
  IWARN   INTEGER
          = 0:  no warning;
          &lt; 0:  the user set IFLAG = IWARN in (one of) the
                subroutine(s) FCN, i.e., NF01BA, if INIT = 'S'
                or 'B', an