<?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>E01ABF : 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/E01/e01abf.pdf">E01ABF (PDF version)</a></div><div><a class="chap" href="e01conts.xml">E01 Chapter Contents</a></div><div><a class="chapint" href="e01intro.xml">E01 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/>E01ABF</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">E01ABF interpolates at a given point <m:math><m:mi>x</m:mi></m:math>&#160;from a table of function values evaluated at equidistant points, by Everett's formula.</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;E01ABF&#160;(</td><td class="tdfspec2"><a class="arg" href="#N">N</a>, <a class="arg" href="#P">P</a>, <a class="arg" href="#A">A</a>, <a class="arg" href="#G">G</a>, <a class="arg" href="#N1">N1</a>, <a class="arg" href="#N2">N2</a>, <a class="arg" href="#IFAIL">IFAIL</a>)</td></tr><tr><td class="tdfspec1">INTEGER</td><td class="tdfspec2">N, N1, N2, IFAIL</td></tr><tr><td class="tdfspec1"><b><i>double&#160;precision</i></b></td><td class="tdfspec2">P, A(N1), G(N2)</td></tr></table><h2 class="standard"><a class="sec" name="description" id="description"/>3&#160;&#160;Description</h2>
<div class="paramtext">E01ABF interpolates at a given point

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
<m:mi>x</m:mi><m:mo>=</m:mo><m:msub><m:mi>x</m:mi><m:mn>0</m:mn></m:msub><m:mo>+</m:mo><m:mi>p</m:mi><m:mi>h</m:mi><m:mtext>, &#8195; where &#8195;</m:mtext><m:mo>-</m:mo><m:mn>1</m:mn><m:mo>&lt;</m:mo><m:mi>p</m:mi><m:mo>&lt;</m:mo><m:mn>1</m:mn>
</m:math></td><td class="formula2"/></tr></table></div>

from a table of values <m:math><m:mfenced separators=""><m:msub><m:mi>x</m:mi><m:mn>0</m:mn></m:msub><m:mo>+</m:mo><m:mi>m</m:mi><m:mi>h</m:mi></m:mfenced></m:math>&#160;and <m:math><m:msub><m:mi>y</m:mi><m:mi>m</m:mi></m:msub></m:math>&#160;where <m:math><m:mi>m</m:mi><m:mo>=</m:mo><m:mo>-</m:mo><m:mfenced separators=""><m:mi>n</m:mi><m:mo>-</m:mo><m:mn>1</m:mn></m:mfenced><m:mo>,</m:mo><m:mo>-</m:mo><m:mfenced separators=""><m:mi>n</m:mi><m:mo>-</m:mo><m:mn>2</m:mn></m:mfenced><m:mo>,</m:mo><m:mo>&#8230;</m:mo><m:mo>,</m:mo><m:mo>-</m:mo><m:mn>1</m:mn><m:mo>,</m:mo><m:mn>0</m:mn><m:mo>,</m:mo><m:mn>1</m:mn><m:mo>,</m:mo><m:mo>&#8230;</m:mo><m:mo>,</m:mo><m:mi>n</m:mi></m:math>.  The formula used is that of <a class="ref" href="#ref220">Fr&#246;berg (1970)</a>, neglecting the remainder term:

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
<m:msub><m:mi>y</m:mi><m:mi>p</m:mi></m:msub><m:mo>=</m:mo><m:munderover><m:mo>&#8721;</m:mo><m:mrow><m:mi>r</m:mi><m:mo>=</m:mo><m:mn>0</m:mn></m:mrow>
  <m:mrow><m:mi>n</m:mi><m:mo>-</m:mo><m:mn>1</m:mn></m:mrow></m:munderover>
<m:mfenced separators=""><m:mfrac><m:mrow><m:mn>1</m:mn><m:mo>-</m:mo><m:mi>p</m:mi><m:mo>+</m:mo><m:mi>r</m:mi></m:mrow>
  <m:mrow><m:mn>2</m:mn><m:mi>r</m:mi><m:mo>+</m:mo><m:mn>1</m:mn></m:mrow>
 </m:mfrac></m:mfenced>
<m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub><m:mo>+</m:mo><m:munderover><m:mo>&#8721;</m:mo><m:mrow><m:mi>r</m:mi><m:mo>=</m:mo><m:mn>0</m:mn></m:mrow>
  <m:mrow><m:mi>n</m:mi><m:mo>-</m:mo><m:mn>1</m:mn></m:mrow></m:munderover>
<m:mfenced separators=""><m:mfrac><m:mrow><m:mi>p</m:mi><m:mo>+</m:mo><m:mi>r</m:mi></m:mrow>
  <m:mrow><m:mn>2</m:mn><m:mi>r</m:mi><m:mo>+</m:mo><m:mn>1</m:mn></m:mrow>
 </m:mfrac></m:mfenced>
<m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup><m:msub><m:mi>y</m:mi><m:mn>1</m:mn></m:msub><m:mtext>.</m:mtext>
</m:math></td><td class="formula2"/></tr></table></div>

The values of <m:math><m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub></m:math>&#160;and  <m:math><m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup><m:msub><m:mi>y</m:mi><m:mn>1</m:mn></m:msub></m:math>&#160;are stored on exit from the routine in addition to the interpolated function value <m:math><m:msub><m:mi>y</m:mi><m:mi>p</m:mi></m:msub></m:math>.</div><h2 class="standard"><a class="sec" name="references" id="references"/>4&#160;&#160;References</h2><div class="paramtext"><a name="ref220" id="ref220"/>Fr&#246;berg C E (1970)  <i>Introduction to Numerical Analysis</i> Addison&#8211;Wesley </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>, half the number of points to be used in the interpolation.</div></dd><dt class="paramhead"><a name="P" id="P"/>2: &#160;&#160;&#8194; P &#8211; <span class="bitalic">double precision</span><span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: the point <m:math><m:mi>p</m:mi></m:math>&#160;at which the interpolated function value is required, i.e., <m:math><m:mi>p</m:mi><m:mo>=</m:mo><m:mfenced separators=""><m:mi>x</m:mi><m:mo>-</m:mo><m:msub><m:mi>x</m:mi><m:mn>0</m:mn></m:msub></m:mfenced><m:mo>/</m:mo><m:mi>h</m:mi></m:math>&#160;with <m:math><m:mrow><m:mo>-</m:mo><m:mn>1.0</m:mn></m:mrow><m:mo>&lt;</m:mo><m:mi>p</m:mi><m:mo>&lt;</m:mo><m:mn>1.0</m:mn></m:math>.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:mrow><m:mo>-</m:mo><m:mn>1.0</m:mn></m:mrow><m:mo>&lt;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#P"><m:mi mathcolor="#EE0000" mathvariant="bold">P</m:mi></m:maction><m:mo>&lt;</m:mo><m:mn>1.0</m:mn></m:math>.
</div></dd><dt class="paramhead"><a name="A" id="A"/>3: &#160;&#160;&#8194; A(<a class="arg" href="#N1">N1</a>) &#8211; <span class="bitalic">double precision</span> array<span class="pclass">Input/Output</span></dt><dd><div class="paramtext"><i>On entry</i>: <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#A"><m:mi mathcolor="#EE0000" mathvariant="bold">A</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;must be set to the function value <m:math><m:msub><m:mi>y</m:mi><m:mrow><m:mi>i</m:mi><m:mo>-</m:mo><m:mi>n</m:mi></m:mrow></m:msub></m:math>&#160;for <m:math><m:mi>i</m:mi><m:mo>=</m:mo><m:mn>1</m:mn><m:mo>,</m:mo><m:mn>2</m:mn><m:mo>,</m:mo><m:mo>&#8230;</m:mo><m:mo>,</m:mo><m:mn>2</m:mn><m:mi>n</m:mi></m:math>.</div>
<div class="paramtext"><i>On exit</i>: the contents of <a class="arg" href="#A">A</a> are unspecified.</div></dd><dt class="paramhead"><a name="G" id="G"/>4: &#160;&#160;&#8194; G(<a class="arg" href="#N2">N2</a>) &#8211; <span class="bitalic">double precision</span> array<span class="pclass">Output</span></dt><dd><div class="paramtext"><i>On exit</i>: the array contains <table class="standard-100"><tr>
<td style="width:NaNem;" valign="baseline"><m:math><m:mphantom><m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup></m:mphantom><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub></m:math></td>
<td valign="top">in <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#G"><m:mi mathcolor="#EE0000" mathvariant="bold">G</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn></m:mfenced></m:mrow></m:math></td>
</tr><tr>
<td style="width:NaNem;" valign="baseline"><m:math><m:mphantom><m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup></m:mphantom><m:msub><m:mi>y</m:mi><m:mn>1</m:mn></m:msub></m:math></td>
<td valign="top">in <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#G"><m:mi mathcolor="#EE0000" mathvariant="bold">G</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn></m:mfenced></m:mrow></m:math></td>
</tr><tr>
<td style="width:NaNem;" valign="baseline"><m:math><m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub></m:math></td>
<td valign="top">in <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#G"><m:mi mathcolor="#EE0000" mathvariant="bold">G</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi><m:mo>+</m:mo><m:mn>1</m:mn></m:mrow></m:mfenced></m:mrow></m:math></td>
</tr><tr>
<td style="width:NaNem;" valign="baseline"><m:math><m:msup><m:mi>&#948;</m:mi><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi></m:mrow></m:msup><m:msub><m:mi>y</m:mi><m:mn>1</m:mn></m:msub></m:math></td>
<td valign="top">in <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#G"><m:mi mathcolor="#EE0000" mathvariant="bold">G</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mrow><m:mn>2</m:mn><m:mi>r</m:mi><m:mo>+</m:mo><m:mn>2</m:mn></m:mrow></m:mfenced></m:mrow></m:math>&#160;for <m:math><m:mi>r</m:mi><m:mo>=</m:mo><m:mn>1</m:mn><m:mo>,</m:mo><m:mn>2</m:mn><m:mo>,</m:mo><m:mo>&#8230;</m:mo><m:mo>,</m:mo><m:mi>n</m:mi><m:mo>-</m:mo><m:mn>1</m:mn></m:math>.</td>
</tr></table> 
<div class="paramtext">The interpolated function value <m:math><m:msub><m:mi>y</m:mi><m:mi>p</m:mi></m:msub></m:math>&#160;is stored in <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#G"><m:mi mathcolor="#EE0000" mathvariant="bold">G</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mrow><m:mn>2</m:mn><m:mi>n</m:mi><m:mo>+</m:mo><m:mn>1</m:mn></m:mrow></m:mfenced></m:mrow></m:math>.</div>
</div></dd><dt class="paramhead"><a name="N1" id="N1"/>5: &#160;&#160;&#8194; N1 &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: 

the value <m:math><m:mn>2</m:mn><m:mi>n</m:mi></m:math>, that is, <a class="arg" href="#N1">N1</a> is equal to the number of data points.</div></dd><dt class="paramhead"><a name="N2" id="N2"/>6: &#160;&#160;&#8194; N2 &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: 

the value <m:math><m:mn>2</m:mn><m:mi>n</m:mi><m:mo>+</m:mo><m:mn>1</m:mn></m:math>, that is, <a class="arg" href="#N2">N2</a> is one more than the number of data points.</div></dd><dt class="paramhead"><a name="IFAIL" id="IFAIL"/>7: &#160;&#160;&#8194; IFAIL &#8211; INTEGER<span class="pclass">Input/Output</span></dt><dd>
<div class="paramtext"><i>On entry</i>: <a class="arg" href="#IFAIL">IFAIL</a> must be set to <m:math><m:mn>0</m:mn></m:math>, <m:math><m:mrow><m:mo>-</m:mo><m:mn>1</m:mn></m:mrow><m:mtext>&#8203; or &#8203;</m:mtext><m:mn>1</m:mn></m:math>. If you are unfamiliar with this parameter you should refer to <a class="sec" href="../GENINT/essint.xml#library3">Section 3.3</a> in  the Essential Introduction for details.</div>
<div class="paramtext"><i>On exit</i>: <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#IFAIL"><m:mi mathcolor="#EE0000" mathvariant="bold">IFAIL</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>&#160;unless the routine detects an error (see <a class="sec" href="#errors">Section 6</a>). <div class="paramtext">For environments where it might be inappropriate to halt program execution when an error is detected, the value <m:math><m:mrow><m:mo>-</m:mo><m:mn>1</m:mn></m:mrow><m:mtext>&#8203; or &#8203;</m:mtext><m:mn>1</m:mn></m:math>&#160;is recommended.  If the output of error messages is undesirable, then the value <m:math><m:mn>1</m:mn></m:math>&#160;is recommended.  Otherwise, if you are not familiar with this parameter, the recommended value is <m:math><m:mn>0</m:mn></m:math>.  <b>When the value <m:math><m:mrow><m:mo>-</m:mo><m:mn mathvariant="bold">1</m:mn></m:mrow><m:mtext>&#8203; or &#8203;</m:mtext><m:mn mathvariant="bold">1</m:mn></m:math>&#160;is used it is essential to test the value of <a class="arg" href="#IFAIL">IFAIL</a> on exit.</b></div></div></dd></dl><h2 class="standard"><a class="sec" name="errors" id="errors"/>6&#160;&#160;Error Indicators and Warnings</h2>
<div class="paramtext">If on entry <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#IFAIL"><m:mi mathcolor="#EE0000" mathvariant="bold">IFAIL</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>&#160;or <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#errors"><m:mn mathcolor="#003399" mathvariant="bold">-1</m:mn></m:maction></m:math>, explanatory error messages are output on the current error message unit (as defined by <a class="rout" href="../X04/x04aaf.xml">X04AAF</a>).</div><div class="paramtext">Errors or warnings detected by the routine:</div>
<dl class="ifail">
<dt class="errorhead"><a name="IFeq1" id="IFeq1"/><m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#IFAIL"><m:mi mathcolor="#EE0000" mathvariant="bold">IFAIL</m:mi></m:maction><m:mo>=</m:mo><m:mn>1</m:mn></m:math></dt>
<dd>
<table class="ifail"><tr><td class="ifail1">On&#160;entry,</td><td class="ifail2-90"><m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#P"><m:mi mathcolor="#EE0000" mathvariant="bold">P</m:mi></m:maction><m:mo>&#8804;</m:mo><m:mrow><m:mo>-</m:mo><m:mn>1.0</m:mn></m:mrow></m:math>,</td></tr><tr><td class="ifail1">or</td><td class="ifail2-90"><m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#P"><m:mi mathcolor="#EE0000" mathvariant="bold">P</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>1.0</m:mn></m:math>.</td></tr></table>
</dd>
</dl><h2 class="standard"><a class="sec" name="accuracy" id="accuracy"/>7&#160;&#160;Accuracy</h2>
<div class="paramtext">In general, increasing <m:math><m:mi>n</m:mi></m:math>&#160;improves the accuracy of the result until full attainable accuracy is reached, after which it might deteriorate.  If <m:math><m:mi>x</m:mi></m:math>&#160;lies in the central interval of the data (i.e., <m:math><m:mn>0.0</m:mn><m:mo>&#8804;</m:mo><m:mi>p</m:mi><m:mo>&#8804;</m:mo><m:mn>1.0</m:mn></m:math>), as is desirable, an upper bound on the contribution of the highest order differences (which is usually an upper bound on the error of the result) is given approximately in terms of the elements of the array <a class="arg" href="#G">G</a> by <m:math><m:mi>a</m:mi><m:mo>&#215;</m:mo><m:mfenced separators=""><m:mfenced open="|" close="|" separators=""><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#G"><m:mi mathcolor="#EE0000" mathvariant="bold">G</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mrow><m:mn>2</m:mn><m:mi>n</m:mi><m:mo>-</m:mo><m:mn>1</m:mn></m:mrow></m:mfenced></m:mrow></m:mfenced><m:mo>+</m:mo><m:mfenced open="|" close="|" separators=""><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#G"><m:mi mathcolor="#EE0000" mathvariant="bold">G</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mrow><m:mn>2</m:mn><m:mi>n</m:mi></m:mrow></m:mfenced></m:mrow></m:mfenced></m:mfenced></m:math>, where  <m:math><m:mi>a</m:mi><m:mo>=</m:mo><m:mn>0.1</m:mn></m:math>, <m:math><m:mn>0.02</m:mn></m:math>, <m:math><m:mn>0.005</m:mn></m:math>, <m:math><m:mn>0.001</m:mn></m:math>, <m:math><m:mn>0.0002</m:mn></m:math>&#160;for  <m:math><m:mi>n</m:mi><m:mo>=</m:mo><m:mn>1</m:mn><m:mo>,</m:mo><m:mn>2</m:mn><m:mo>,</m:mo><m:mn>3</m:mn><m:mo>,</m:mo><m:mn>4</m:mn><m:mo>,</m:mo><m:mn>5</m:mn></m:math>&#160;respectively, thereafter decreasing roughly by a factor of <m:math><m:mn>4</m:mn></m:math>&#160;each time.</div><h2 class="standard"><a class="sec" name="fcomments" id="fcomments"/>8&#160;&#160;Further Comments</h2>
<div class="paramtext">The computation time increases as the order of <m:math><m:mi>n</m:mi></m:math>&#160;increases.</div><h2 class="standard"><a class="sec" name="example" id="example"/>9&#160;&#160;Example</h2>
<div class="paramtext">This example interpolates at the point <m:math><m:mi>x</m:mi><m:mo>=</m:mo><m:mn>0.28</m:mn></m:math>&#160;from the function values

<div class="formula"><table class="formula"><tr><td class="formula"><m:math display="block">
 <m:mfenced><m:mtable columnalign="right">
  <m:mtr>
   <m:mtd><m:msub><m:mi>x</m:mi><m:mi>i</m:mi></m:msub></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>1.00</m:mn></m:mrow></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.50</m:mn></m:mrow></m:mtd>
   <m:mtd><m:mn>0.00</m:mn></m:mtd>
   <m:mtd><m:mn>0.50</m:mn></m:mtd>
   <m:mtd><m:mn>1.00</m:mn></m:mtd>
   <m:mtd><m:mn>1.50</m:mn></m:mtd>
  </m:mtr><m:mtr>
   <m:mtd><m:msub><m:mi>y</m:mi><m:mi>i</m:mi></m:msub></m:mtd>
   <m:mtd><m:mn>0.00</m:mn></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.53</m:mn></m:mrow></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>1.00</m:mn></m:mrow></m:mtd>
   <m:mtd><m:mrow><m:mo>-</m:mo><m:mn>0.46</m:mn></m:mrow></m:mtd>
   <m:mtd><m:mn>2.00</m:mn></m:mtd>
   <m:mtd><m:mn>11.09</m:mn></m:mtd>
  </m:mtr>
 </m:mtable></m:mfenced>
 <m:mtext>.</m:mtext>
</m:math></td><td class="formula2"/></tr></table></div>

We take <m:math><m:mi>n</m:mi><m:mo>=</m:mo><m:mn>3</m:mn></m:math>&#160;and <m:math><m:mi>p</m:mi><m:mo>=</m:mo><m:mn>0.56</m:mn></m:math>.</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/e01abfe.f">Program Text (e01abfe.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/e01abfe.d">Program&#160;Data (e01abfe.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/e01abfe.r">Program Results (e01abfe.r)</a></p>
<hr/><div><a class="rout" href="../../pdf/E01/e01abf.pdf">E01ABF (PDF version)</a></div><div><a class="chap" href="e01conts.xml">E01 Chapter Contents</a></div><div><a class="chapint" href="e01intro.xml">E01 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>
