 then 1 to ILO-1.

</PRE>
<B>Workspace</B>
<PRE>
  DWORK   DOUBLE PRECISION array, dimension (LDWORK) where
          LDWORK = 0,   if  JOB = 'N' or JOB = 'P', or N = 0;
          LDWORK = 6*N, if (JOB = 'S' or JOB = 'B') and THRESH &gt;= 0;
          LDWORK = 8*N, if (JOB = 'S' or JOB = 'B') and THRESH &lt;  0.
          On exit, if JOB = 'S' or JOB = 'B', DWORK(1) and DWORK(2)
          contain the initial 1-norms of A(s,s) and B(s,s), and
          DWORK(3) and DWORK(4) contain their final 1-norms,
     