<?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>D06DAF : 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/D06/d06daf.pdf">D06DAF (PDF version)</a></div><div><a class="chap" href="d06conts.xml">D06 Chapter Contents</a></div><div><a class="chapint" href="d06intro.xml">D06 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/>D06DAF</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="htmltocplus">&#160;&#160;&#160;</span>
<a class="htmltoc" href="#example">9&#160;&#160;<b>Example</b></a>
</div>
</div>
</div><h2 class="standard"><a class="sec" name="purpose" id="purpose"/>1&#160;&#160;Purpose</h2>
<div class="paramtext">D06DAF is a utility which performs an affine transformation of a given mesh.</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;D06DAF&#160;(</td><td class="tdfspec2"><a class="arg" href="#NV">NV</a>, <a class="arg" href="#NEDGE">NEDGE</a>, <a class="arg" href="#NELT">NELT</a>, <a class="arg" href="#NTRANS">NTRANS</a>, <a class="arg" href="#ITYPE">ITYPE</a>, <a class="arg" href="#TRANS">TRANS</a>, <a class="arg" href="#COORI">COORI</a>, <a class="arg" href="#EDGEI">EDGEI</a>, <a class="arg" href="#CONNI">CONNI</a>, <a class="arg" href="#COORO">COORO</a>, <a class="arg" href="#EDGEO">EDGEO</a>, <a class="arg" href="#CONNO">CONNO</a>, <a class="arg" href="#ITRACE">ITRACE</a>, <a class="arg" href="#RWORK">RWORK</a>, <a class="arg" href="#LRWORK">LRWORK</a>, <a class="arg" href="#IFAIL">IFAIL</a>)</td></tr><tr><td class="tdfspec1">INTEGER</td><td class="tdfspec2">NV, NEDGE, NELT, NTRANS, ITYPE(NTRANS), EDGEI(3,NEDGE), CONNI(3,NELT), EDGEO(3,NEDGE), CONNO(3,NELT), ITRACE, LRWORK, IFAIL</td></tr><tr><td class="tdfspec1"><b><i>double&#160;precision</i></b></td><td class="tdfspec2">TRANS(6,NTRANS), COORI(2,NV), COORO(2,NV), RWORK(LRWORK)</td></tr></table><h2 class="standard"><a class="sec" name="description" id="description"/>3&#160;&#160;Description</h2>
<div class="paramtext">D06DAF generates a mesh (co-ordinates, triangle/vertex connectivities and edge/vertex connectivities) resulting from an affine transformation of a given mesh.  This transformation is of the form <m:math><m:mi>Y</m:mi><m:mo>=</m:mo><m:mi>A</m:mi><m:mo>&#215;</m:mo><m:mi>X</m:mi><m:mo>+</m:mo><m:mi>B</m:mi></m:math>, where
<ul class="listind"><li class="listind"><m:math><m:mi>Y</m:mi></m:math>, <m:math><m:mi>X</m:mi></m:math>&#160;and <m:math><m:mi>B</m:mi></m:math>&#160;are in <m:math><m:msup><m:mi>&#8477;</m:mi><m:mn>2</m:mn></m:msup></m:math>, and</li><li class="listind"><m:math><m:mi>A</m:mi></m:math>&#160;is a real <m:math><m:mn>2</m:mn></m:math>&#160;by <m:math><m:mn>2</m:mn></m:math>&#160;matrix.</li></ul>
</div><div class="paramtext">Such a transformation includes a translation, a rotation, a scale reduction or increase, a symmetric transformation with respect to a user-supplied line, a user-supplied analytic transformation, or a composition of several transformations.</div><div class="paramtext">This routine is partly derived from material in the MODULEF package from INRIA (Institut National de Recherche en Informatique et Automatique).</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="NV" id="NV"/>1: &#160;&#160;&#8194; NV &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: 

the total number of vertices in the input mesh.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>3</m:mn></m:math>.
</div></dd><dt class="paramhead"><a name="NEDGE" id="NEDGE"/>2: &#160;&#160;&#8194; NEDGE &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: 

the number of the boundary or interface edges in the input mesh.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#NEDGE"><m:mi mathcolor="#EE0000" mathvariant="bold">NEDGE</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>1</m:mn></m:math>.
</div></dd><dt class="paramhead"><a name="NELT" id="NELT"/>3: &#160;&#160;&#8194; NELT &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: 

the number of triangles in the input mesh.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction><m:mo>&#8804;</m:mo><m:mn>2</m:mn><m:mo>&#215;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction><m:mo>-</m:mo><m:mn>1</m:mn></m:math>.
</div></dd><dt class="paramhead"><a name="NTRANS" id="NTRANS"/>4: &#160;&#160;&#8194; NTRANS &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: 

the number of transformations of the input mesh.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>1</m:mn></m:math>.
</div></dd><dt class="paramhead"><a name="ITYPE" id="ITYPE"/>5: &#160;&#160;&#8194; ITYPE(<a class="arg" href="#NTRANS">NTRANS</a>) &#8211; INTEGER array<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>, 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:maction actiontype="link" dsi:type="simple" dsi:href="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction></m:math>, indicates the type of each transformation as follows: 

<dl>
<dt class="paramval"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>0</m:mn></m:math></dt>
<dd>Identity transformation.</dd>
<dt class="paramval"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>1</m:mn></m:math></dt>
<dd>Translation.</dd>
<dt class="paramval"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>2</m:mn></m:math></dt>
<dd>Symmetric transformation with respect to a user-supplied line.</dd>
<dt class="paramval"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>3</m:mn></m:math></dt>
<dd>Rotation.</dd>
<dt class="paramval"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>4</m:mn></m:math></dt>
<dd>Scaling.</dd>
<dt class="paramval"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>10</m:mn></m:math></dt>
<dd>User-supplied analytic transformation.</dd></dl>
<div class="paramtext">Note that the transformations are applied in the order described in <a class="arg" href="#ITYPE">ITYPE</a>.</div>
</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi mathvariant="italic">i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>0</m:mn></m:math>, <m:math><m:mn>1</m:mn></m:math>, <m:math><m:mn>2</m:mn></m:math>, <m:math><m:mn>3</m:mn></m:math>, <m:math><m:mn>4</m:mn></m:math>&#160;or <m:math><m:mn>10</m:mn></m:math>,  for <m:math><m:mi mathvariant="italic">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:maction actiontype="link" dsi:type="simple" dsi:href="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction></m:math>.</div></dd><dt class="paramhead"><a name="TRANS" id="TRANS"/>6: &#160;&#160;&#8194; TRANS(<m:math><m:mn>6</m:mn></m:math>,<a class="arg" href="#NTRANS">NTRANS</a>) &#8211; <span class="bitalic">double precision</span> array<span class="pclass">Input</span></dt><dd>
<div class="paramtext"><i>On entry</i>: the parameters for each transformation. 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:maction actiontype="link" dsi:type="simple" dsi:href="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction></m:math>, <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;to <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>6</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;contain the parameters of the <m:math><m:mi>i</m:mi></m:math>th transformation.
<div class="paramtext">If <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>0</m:mn></m:math>, elements <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;to <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>6</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;are not referenced.</div>
<div class="paramtext">If <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>1</m:mn></m:math>, the translation vector is <m:math>
 <m:mover><m:mi>u</m:mi><m:mo>&#8594;</m:mo></m:mover><m:mo>=</m:mo>
 <m:mfenced><m:mtable>
 <m:mtr><m:mtd><m:mi>a</m:mi></m:mtd></m:mtr>
 <m:mtr><m:mtd><m:mi>b</m:mi></m:mtd></m:mtr>
 </m:mtable></m:mfenced>
 </m:math>, where 
<m:math><m:mi>a</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;and <m:math><m:mi>b</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>, while elements 
<m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;to <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>6</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;are not referenced.</div>
<div class="paramtext">If <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>2</m:mn></m:math>, the user-supplied line is the curve {<m:math><m:mfenced separators=""><m:mi>x</m:mi><m:mo>,</m:mo><m:mi>y</m:mi></m:mfenced><m:mo>&#8712;</m:mo><m:msup><m:mi>&#8477;</m:mi><m:mn>2</m:mn></m:msup></m:math>; such that <m:math><m:mi>a</m:mi><m:mi>x</m:mi><m:mo>+</m:mo><m:mi>b</m:mi><m:mi>y</m:mi><m:mo>+</m:mo><m:mi>c</m:mi><m:mo>=</m:mo><m:mn>0</m:mn></m:math>}, where <m:math><m:mi>a</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>, <m:math><m:mi>b</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;and <m:math><m:mi>c</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>, while elements <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>4</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;to <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>6</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;are not referenced.</div>
<div class="paramtext">If <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>3</m:mn></m:math>, the centre of the rotation is <m:math><m:mfenced separators=""><m:msub><m:mi>x</m:mi><m:mn>0</m:mn></m:msub><m:mo>,</m:mo><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub></m:mfenced></m:math>&#160;where <m:math><m:msub><m:mi>x</m:mi><m:mn>0</m:mn></m:msub><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;and <m:math><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>, <m:math><m:mi>&#952;</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;is its angle in degrees, while elements <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>4</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;to <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>6</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;are not referenced.</div>
<div class="paramtext">If <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>4</m:mn></m:math>, <m:math><m:mi>a</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;is the scaling coefficient in the <m:math><m:mi>x</m:mi></m:math>-direction, <m:math><m:mi>b</m:mi><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;is the scaling coefficient in the <m:math><m:mi>y</m:mi></m:math>-direction, and <m:math><m:mfenced separators=""><m:msub><m:mi>x</m:mi><m:mn>0</m:mn></m:msub><m:mo>,</m:mo><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub></m:mfenced></m:math>&#160;are the scaling centre co-ordinates, with <m:math><m:msub><m:mi>x</m:mi><m:mn>0</m:mn></m:msub><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;and <m:math><m:msub><m:mi>y</m:mi><m:mn>0</m:mn></m:msub><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>4</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>; while elements <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>5</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;to <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>6</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;are not referenced.</div>
<div class="paramtext">If <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mn>10</m:mn></m:math>, the user-supplied analytic affine transformation <m:math><m:mi>Y</m:mi><m:mo>=</m:mo><m:mi>A</m:mi><m:mo>&#215;</m:mo><m:mi>X</m:mi><m:mo>+</m:mo><m:mi>B</m:mi></m:math>&#160;is such that <m:math><m:mi>A</m:mi><m:mo>=</m:mo><m:msub><m:mfenced separators=""><m:msub><m:mi>a</m:mi><m:mrow><m:mi>k</m:mi><m:mi>l</m:mi></m:mrow></m:msub></m:mfenced><m:mrow><m:mn>1</m:mn><m:mo>&#8804;</m:mo><m:mi>k</m:mi><m:mo>,</m:mo><m:mi>l</m:mi><m:mo>&#8804;</m:mo><m:mn>2</m:mn></m:mrow></m:msub></m:math>&#160;and <m:math><m:mi>B</m:mi><m:mo>=</m:mo><m:msub><m:mfenced separators=""><m:msub><m:mi>b</m:mi><m:mi>k</m:mi></m:msub></m:mfenced><m:mrow><m:mn>1</m:mn><m:mo>&#8804;</m:mo><m:mi>k</m:mi><m:mo>&#8804;</m:mo><m:mn>2</m:mn></m:mrow></m:msub></m:math>&#160;where <m:math><m:msub><m:mi>a</m:mi><m:mrow><m:mi>k</m:mi><m:mi>l</m:mi></m:mrow></m:msub><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mrow><m:mn>2</m:mn><m:mo>&#215;</m:mo><m:mfenced separators=""><m:mi>k</m:mi><m:mo>-</m:mo><m:mn>1</m:mn></m:mfenced><m:mo>+</m:mo><m:mi>l</m:mi></m:mrow><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>, and <m:math><m:msub><m:mi>b</m:mi><m:mi>k</m:mi></m:msub><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#TRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">TRANS</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mrow><m:mn>4</m:mn><m:mo>+</m:mo><m:mi>k</m:mi></m:mrow><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;with <m:math><m:mi>k</m:mi><m:mo>,</m:mo><m:mi>l</m:mi><m:mo>=</m:mo><m:mn>1</m:mn><m:mo>,</m:mo><m:mn>2</m:mn></m:math>.</div>
</div></dd><dt class="paramhead"><a name="COORI" id="COORI"/>7: &#160;&#160;&#8194; COORI(<m:math><m:mn>2</m:mn></m:math>,<a class="arg" href="#NV">NV</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="#COORI"><m:mi mathcolor="#EE0000" mathvariant="bold">COORI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;contains the <m:math><m:mi>x</m:mi></m:math>&#160;co-ordinate of the <m:math><m:mi>i</m:mi></m:math>th vertex of the input mesh, 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:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction></m:math>; while <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#COORI"><m:mi mathcolor="#EE0000" mathvariant="bold">COORI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;contains the corresponding <m:math><m:mi>y</m:mi></m:math>&#160;co-ordinate.</div><div class="paramtext"><i>On exit</i>: see <a class="sec" href="#fcomments">Section 8</a>.</div>
</dd><dt class="paramhead"><a name="EDGEI" id="EDGEI"/>8: &#160;&#160;&#8194; EDGEI(<m:math><m:mn>3</m:mn></m:math>,<a class="arg" href="#NEDGE">NEDGE</a>) &#8211; INTEGER array<span class="pclass">Input/Output</span></dt><dd><div class="paramtext"><i>On entry</i>: the specification of the boundary or interface edges. <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;and <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;contain the vertex numbers of the two end points of the <m:math><m:mi>j</m:mi></m:math>th boundary edge. <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;is a user-supplied tag for the <m:math><m:mi>j</m:mi></m:math>th boundary edge. </div><div class="paramtext"><i>On exit</i>: see <a class="sec" href="#fcomments">Section 8</a>.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:mn>1</m:mn><m:mo>&#8804;</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi mathvariant="italic">i</m:mi><m:mi mathvariant="italic">j</m:mi></m:mfenced></m:mrow><m:mo>&#8804;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction></m:math>&#160;and <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi mathvariant="italic">j</m:mi></m:mfenced></m:mrow><m:mo>&#8800;</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi mathvariant="italic">j</m:mi></m:mfenced></m:mrow></m:math>,  for <m:math><m:mi mathvariant="italic">i</m:mi><m:mo>=</m:mo><m:mn>1</m:mn><m:mo>,</m:mo><m:mn>2</m:mn></m:math> and <m:math><m:mi mathvariant="italic">j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NEDGE"><m:mi mathcolor="#EE0000" mathvariant="bold">NEDGE</m:mi></m:maction></m:math>.</div></dd><dt class="paramhead"><a name="CONNI" id="CONNI"/>9: &#160;&#160;&#8194; CONNI(<m:math><m:mn>3</m:mn></m:math>,<a class="arg" href="#NELT">NELT</a>) &#8211; INTEGER array<span class="pclass">Input/Output</span></dt><dd>
<div class="paramtext"><i>On entry</i>: the connectivity of the input mesh between triangles and vertices. For each triangle <m:math><m:mi>j</m:mi></m:math>, <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;gives the indices of its three vertices (in anticlockwise order), 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:mn>3</m:mn></m:math>&#160;and <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction></m:math>. </div><div class="paramtext"><i>On exit</i>: see <a class="sec" href="#fcomments">Section 8</a>.</div><div class="paramtext"><i>Constraints</i>:
   <div class="paramtext"/><ul class="listcons">
<li class="listcons"><m:math><m:mn>1</m:mn><m:mo>&#8804;</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>&#8804;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction></m:math>;</li>
<li class="listcons"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>&#8800;</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>;</li>
<li class="listcons"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi mathvariant="italic">j</m:mi></m:mfenced></m:mrow><m:mo>&#8800;</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi mathvariant="italic">j</m:mi></m:mfenced></m:mrow></m:math>&#160;and <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi mathvariant="italic">j</m:mi></m:mfenced></m:mrow><m:mo>&#8800;</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi mathvariant="italic">j</m:mi></m:mfenced></m:mrow></m:math>,  for <m:math><m:mi mathvariant="italic">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:mn>3</m:mn></m:math> and <m:math><m:mi mathvariant="italic">j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction></m:math>.</li>
</ul></div></dd><dt class="paramhead"><a name="COORO" id="COORO"/>10: &#8194; COORO(<m:math><m:mn>2</m:mn></m:math>,<a class="arg" href="#NV">NV</a>) &#8211; <span class="bitalic">double precision</span> array<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><i>On exit</i>: <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#COORO"><m:mi mathcolor="#EE0000" mathvariant="bold">COORO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;will contain the <m:math><m:mi>x</m:mi></m:math>&#160;co-ordinate of the <m:math><m:mi>i</m:mi></m:math>th vertex of the transformed mesh, 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:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction></m:math>; while <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#COORO"><m:mi mathcolor="#EE0000" mathvariant="bold">COORO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>i</m:mi></m:mfenced></m:mrow></m:math>&#160;will contain the corresponding <m:math><m:mi>y</m:mi></m:math>&#160;co-ordinate. 

</div></dd><dt class="paramhead"><a name="EDGEO" id="EDGEO"/>11: &#8194; EDGEO(<m:math><m:mn>3</m:mn></m:math>,<a class="arg" href="#NEDGE">NEDGE</a>) &#8211; INTEGER array<span class="pclass">Output</span></dt><dd>
<div class="paramtext"><i>On exit</i>: the specification of the boundary or interface edges of the transformed mesh. If the number of symmetric transformations is even or zero then <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEO"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>, 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:mn>3</m:mn></m:math>&#160;and  <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NEDGE"><m:mi mathcolor="#EE0000" mathvariant="bold">NEDGE</m:mi></m:maction></m:math>; otherwise <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEO"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>, <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEO"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;and <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEO"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>, for <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NEDGE"><m:mi mathcolor="#EE0000" mathvariant="bold">NEDGE</m:mi></m:maction></m:math>. 

</div></dd><dt class="paramhead"><a name="CONNO" id="CONNO"/>12: &#8194; CONNO(<m:math><m:mn>3</m:mn></m:math>,<a class="arg" href="#NELT">NELT</a>) &#8211; INTEGER array<span class="pclass">Output</span></dt><dd><div class="paramtext"><i>On exit</i>: the connectivity of the transformed mesh between triangles and vertices. If the number of symmetric transformations is even or zero then <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNO"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>, 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:mn>3</m:mn></m:math>&#160;and <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction></m:math>; otherwise <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNO"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>, <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNO"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;and  <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNO"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNO</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>, for <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction></m:math>. 

</div></dd><dt class="paramhead"><a name="ITRACE" id="ITRACE"/>13: &#8194; ITRACE &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: the level of trace information required from D06DAF.

<dl>
<dt class="paramval"><m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITRACE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITRACE</m:mi></m:maction><m:mo>&#8804;</m:mo><m:mn>0</m:mn></m:math></dt>
<dd>No output is generated.</dd>
<dt class="paramval"><m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITRACE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITRACE</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>1</m:mn></m:math></dt>
<dd>Details of each transformation, the matrix <m:math><m:mi>A</m:mi></m:math>&#160;and the vector <m:math><m:mi>B</m:mi></m:math>&#160;of the final transformation, which is the composition of all the <a class="arg" href="#NTRANS">NTRANS</a> transformations, are printed on the current advisory message unit (see <a class="rout" href="../X04/x04abf.xml">X04ABF</a>).</dd></dl>
</div></dd><dt class="paramhead"><a name="RWORK" id="RWORK"/>14: &#8194; RWORK(<a class="arg" href="#LRWORK">LRWORK</a>) &#8211; <span class="bitalic">double precision</span> array<span class="pclass">Workspace</span></dt><dt class="multi-paramhead"><a name="LRWORK" id="LRWORK"/>15: &#8194; LRWORK &#8211; INTEGER<span class="pclass">Input</span></dt><dd><div class="paramtext"><i>On entry</i>: the dimension of the array <a class="arg" href="#RWORK">RWORK</a> as declared in the (sub)program from which D06DAF is called.</div><div class="paramtext"><i>Constraint</i>:
  <m:math><m:maction actiontype="link" dsi:type="simple" dsi:href="#LRWORK"><m:mi mathcolor="#EE0000" mathvariant="bold">LRWORK</m:mi></m:maction><m:mo>&#8805;</m:mo><m:mn>12</m:mn><m:mo>&#215;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction></m:math>.
</div></dd><dt class="paramhead"><a name="IFAIL" id="IFAIL"/>16: &#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="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction><m:mo>&lt;</m:mo><m:mn>3</m:mn></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="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction><m:mo>&gt;</m:mo><m:mn>2</m:mn><m:mo>&#215;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction><m:mo>-</m:mo><m:mn>1</m:mn></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="#NEDGE"><m:mi mathcolor="#EE0000" mathvariant="bold">NEDGE</m:mi></m:maction><m:mo>&lt;</m:mo><m:mn>1</m:mn></m:math>;</td></tr><tr><td class="ifail1">or</td><td class="ifail2-90"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>&lt;</m:mo><m:mn>1</m:mn></m:math>&#160;or  <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>&gt;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction></m:math>&#160;for some <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:math>&#160;and <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NEDGE"><m:mi mathcolor="#EE0000" mathvariant="bold">NEDGE</m:mi></m:maction></m:math>;</td></tr><tr><td class="ifail1">or</td><td class="ifail2-90"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#EDGEI"><m:mi mathcolor="#EE0000" mathvariant="bold">EDGEI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;for some  <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NEDGE"><m:mi mathcolor="#EE0000" mathvariant="bold">NEDGE</m:mi></m:maction></m:math>;</td></tr><tr><td class="ifail1">or</td><td class="ifail2-90"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>&lt;</m:mo><m:mn>1</m:mn></m:math>&#160;or  <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>&gt;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NV"><m:mi mathcolor="#EE0000" mathvariant="bold">NV</m:mi></m:maction></m:math>&#160;for some <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:mn>3</m:mn></m:math>&#160;and <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction></m:math>;</td></tr><tr><td class="ifail1">or</td><td class="ifail2-90"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;or  <m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>1</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;or <br/>
<m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>2</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow><m:mo>=</m:mo><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#CONNI"><m:mi mathcolor="#EE0000" mathvariant="bold">CONNI</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mn>3</m:mn><m:mi>j</m:mi></m:mfenced></m:mrow></m:math>&#160;for some  <m:math><m:mi>j</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:maction actiontype="link" dsi:type="simple" dsi:href="#NELT"><m:mi mathcolor="#EE0000" mathvariant="bold">NELT</m:mi></m:maction></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="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction><m:mo>&lt;</m:mo><m:mn>1</m:mn></m:math>;</td></tr><tr><td class="ifail1">or</td><td class="ifail2-90"><m:math><m:mrow><m:maction actiontype="link" dsi:type="simple" dsi:href="#ITYPE"><m:mi mathcolor="#EE0000" mathvariant="bold">ITYPE</m:mi></m:maction><m:mfenced separators="," open="(" close=")"><m:mi>i</m:mi></m:mfenced></m:mrow><m:mo>&#8800;</m:mo><m:mn>0</m:mn></m:math>, <m:math><m:mn>1</m:mn></m:math>, <m:math><m:mn>2</m:mn></m:math>, <m:math><m:mn>3</m:mn></m:math>, <m:math><m:mn>4</m:mn></m:math>&#160;or <m:math><m:mn>10</m:mn></m:math>&#160;for some <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:maction actiontype="link" dsi:type="simple" dsi:href="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction></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="#LRWORK"><m:mi mathcolor="#EE0000" mathvariant="bold">LRWORK</m:mi></m:maction><m:mo>&lt;</m:mo><m:mn>12</m:mn><m:mo>&#215;</m:mo><m:maction actiontype="link" dsi:type="simple" dsi:href="#NTRANS"><m:mi mathcolor="#EE0000" mathvariant="bold">NTRANS</m:mi></m:maction></m:math>.</td></tr></table>
</dd>
</dl><dl class="ifail">
<dt class="errorhead"><a name="IFeq2" id="IFeq2"/><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>2</m:mn></m:math></dt>
<dd>
<div class="paramtext">A serious error has occurred in an internal call to an auxiliary routine.  Check the input mesh especially the triangles/vertices and the edges/vertices connectivities as well as the details of each transformations.</div>
</dd>
</dl><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">You may not wish to save the input mesh (<a class="arg" href="#COORI">COORI</a>, <a class="arg" href="#EDGEI">EDGEI</a> and <a class="arg" href="#CONNI">CONNI</a>) and could call D06DAF using the same parameters for the input and the output (transformed) mesh.</div><h2 class="standard"><a class="sec" name="example" id="example"/>9&#160;&#160;Example</h2>
<div class="paramtext">For an example of the use of this utility routine, see <a class="sec" href="../D06/d06dbf.xml#example">Section 9</a> in D06DBF.</div>
<hr/><div><a class="rout" href="../../pdf/D06/d06daf.pdf">D06DAF (PDF version)</a></div><div><a class="chap" href="d06conts.xml">D06 Chapter Contents</a></div><div><a class="chapint" href="d06intro.xml">D06 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>
