<?xml-stylesheet type="text/xsl" href="../styles/pmathml.xsl"?>
<!-- saved from url=(0014)about:internet -->
<html xmlns="http://www.w3.org/1999/xhtml" xmlns:dsi="http://www.w3.org/1999/xlink" xmlns:m="http://www.w3.org/1998/Math/MathML" xml:space="preserve"><head><meta http-equiv="Content-Type" content="text/html; charset=US-ASCII"/><title>F07ANF (ZGESV) : NAG Library, Mark 22</title><link rel="stylesheet" href="../styles/libdoc.css" type="text/css"/><script type="text/javascript">
   function showLevel(_levelId){
    var thisLevel = document.getElementById(_levelId);
    var thisplus = document.getElementById( _levelId.concat('plus'));
    var thisminus = document.getElementById( _levelId.concat('minus'));
    if(thisLevel.style.display != "block"){
     thisLevel.style.display = "block";
     thisplus.style.display = "none";
     thisminus.style.display = "inline";
     }
    else{
     thisLevel.style.display = "none";
     thisminus.style.display = "none";
     thisplus.style.display = "inline";
     }
    }
  </script></head><body><hr/><div><a class="rout" href="../../pdf/F07/f07anf.pdf">F07ANF (ZGESV) (PDF version)</a></div><div><a class="chap" href="f07conts.xml">F07 Chapter Contents</a></div><div><a class="chapint" href="f07intro.xml">F07 Chapter Introduction</a></div>
<div><a class="htmltoc" href="../FRONTMATTER/manconts.xml">NAG Library Manual</a></div><hr/><h1 class="libdoc">NAG Library Routine Document<br/><br/>F07ANF (ZGESV)</h1><div class="paramtext"><div class="header"><b>Note:</b>&#160; before using this routine, please read the Users' Note for your implementation to check the interpretation of <span class="bitalic">bold italicised</span> terms and other implementation-dependent details.</div></div> 
<div class="htmltoc">
<h2 class="htmltoc"><span class="htmltochead" onclick="showLevel('htmltoc');"><span class="htmltocplus" id="htmltocplus">+</span><span class="htmltocminus" id="htmltocminus">&#8722;</span></span>&#160;Contents</h2>
<div class="htmltocitem" id="htmltoc">
<div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#purpose">1&#160;&#160;<b>Purpose</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#specification">2&#160;&#160;<b>Specification</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#description">3&#160;&#160;<b>Description</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#references">4&#160;&#160;<b>References</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#parameters">5&#160;&#160;<b>Parameters</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#errors">6&#160;&#160;<b>Error Indicators and Warnings</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#accuracy">7&#160;&#160;<b>Accuracy</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#fcomments">8&#160;&#160;<b>Further Comments</b></a>
</div><div class="htmltoc">
<span class="htmltoc" onclick="showLevel('tocexample');"><span class="htmltocplus" id="tocexampleplus">+</span><span class="htmltocminus" id="tocexampleminus">&#8722;</span></span>
<a class="htmltoc" href="#example">9&#160;&#160;<b>Example</b></a>
<div class="htmltocitem" id="tocexample">
<div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#examtext">9.1&#160;&#160;<b>Program Text</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#examdata">9.2&#160;&#160;<b>Program Data</b></a>
</div><div class="htmltoc">
<span class="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#examresults">9.3&#160;&#160;<b>Program Results</b></a>
</div>
</div>
</div>
</div>
</div><h2 class="standard"><a class="sec" name="purpose" id="purpose"/>1&#160;&#160;Purpose</h2>
<div class="paramtext">F07ANF (ZGESV) computes the solution to a complex system of linear equations

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
<m:mi>A</m:mi><m:mi>X</m:mi><m:mo>=</m:mo><m:mi>B</m:mi>
 <m:mtext>,</m:mtext>
</m:math></td><td class="formula2"/></tr></table></div>

where <m:math><m:mi>A</m:mi></m:math>&#160;is an <m:math><m:mi>n</m:mi></m:math>&#160;by <m:math><m:mi>n</m:mi></m:math>&#160;matrix and <m:math><m:mi>X</m:mi></m:math>&#160;and <m:math><m:mi>B</m:mi></m:math>&#160;are <m:math><m:mi>n</m:mi></m:math>&#160;by <m:math><m:mi>r</m:mi></m:math>&#160;matrices.</div><h2 class="standard"><a class="sec" name="specification" id="specification"/>2&#160;&#160;Specification</h2>
<table class="fspec"><tr><td class="tdfspec1">SUBROUTINE&#160;F07ANF&#160;(</td><td class="tdfspec2"><a class="arg" href="#N">N</a>, <a class="arg" href="#NRHS">NRHS</a>, <a class="arg" href="#A">A</a>, <a class="arg" href="#LDA">LDA</a>, <a class="arg" href="#IPIV">IPIV</a>, <a class="arg" href="#B">B</a>, <a class="arg" href="#LDB">LDB</a>, <a class="arg" href="#INFO">INFO</a>)</td></tr><tr><td class="tdfspec1">INTEGER</td><td class="tdfspec2">N, NRHS, LDA, IPIV(N), LDB, INFO</td></tr><tr><td class="tdfspec1"><b><i>complex*16</i></b></td><td class="tdfspec2">A(LDA,*), B(LDB,*)</td></tr></table><div class="paramtext">The routine may be called by its 
    LAPACK
    name <span class="bitalic">zgesv</span>.</div><h2 class="standard"><a class="sec" name="description" id="description"/>3&#160;&#160;Description</h2>
<div class="paramtext">F07ANF (ZGESV) uses the <m:math><m:mi>L</m:mi><m:mi>U</m:mi></m:math>&#160;decomposition with partial pivoting and row interchanges to factor <m:math><m:mi>A</m:mi></m:math>&#160;as

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
<m:mi>A</m:mi><m:mo>=</m:mo><m:mi>P</m:mi><m:mi>L</m:mi><m:mi>U</m:mi>
 <m:mtext>,</m:mtext>
</m:math></td><td class="formula2"/></tr></table></div>

where <m:math><m:mi>P</m:mi></m:math>&#160;is a permutation matrix, <m:math><m:mi>L</m:mi></m:math>&#160;is unit lower triangular, and <m:math><m:mi>U</m:mi></m:math>&#160;is upper triangular.  The factored form of <m:math><m:mi>A</m:mi></m:math>&#160;is then used to solve the system of equations <m:math><m:mi>A</m:mi><m:mi>X</m:mi><m:mo>=</m:mo><m:mi>B</m:mi></m:math>.</div><h2 class="standard"><a class="sec" name="references" id="references"/>4&#160;&#160;References</h2><div class="paramtext"><a name="ref252" id="ref252"/>Anderson E, Bai Z, Bischof C, Blackford S, Demmel J, Dongarra J J, Du Croz J J, Greenbaum A, Hammarling S, McKenney A and Sorensen D (1999)  <i>LAPACK Users' Guide</i> (3rd Edition) SIAM, Philadelphia <a class="url" href="http://www.netlib.org/lapack/lug">http://www.netlib.org/lapack/lug</a></div>
<div class="paramtext"><a name="ref105" id="ref105"/>Golub G H and Van Loan C F (1996)  <i>Matrix Computations</i> (3rd Edition) Johns Hopkins University Press, Baltimore </div><h2 class="standard"><a class="sec" name="parameters" id="parameters"/>5&#160;&#160;Parameters</h2>
<dl><dt class="paramhead"><a name="N" id="N"/>1: &#160;&#160;&#8194; N &#8211; INTEGER<span class="pclass">Input</span></dt><dd>
<div class="paramtext"><i>On entry</i>: 

<m:math><m:mi>n</m:mi></m:math>, the number of linear equations, i.e., the order of the matrix <m:math><m:mi>A</m:mi></m:math>.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#N"><m:mi mathcolor="#EE0000" mathvariant="bold">N</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>0</m:mn></m:math>.
</div></dd><dt class="paramhead"><a name="NRHS" id="NRHS"/>2: &#160;&#160;&#8194; NRHS &#8211; INTEGER<span class="pclass">Input</span></dt><dd>
<div class="paramtext"><i>On entry</i>: <m:math><m:mi>r</m:mi></m:math>, the number of right-hand sides, i.e., the number of columns of the matrix <m:math><m:mi>B</m:mi></m:math>.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#NRHS"><m:mi mathcolor="#EE0000" mathvariant="bold">NRHS</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>0</m:mn></m:math>.
</div></dd><dt class="paramhead"><a name="A" id="A"/>3: &#160;&#160;&#8194; A(<a class="arg" href="#LDA">LDA</a>,<m:math><m:mo>*</m:mo></m:math>) &#8211; <span class="bitalic">complex*16</span> array<span class="pclass">Input/Output</span></dt><dd><div class="paramtext"><b>Note:</b> the second dimension of the array <a class="arg" href="#A">A</a>
must be at least
<m:math><m:mrow><m:mi>max</m:mi><m:mspace width="0.125em"/><m:mfenced separators=""><m:mn>1</m:mn><m:mo>,</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#N"><m:mi mathcolor="#EE0000" mathvariant="bold">N</m:mi></m:maction></m:mfenced></m:mrow></m:math>.</div>
<div class="paramtext"><i>On entry</i>: the 
<m:math><m:mi>n</m:mi></m:math>&#160;by <m:math><m:mi>n</m:mi></m:math>&#160;coefficient matrix <m:math><m:mi>A</m:mi></m:math>.</div>
<div class="paramtext"><i>On exit</i>: the factors <m:math><m:mi>L</m:mi></m:math>&#160;and <m:math><m:mi>U</m:mi></m:math>&#160;from the factorization <m:math><m:mi>A</m:mi><m:mo>=</m:mo><m:mi>P</m:mi><m:mi>L</m:mi><m:mi>U</m:mi></m:math>; the unit diagonal elements of <m:math><m:mi>L</m:mi></m:math>&#160;are not stored.</div></dd><dt class="paramhead"><a name="LDA" id="LDA"/>4: &#160;&#160;&#8194; LDA &#8211; INTEGER<span class="pclass">Input</span></dt><dd>
<div class="paramtext"><i>On entry</i>: the first dimension of the array <a class="arg" href="#A">A</a> as declared in the (sub)program from which F07ANF (ZGESV) is called.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#LDA"><m:mi mathcolor="#EE0000" mathvariant="bold">LDA</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mrow><m:mi>max</m:mi><m:mspace width="0.125em"/><m:mfenced separators=""><m:mn>1</m:mn><m:mo>,</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#N"><m:mi mathcolor="#EE0000" mathvariant="bold">N</m:mi></m:maction></m:mfenced></m:mrow></m:math>.
</div></dd><dt class="paramhead"><a name="IPIV" id="IPIV"/>5: &#160;&#160;&#8194; IPIV(<a class="arg" href="#N">N</a>) &#8211; INTEGER array<span class="pclass">Output</span></dt><dd><div class="paramtext"><i>On exit</i>: if no constraints are violated, the pivot indices that define the permutation matrix <m:math><m:mi>P</m:mi></m:math>; at the <m:math><m:mi>i</m:mi></m:math>th step row <m:math><m:mi>i</m:mi></m:math>&#160;of the matrix was interchanged with row <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#IPIV"><m:mi mathcolor="#EE0000" mathvariant="bold">IPIV</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>. <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#IPIV"><m:mi mathcolor="#EE0000" mathvariant="bold">IPIV</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mi>i</m:mi></m:math>&#160;indicates a row interchange was not required.</div></dd><dt class="paramhead"><a name="B" id="B"/>6: &#160;&#160;&#8194; B(<a class="arg" href="#LDB">LDB</a>,<m:math><m:mo>*</m:mo></m:math>) &#8211; <span class="bitalic">complex*16</span> array<span class="pclass">Input/Output</span></dt><dd><div class="paramtext"><b>Note:</b> the second dimension of the array <a class="arg" href="#B">B</a>
must be at least
<m:math><m:mrow><m:mi>max</m:mi><m:mspace width="0.125em"/><m:mfenced separators=""><m:mn>1</m:mn><m:mo>,</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NRHS"><m:mi mathcolor="#EE0000" mathvariant="bold">NRHS</m:mi></m:maction></m:mfenced></m:mrow></m:math>.</div>
<div class="paramtext"><i>On entry</i>: the <m:math><m:mi>n</m:mi></m:math>&#160;by <m:math><m:mi>r</m:mi></m:math>&#160;right-hand side matrix <m:math><m:mi>B</m:mi></m:math>.</div><div class="paramtext"><i>On exit</i>: if <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#INFO"><m:mi mathcolor="#EE0000" mathvariant="bold">INFO</m:mi></m:maction><m:mo>=</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#errors"><m:mn mathcolor="#003399" mathvariant="bold">0</m:mn></m:maction></m:math>, the <m:math><m:mi>n</m:mi></m:math>&#160;by <m:math><m:mi>r</m:mi></m:math>&#160;solution matrix <m:math><m:mi>X</m:mi></m:math>.</div></dd><dt class="paramhead"><a name="LDB" id="LDB"/>7: &#160;&#160;&#8194; LDB &#8211; INTEGER<span class="pclass">Input</span></dt><dd>
<div class="paramtext"><i>On entry</i>: the first dimension of the array <a class="arg" href="#B">B</a> as declared in the (sub)program from which F07ANF (ZGESV) is called.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#LDB"><m:mi mathcolor="#EE0000" mathvariant="bold">LDB</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mrow><m:mi>max</m:mi><m:mspace width="0.125em"/><m:mfenced separators=""><m:mn>1</m:mn><m:mo>,</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#N"><m:mi mathcolor="#EE0000" mathvariant="bold">N</m:mi></m:maction></m:mfenced></m:mrow></m:math>.
</div></dd><dt class="paramhead"><a name="INFO" id="INFO"/>8: &#160;&#160;&#8194; INFO &#8211; INTEGER<span class="pclass">Output</span></dt><dd><div class="paramtext"><i>On exit</i>: <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#INFO"><m:mi mathcolor="#EE0000" mathvariant="bold">INFO</m:mi></m:maction><m:mo>=</m:mo><m:mn>0</m:mn></m:math>&#160;unless the routine detects an error (see <a class="sec" href="#errors">Section 6</a>).</div>
</dd></dl><h2 class="standard"><a class="sec" name="errors" id="errors"/>6&#160;&#160;Error Indicators and Warnings</h2>
<div class="paramtext">Errors or warnings detected by the routine:</div>
<dl class="ifail">
<dt class="errorhead"><a name="INlt0" id="INlt0"/><m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#INFO"><m:mi mathcolor="#EE0000" mathvariant="bold">INFO</m:mi></m:maction><m:mo>&lt;</m:mo><m:mn>0</m:mn></m:math></dt>
<dd><div class="paramtext">If <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#INFO"><m:mi mathcolor="#EE0000" mathvariant="bold">INFO</m:mi></m:maction><m:mo>=</m:mo><m:mo>-</m:mo><m:mi>i</m:mi></m:math>, the <m:math><m:mi>i</m:mi></m:math>th argument had an illegal value. An explanatory message is output, and execution of the program is terminated.</div></dd>
</dl><dl class="ifail">
<dt class="errorhead"><a name="INgt0" id="INgt0"/><m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#INFO"><m:mi mathcolor="#EE0000" mathvariant="bold">INFO</m:mi></m:maction><m:mo>&gt;</m:mo><m:mn>0</m:mn></m:math></dt>
<dd><div class="paramtext">If <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#INFO"><m:mi mathcolor="#EE0000" mathvariant="bold">INFO</m:mi></m:maction><m:mo>=</m:mo><m:mi>i</m:mi></m:math>, <m:math><m:msub><m:mi>u</m:mi><m:mrow><m:mi>i</m:mi><m:mi>i</m:mi></m:mrow></m:msub></m:math>&#160;is exactly zero.  The factorization has been completed, but the factor <m:math><m:mi>U</m:mi></m:math>&#160;is exactly singular, so the solution could not be computed.</div></dd>
</dl><h2 class="standard"><a class="sec" name="accuracy" id="accuracy"/>7&#160;&#160;Accuracy</h2>
<div class="paramtext">The computed solution for a single right-hand side, <m:math>
 <m:mover><m:mi>x</m:mi><m:mo>^</m:mo></m:mover>
</m:math>, satisfies the equation of the form

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
<m:mfenced separators=""><m:mi>A</m:mi><m:mo>+</m:mo><m:mi>E</m:mi></m:mfenced>
 <m:mover><m:mi>x</m:mi><m:mo>^</m:mo></m:mover><m:mo>=</m:mo><m:mi>b</m:mi>
 <m:mtext>,</m:mtext>
</m:math></td><td class="formula2"/></tr></table></div>
 
where

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
<m:msub><m:mfenced open="&#8214;" close="&#8214;" separators=""><m:mi>E</m:mi></m:mfenced><m:mn>1</m:mn></m:msub>
 <m:mo>=</m:mo>
 <m:mrow><m:mi mathvariant="italic">O</m:mi><m:mfenced separators=""><m:mi>&#949;</m:mi></m:mfenced></m:mrow>
 <m:msub><m:mfenced open="&#8214;" close="&#8214;" separators=""><m:mi>A</m:mi></m:mfenced><m:mn>1</m:mn></m:msub>
</m:math></td><td class="formula2"/></tr></table></div>

and <m:math>
 <m:mi>&#949;</m:mi>
</m:math>&#160;is the <span class="bitalic">machine precision</span>. An approximate error bound for the computed solution is given by 

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
<m:mfrac>
  <m:msub><m:mfenced open="&#8214;" close="&#8214;" separators="">
   <m:mover><m:mi>x</m:mi><m:mo>^</m:mo></m:mover>
   <m:mo>-</m:mo>
   <m:mi>x</m:mi>
  </m:mfenced><m:mn>1</m:mn></m:msub>
  <m:msub><m:mfenced open="&#8214;" close="&#8214;" separators="">
   <m:mi>x</m:mi>
  </m:mfenced><m:mn>1</m:mn></m:msub>
 </m:mfrac>
 <m:mo>&#8804;</m:mo>
 <m:mi>&#954;</m:mi><m:mfenced separators=""><m:mi>A</m:mi></m:mfenced>
 <m:mfrac>
  <m:msub><m:mfenced open="&#8214;" close="&#8214;" separators="">
   <m:mi>E</m:mi>
  </m:mfenced><m:mn>1</m:mn></m:msub>
  <m:msub><m:mfenced open="&#8214;" close="&#8214;" separators="">
   <m:mi>A</m:mi>
  </m:mfenced><m:mn>1</m:mn></m:msub>
 </m:mfrac>
</m:math></td><td class="formula2"/></tr></table></div>

where <m:math>
 <m:mi>&#954;</m:mi><m:mfenced separators=""><m:mi>A</m:mi></m:mfenced>
 <m:mo>=</m:mo>
 <m:msub><m:mfenced open="&#8214;" close="&#8214;" separators="">
  <m:msup><m:mi>A</m:mi><m:mrow><m:mo>-</m:mo><m:mn>1</m:mn></m:mrow></m:msup>
 </m:mfenced><m:mn>1</m:mn></m:msub>
 <m:msub><m:mfenced open="&#8214;" close="&#8214;" separators="">
  <m:mi>A</m:mi>
 </m:mfenced><m:mn>1</m:mn></m:msub>
</m:math>, the condition number of <m:math>
 <m:mi>A</m:mi>
</m:math>&#160;with respect to the solution of the linear equations. See Section 4.4 of <a class="ref" href="#ref252">Anderson <span class="italic">et al.</span> (1999)</a> for further details.
</div><div class="paramtext">Following the use of F07ANF (ZGESV), <a class="rout" href="../F07/f07avf.xml">F07AVF (ZGERFS)</a> can be used to estimate the condition number of <m:math>
 <m:mi>A</m:mi>
</m:math>&#160;and <a class="rout" href="../F07/f07avf.xml">F07AVF (ZGERFS)</a> can be used to obtain approximate error bounds.  Alternatives to F07ANF (ZGESV), which return condition and error estimates directly are <a class="rout" href="../F04/f04caf.xml">F04CAF</a> and <a class="rout" href="../F07/f07apf.xml">F07APF (ZGESVX)</a>.
</div><h2 class="standard"><a class="sec" name="fcomments" id="fcomments"/>8&#160;&#160;Further Comments</h2>
<div class="paramtext">The total number of floating-point operations is approximately 
<m:math>
 <m:mfrac><m:mn>8</m:mn><m:mn>3</m:mn></m:mfrac>
 <m:msup><m:mi>n</m:mi><m:mn>3</m:mn></m:msup>
 <m:mo>+</m:mo>
 <m:mn>8</m:mn><m:mo>&#8290;</m:mo><m:msup><m:mi>n</m:mi><m:mn>2</m:mn></m:msup>
 <m:mi>r</m:mi>
</m:math>, where <m:math>
 <m:mi>r</m:mi>
</m:math>&#160;is the number of right-hand sides.</div><div class="paramtext">The real analogue of this routine is <a class="rout" href="../F07/f07aaf.xml">F07AAF (DGESV)</a>.</div><h2 class="standard"><a class="sec" name="example" id="example"/>9&#160;&#160;Example</h2>
<div class="paramtext">This example solves the equations

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
 <m:mi>A</m:mi><m:mi>x</m:mi>
 <m:mo>=</m:mo>
 <m:mi>b</m:mi>
 <m:mtext>,</m:mtext>
</m:math></td><td class="formula2"/></tr></table></div>

where <m:math><m:mi>A</m:mi></m:math>&#160;is the general matrix

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
 <m:mi>A</m:mi>
 <m:mo>=</m:mo>
 <m:mfenced><m:mtable columnalign="right">
<m:mtr>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>1.34</m:mn></m:mrow><m:mo>+</m:mo><m:mn>2.55</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mn>0.28</m:mn><m:mo>+</m:mo><m:mn>3.17</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>6.39</m:mn></m:mrow><m:mo>-</m:mo><m:mn>2.20</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mn>0.72</m:mn><m:mo>-</m:mo><m:mn>0.92</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr><m:mtr>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.17</m:mn></m:mrow><m:mo>-</m:mo><m:mn>1.41</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mn>3.31</m:mn><m:mo>-</m:mo><m:mn>0.15</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.15</m:mn></m:mrow><m:mo>+</m:mo><m:mn>1.34</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mn>1.29</m:mn><m:mo>+</m:mo><m:mn>1.38</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr><m:mtr>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>3.29</m:mn></m:mrow><m:mo>-</m:mo><m:mn>2.39</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>1.91</m:mn></m:mrow><m:mo>+</m:mo><m:mn>4.42</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.14</m:mn></m:mrow><m:mo>-</m:mo><m:mn>1.35</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mn>1.72</m:mn><m:mo>+</m:mo><m:mn>1.35</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr><m:mtr>
   <m:mtd><m:mn>2.41</m:mn><m:mo>+</m:mo><m:mn>0.39</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.56</m:mn></m:mrow><m:mo>+</m:mo><m:mn>1.47</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.83</m:mn></m:mrow><m:mo>-</m:mo><m:mn>0.69</m:mn><m:mi>i</m:mi></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>1.96</m:mn></m:mrow><m:mo>+</m:mo><m:mn>0.67</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr>
</m:mtable></m:mfenced>
 <m:mtext>&#8195; and &#8195;</m:mtext>
 <m:mi>b</m:mi>
 <m:mo>=</m:mo>
 <m:mfenced><m:mtable columnalign="right">
<m:mtr>
   <m:mtd><m:mn>26.26</m:mn><m:mo>+</m:mo><m:mn>51.78</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr><m:mtr>
   <m:mtd><m:mn>6.43</m:mn><m:mo>-</m:mo><m:mphantom><m:mn>0</m:mn></m:mphantom><m:mn>8.68</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr><m:mtr>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>5.75</m:mn></m:mrow><m:mo>+</m:mo><m:mn>25.31</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr><m:mtr>
   <m:mtd><m:mn>1.16</m:mn><m:mo>+</m:mo><m:mphantom><m:mn>0</m:mn></m:mphantom><m:mn>2.57</m:mn><m:mi>i</m:mi></m:mtd>
</m:mtr>
</m:mtable></m:mfenced>
 <m:mtext>.</m:mtext>
</m:math></td><td class="formula2"/></tr></table></div></div><div class="paramtext">Details of the <m:math><m:mi>L</m:mi><m:mi>U</m:mi></m:math>&#160;factorization of <m:math><m:mi>A</m:mi></m:math>&#160;are also output.</div><h3 class="standard"><a class="sec" name="examtext" id="examtext"/>9.1&#160;&#160;Program Text</h3>
<p><a class="verbatimref" href="../../examples/source/f07anfe.f">Program Text (f07anfe.f)</a></p><h3 class="standard"><a class="sec" name="examdata" id="examdata"/>9.2&#160;&#160;Program Data</h3>
<p><a class="verbatimref" href="../../examples/data/f07anfe.d">Program&#160;Data (f07anfe.d)</a></p><h3 class="standard"><a class="sec" name="examresults" id="examresults"/>9.3&#160;&#160;Program Results</h3>
<p><a class="verbatimref" href="../../examples/baseresults/f07anfe.r">Program Results (f07anfe.r)</a></p>
<hr/><div><a class="rout" href="../../pdf/F07/f07anf.pdf">F07ANF (ZGESV) (PDF version)</a></div><div><a class="chap" href="f07conts.xml">F07 Chapter Contents</a></div><div><a class="chapint" href="f07intro.xml">F07 Chapter Introduction</a></div>
<div><a class="htmltoc" href="../FRONTMATTER/manconts.xml">NAG Library Manual</a></div>
<div><hr/><a class="genint" href="../FRONTMATTER/copyright.xml">&#169; The Numerical Algorithms Group Ltd, Oxford, UK. 2009</a></div></body></html>
