      <td></td><td></td><td width="100%"></td>
        </tr>
      </table>
</div>
<div class="memdoc">

<p>
<pre>
 Purpose
 =======</pre><p>
<pre>   ZLDPERM finds a row permutation so that the matrix has large
   entries on the diagonal.</pre><p>
<pre> Arguments
 =========</pre><p>
<pre> job    (input) int
        Control the action. Possible values for JOB are:
        = 1 : Compute a row permutation of the matrix so that the
              permuted matrix has as many entries on its diagonal as
           