<?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>A00ADF : 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/A00/a00adf.pdf">A00ADF (PDF version)</a></div><div><a class="chap" href="a00conts.xml">A00 Chapter Contents</a></div><div><a class="chapint" href="a00intro.xml">A00 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/>A00ADF</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">A00ADF prints information about the version of the NAG Library in use.</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;A00ADF&#160;(</td><td class="tdfspec2"><a class="arg" href="#IMPL">IMPL</a>, <a class="arg" href="#PREC">PREC</a>, <a class="arg" href="#PCODE">PCODE</a>, <a class="arg" href="#MKMAJ">MKMAJ</a>, <a class="arg" href="#MKMIN">MKMIN</a>, <a class="arg" href="#HDWARE">HDWARE</a>, <a class="arg" href="#OPSYS">OPSYS</a>, <a class="arg" href="#FCOMP">FCOMP</a>, <a class="arg" href="#VEND">VEND</a>, <a class="arg" href="#LICVAL">LICVAL</a>)</td></tr><tr><td class="tdfspec1">INTEGER</td><td class="tdfspec2">MKMAJ, MKMIN</td></tr><tr><td class="tdfspec1">LOGICAL</td><td class="tdfspec2">LICVAL</td></tr><tr><td class="tdfspec1">CHARACTER*(*)</td><td class="tdfspec2">IMPL, PREC, PCODE, HDWARE, OPSYS, FCOMP, VEND</td></tr></table><h2 class="standard"><a class="sec" name="description" id="description"/>3&#160;&#160;Description</h2>
<div class="paramtext">The NAG Library is available for use on a number of different computer systems.  For each distinct system an implementation of the library is prepared and this implementation is given a unique code. The specifics that define the implementation are: the working precision, the major and minor marks of the NAG Library, the target hardware and operating system, the compiler used, and the vendor library (if any) that is also required to be linked. A00ADF may be called to return, in separate parameters, these specific details of the NAG Library implementation that is being used; it also returns whether a valid licence has been found for this implementation. This differs from <a class="rout" href="../A00/a00aaf.xml">A00AAF</a> which simply outputs the collected information in a readable form directly to the current advisory message unit (see <a class="rout" href="../X04/x04abf.xml">X04ABF</a>).

</div><h2 class="standard"><a class="sec" name="references" id="references"/>4&#160;&#160;References</h2>
<div class="paramtext">None.</div><h2 class="standard"><a class="sec" name="parameters" id="parameters"/>5&#160;&#160;Parameters</h2>
<dl><dt class="paramhead"><a name="IMPL" id="IMPL"/>1: &#160;&#160;&#8194; IMPL &#8211; CHARACTER*(*)<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><b>Note:</b> it is recommended that <a class="arg" href="#IMPL">IMPL</a> be at least <m:math><m:mn>57</m:mn></m:math>&#160;characters in length.</div>
<div class="paramtext"><i>On exit</i>: the implementation title which usually lists the target platform, operating system and compiler.</div>
</dd><dt class="paramhead"><a name="PREC" id="PREC"/>2: &#160;&#160;&#8194; PREC &#8211; CHARACTER*(*)<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><b>Note:</b> it is recommended that <a class="arg" href="#PREC">PREC</a> be at least <m:math><m:mn>57</m:mn></m:math>&#160;characters in length.</div>
<div class="paramtext"><i>On exit</i>: the working or basic precision of the implementation. Some routines may perform operations in reduced precision or additional precision, but the great majority will perform all operations in basic precision. See <a class="sec" href="../GENINT/essint.xml#doc4">Section 4.4</a> in  the Essential Introduction for definitions of these precisions.</div>
</dd><dt class="paramhead"><a name="PCODE" id="PCODE"/>3: &#160;&#160;&#8194; PCODE &#8211; CHARACTER*(*)<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><b>Note:</b> it is recommended that <a class="arg" href="#PCODE">PCODE</a> be at least <m:math><m:mn>20</m:mn></m:math>&#160;characters in length.</div>
<div class="paramtext"><i>On exit</i>: the product code for the NAG Library implementation that is being used. The code has a discernible structure, but it is not necessary to know the details of this structure. The product code can be used to differentiate between individual product licence codes.</div>
</dd><dt class="paramhead"><a name="MKMAJ" id="MKMAJ"/>4: &#160;&#160;&#8194; MKMAJ &#8211; INTEGER<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><i>On exit</i>: the major mark of the NAG Library implementation that is being used.</div>
</dd><dt class="paramhead"><a name="MKMIN" id="MKMIN"/>5: &#160;&#160;&#8194; MKMIN &#8211; INTEGER<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><i>On exit</i>: the minor mark of the NAG Library implementation that is being used.</div>
</dd><dt class="paramhead"><a name="HDWARE" id="HDWARE"/>6: &#160;&#160;&#8194; HDWARE &#8211; CHARACTER*(*)<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><b>Note:</b> it is recommended that <a class="arg" href="#HDWARE">HDWARE</a> be at least <m:math><m:mn>64</m:mn></m:math>&#160;characters in length.</div>
<div class="paramtext"><i>On exit</i>: the target hardware for the NAG Library implementation that is being used.</div>
</dd><dt class="paramhead"><a name="OPSYS" id="OPSYS"/>7: &#160;&#160;&#8194; OPSYS &#8211; CHARACTER*(*)<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><b>Note:</b> it is recommended that <a class="arg" href="#OPSYS">OPSYS</a> be at least <m:math><m:mn>64</m:mn></m:math>&#160;characters in length.</div>
<div class="paramtext"><i>On exit</i>: the target operating system for the NAG Library implementation that is being used.</div>
</dd><dt class="paramhead"><a name="FCOMP" id="FCOMP"/>8: &#160;&#160;&#8194; FCOMP &#8211; CHARACTER*(*)<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><b>Note:</b> it is recommended that <a class="arg" href="#FCOMP">FCOMP</a> be at least <m:math><m:mn>64</m:mn></m:math>&#160;characters in length.</div>
<div class="paramtext"><i>On exit</i>: the compiler used to build the NAG Library implementation that is being used.</div>
</dd><dt class="paramhead"><a name="VEND" id="VEND"/>9: &#160;&#160;&#8194; VEND &#8211; CHARACTER*(*)<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><b>Note:</b> it is recommended that <a class="arg" href="#VEND">VEND</a> be at least <m:math><m:mn>64</m:mn></m:math>&#160;characters in length.</div>
<div class="paramtext"><i>On exit</i>: the subsidiary library, if any, that must be linked with the NAG Library implementation that is being used. If the implementation does not require a subsidiary library then the string
<pre class="verbatim">
'(self-contained)'
</pre>
will be returned in <a class="arg" href="#VEND">VEND</a>.
</div>
</dd><dt class="paramhead"><a name="LICVAL" id="LICVAL"/>10: &#8194; LICVAL &#8211; LOGICAL<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><i>On exit</i>: specifies whether or not a valid licence has been found for the NAG Library implementation that is being used.</div>
</dd></dl><h2 class="standard"><a class="sec" name="errors" id="errors"/>6&#160;&#160;Error Indicators and Warnings</h2>
<div class="paramtext">None.</div><h2 class="standard"><a class="sec" name="accuracy" id="accuracy"/>7&#160;&#160;Accuracy</h2>
<div class="paramtext">Not applicable.</div><h2 class="standard"><a class="sec" name="fcomments" id="fcomments"/>8&#160;&#160;Further Comments</h2>
<div class="paramtext">None.</div><h2 class="standard"><a class="sec" name="example" id="example"/>9&#160;&#160;Example</h2>
<div class="paramtext">This example makes a call of A00ADF, collects information on the NAG Library implementation that is being used and prints it out in a form that is similar to the output obtained by a call to <a class="rout" href="../A00/a00aaf.xml">A00AAF</a>. Additionally the time is also printed in a readable form. The output from running this example program provides information that is very useful when contacting NAG with a support query.</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/a00adfe.f">Program Text (a00adfe.f)</a></p><h3 class="standard"><a class="sec" name="examdata" id="examdata"/>9.2&#160;&#160;Program Data</h3>
<div class="paramtext">None.</div><h3 class="standard"><a class="sec" name="examresults" id="examresults"/>9.3&#160;&#160;Program Results</h3>
<p><a class="verbatimref" href="../../examples/baseresults/a00adfe.r">Program Results (a00adfe.r)</a></p><hr/><div><a class="rout" href="../../pdf/A00/a00adf.pdf">A00ADF (PDF version)</a></div><div><a class="chap" href="a00conts.xml">A00 Chapter Contents</a></div><div><a class="chapint" href="a00intro.xml">A00 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>
