<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="Generator" content="Microsoft Word 14 (filtered medium)">
<style><!--
/* Font Definitions */
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:Consolas;
panose-1:2 11 6 9 2 2 4 3 2 4;}
@font-face
{font-family:Monospaced;
panose-1:0 0 0 0 0 0 0 0 0 0;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman","serif";
color:black;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
p
{mso-style-priority:99;
mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman","serif";
color:black;}
pre
{mso-style-priority:99;
mso-style-link:"Préformaté HTML Car";
margin:0cm;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:"Courier New";
color:black;}
span.PrformatHTMLCar
{mso-style-name:"Préformaté HTML Car";
mso-style-priority:99;
mso-style-link:"Préformaté HTML";
font-family:Consolas;
color:black;}
span.EmailStyle20
{mso-style-type:personal-reply;
font-family:"Calibri","sans-serif";
color:#1F497D;}
.MsoChpDefault
{mso-style-type:export-only;
font-size:10.0pt;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:70.85pt 70.85pt 70.85pt 70.85pt;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body bgcolor="white" lang="FR" link="blue" vlink="purple">
<div class="WordSection1">
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D">Thanks Stéphane<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D">Works fine and fast (I’m speaking about my application :-) )<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D">Paul<o:p></o:p></span></p>
<p class="MsoNormal"><o:p></o:p></p>
<p><b><i><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:gray">EXPORT CONTROL :
<br>
</span></i></b><b><span style="font-size:10.0pt;font-family:"Arial","sans-serif"">Cet email ne contient pas de données techniques<br>
This email does not contain technical data</span></b><o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<div>
<div style="border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><a name="_____replyseparator"></a><b><span style="font-size:10.0pt;font-family:"Tahoma","sans-serif";color:windowtext">De :</span></b><span style="font-size:10.0pt;font-family:"Tahoma","sans-serif";color:windowtext"> users [mailto:users-bounces@lists.scilab.org]
<b>De la part de</b> Stéphane Mottelet<br>
<b>Envoyé :</b> mercredi 7 novembre 2018 13:40<br>
<b>À :</b> users@lists.scilab.org<br>
<b>Objet :</b> [EXTERNAL] Re: [Scilab-users] function and vectorization<o:p></o:p></span></p>
</div>
</div>
<p class="MsoNormal"><o:p> </o:p></p>
<div>
<p class="MsoNormal" style="margin-bottom:12.0pt">Hello,<br>
<br>
Try:<o:p></o:p></p>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#B01813">function</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">[</span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">Scar_P</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">]</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">=</span><u><span style="font-size:11.5pt;font-family:"Monospaced","serif"">Scalar_product</span></u><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">C</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif"">, </span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">N</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif"">, </span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">M</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">)</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><i><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#64AE64">// Scalar product</span></i><span style="font-size:11.5pt;font-family:"Monospaced","serif""><o:p></o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif""><o:p> </o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">Scar_P</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">=</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">M</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">1</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">)</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">-</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">C</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">1</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">))</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">.*</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">N</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">1</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">)</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">-</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">C</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">1</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">))</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">+</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">M</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">2</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">)</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">-</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">C</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">2</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">))</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">.*</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">N</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">2</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">)</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#5C5C5C">-</span><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#834310">C</span></b><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">(</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#FFAA00">:</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">,</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:rosybrown">2</span><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#4A55DB">))</span><span style="font-size:11.5pt;font-family:"Monospaced","serif"">;<o:p></o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif""><o:p> </o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif""> </span><i><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#64AE64">//printf("C = (%g,%g)\n",C(1),C(2)); printf("N = (%g,%g)\n",N(1),N(2)); printf("M = (%g,%g)\n",M(1),M(2));</span></i><span style="font-size:11.5pt;font-family:"Monospaced","serif""><o:p></o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif""><o:p> </o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#B01813">endfunction<o:p></o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif";color:#B01813"><o:p> </o:p></span></pre>
<pre><span style="font-size:11.5pt;font-family:"Monospaced","serif"">with (do not transpose N(i,1:2))<o:p></o:p></span></pre>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">i
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif""> n;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">Scal</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
<u>Scalar_product</u></span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">C</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,N</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,M</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><o:p></o:p></p>
<p class="MsoNormal"><br>
S.<br>
<br>
Le 07/11/2018 à 12:35, Carrico, Paul a écrit :<o:p></o:p></p>
</div>
<blockquote style="margin-top:5.0pt;margin-bottom:5.0pt">
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US"> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US">#####################################################################</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">mode</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">0</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">clear</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif";color:#B01813">function</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">[</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">Scar_P</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">]</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><u><span lang="EN-US" style="font-family:"Monospaced","serif"">Scalar_product</span></u><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">C</span></b><span lang="EN-US" style="font-family:"Monospaced","serif"">,
</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">N</span></b><span lang="EN-US" style="font-family:"Monospaced","serif"">,
</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">M</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><i><span lang="EN-US" style="font-family:"Monospaced","serif";color:#64AE64">// Scalar product</span></i><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">Scar_P</span></b><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">M</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">-</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">C</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">*</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">N</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">-</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">C</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">+</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">M</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">-</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">C</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">*</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">N</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">-</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">C</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">printf</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">"C =
(%g,%g)\n"</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">C</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">C</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">printf</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">"N =
(%g,%g)\n"</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">N</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">N</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">printf</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">"M =
(%g,%g)\n"</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">M</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,</span><b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#834310">M</span></b><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif";color:#B01813">endfunction</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">n
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">10</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">C
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">rand</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">n,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">M
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">rand</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">n,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">N
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">rand</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">n,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">5</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">Scal
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">zeros</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">n</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;
Scal2 </span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif""> Scal</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">printf</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">"
****************\n"</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">i
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif""> n;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif"">Scal</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
<u>Scalar_product</u></span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">C</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,N</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">'</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,M</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif";color:#32B9B9">printf</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">"\n
****************\n"</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> </span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif";color:#A020F0">for</span><span lang="EN-US" style="font-family:"Monospaced","serif""> i
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif""> n</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span lang="EN-US" style="font-family:"Monospaced","serif""> Scal2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">=</span><span lang="EN-US" style="font-family:"Monospaced","serif"">
<u>Scalar_product</u></span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">C</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,N</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">1</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:rosybrown">2</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">)</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#5C5C5C">'</span><span lang="EN-US" style="font-family:"Monospaced","serif"">,M</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">(</span><span lang="EN-US" style="font-family:"Monospaced","serif"">i,</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#FFAA00">:</span><span lang="EN-US" style="font-family:"Monospaced","serif";color:#4A55DB">))</span><span lang="EN-US" style="font-family:"Monospaced","serif"">;</span><o:p></o:p></p>
<p class="MsoNormal" style="mso-margin-top-alt:auto;mso-margin-bottom-alt:auto"><span style="font-family:"Monospaced","serif";color:#A020F0">end</span><o:p></o:p></p>
</blockquote>
<p><o:p> </o:p></p>
<pre>-- <o:p></o:p></pre>
<pre>Stéphane Mottelet<o:p></o:p></pre>
<pre>Ingénieur de recherche<o:p></o:p></pre>
<pre>EA 4297 Transformations Intégrées de la Matière Renouvelable<o:p></o:p></pre>
<pre>Département Génie des Procédés Industriels<o:p></o:p></pre>
<pre>Sorbonne Universités - Université de Technologie de Compiègne<o:p></o:p></pre>
<pre>CS 60319, 60203 Compiègne cedex<o:p></o:p></pre>
<pre>Tel : +33(0)344234688<o:p></o:p></pre>
<pre><a href="https://urldefense.proofpoint.com/v2/url?u=http-3A__www.utc.fr_-7Emottelet&d=DwMG-g&c=0hKVUfnuoBozYN8UvxPA-w&r=4TCz--8bXfJhZZvIxJAemAJyz7Vfx78XvgYu3LN7eLo&m=4nq72IuY_O4BD4bc-E25iQkCiD8-ZEBjCl6xzxjHbWw&s=9-ZrmcA1S1rslVYW5SkH4zF_TANcPxDeWItXi95Gqls&e=">http://www.utc.fr/~mottelet</a><o:p></o:p></pre>
</div>
</body>
</html>