<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html > <head><title>hb_write — Write a sparse matrix to a file in the Harwell–Boeing format</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <meta name="generator" content="TeX4ht (https://tug.org/tex4ht/)"> <meta name="originator" content="TeX4ht (https://tug.org/tex4ht/)"> <!-- html,3 --> <meta name="src" content="userhtml.tex"> <link rel="stylesheet" type="text/css" href="userhtml.css"> </head><body > <!--l. 56--><div class="crosslinks"><p class="noindent">[<a href="userhtmlsu83.html" >next</a>] [<a href="userhtmlsu78.html" >prev</a>] [<a href="userhtmlsu78.html#tailuserhtmlsu78.html" >prev-tail</a>] [<a href="userhtmlsu77.html#tailuserhtmlsu79.html">tail</a>] [<a href="userhtmlsu80.html#userhtmlsu82.html" >up</a>] </p></div> <h4 class="subsectionHead"><span class="titlemark">9.2 </span> <a id="x93-1300009.2"></a>hb_write — Write a sparse matrix to a file in the Harwell–Boeing format</h4> <!--l. 59--> <div class="lstlisting" id="listing-11"><span class="label"><a id="x93-130001r1"></a></span><span class="cmtt-10">call</span><span class="cmtt-10"> </span><span class="cmtt-10">hb_write</span><span class="cmtt-10">(</span><span class="cmtt-10">a</span><span class="cmtt-10">,</span><span class="cmtt-10"> </span><span class="cmtt-10">iret</span><span class="cmtt-10">,</span><span class="cmtt-10"> </span><span class="cmtt-10">iunit</span><span class="cmtt-10">,</span><span class="cmtt-10"> </span><span class="cmtt-10">filename</span><span class="cmtt-10">,</span><span class="cmtt-10"> </span><span class="cmtt-10">key</span><span class="cmtt-10">,</span><span class="cmtt-10"> </span><span class="cmtt-10">rhs</span><span class="cmtt-10">,</span><span class="cmtt-10"> </span><span class="cmtt-10">mtitle</span><span class="cmtt-10">)</span> </div> <!--l. 65--><p class="indent" > <dl class="description"><dt class="description"> <span class="cmbx-10">Type:</span> </dt><dd class="description">Asynchronous. </dd><dt class="description"> <span class="cmbx-10">On Entry</span> </dt><dd class="description"> </dd><dt class="description"> <span class="cmbx-10">a</span> </dt><dd class="description">the sparse matrix to be written.<br class="newline" />Type:<span class="cmbx-10">required</span>.<br class="newline" />Specified as: a structured data of type <a href="userhtmlsu6.html#spdata"><span class="cmtt-10">psb</span><span class="cmtt-10">_Tspmat</span><span class="cmtt-10">_type</span></a>. </dd><dt class="description"> <span class="cmbx-10">b</span> </dt><dd class="description">Rigth hand side.<br class="newline" />Type: <span class="cmbx-10">Optional </span><br class="newline" />An array of type real or complex, rank 1 and having the ALLOCATABLE attribute; will be allocated and filled in if the input file contains a right hand side. </dd><dt class="description"> <span class="cmbx-10">filename</span> </dt><dd class="description">The name of the file to be written to.<br class="newline" />Type:<span class="cmbx-10">optional</span>.<br class="newline" />Specified as: a character variable containing a valid file name, or <span class="obeylines-h"><span class="verb"><span class="cmtt-10">-</span></span></span>, in which case the default output unit 6 (i.e. standard output in Unix jargon) is used. Default: <span class="obeylines-h"><span class="verb"><span class="cmtt-10">-</span></span></span>. </dd><dt class="description"> <span class="cmbx-10">iunit</span> </dt><dd class="description">The Fortran file unit number.<br class="newline" />Type:<span class="cmbx-10">optional</span>.<br class="newline" />Specified as: an integer value. Only meaningful if filename is not <span class="obeylines-h"><span class="verb"><span class="cmtt-10">-</span></span></span>. </dd><dt class="description"> <span class="cmbx-10">key</span> </dt><dd class="description">Matrix key.<br class="newline" />Type: <span class="cmbx-10">Optional </span><br class="newline" />A charachter variable of length 8 holding the matrix key as specified by the Harwell-Boeing format and to be written to file. </dd><dt class="description"> <span class="cmbx-10">mtitle</span> </dt><dd class="description">Matrix title.<br class="newline" />Type: <span class="cmbx-10">Optional </span><br class="newline" />A charachter variable of length 72 holding the matrix title as specified by the Harwell-Boeing format and to be written to file.</dd></dl> <!--l. 96--><p class="indent" > <dl class="description"><dt class="description"> <span class="cmbx-10">On Return</span> </dt><dd class="description"> </dd><dt class="description"> <span class="cmbx-10">iret</span> </dt><dd class="description">Error code.<br class="newline" />Type: <span class="cmbx-10">required </span><br class="newline" />An integer value; 0 means no error has been detected.</dd></dl> <!--l. 108--><div class="crosslinks"><p class="noindent">[<a href="userhtmlsu83.html" >next</a>] [<a href="userhtmlsu78.html" >prev</a>] [<a href="userhtmlsu78.html#tailuserhtmlsu78.html" >prev-tail</a>] [<a href="userhtmlsu79.html" >front</a>] [<a href="userhtmlsu80.html#userhtmlsu82.html" >up</a>] </p></div> <!--l. 108--><p class="indent" > <a id="tailuserhtmlsu79.html"></a> </body></html>