<html>
<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: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:11.0pt;
font-family:"Calibri","sans-serif";
mso-fareast-language:EN-US;}
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";}
pre
{mso-style-priority:99;
mso-style-link:"Pr\00E9format\00E9 HTML Car";
margin:0cm;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:"Courier New";}
span.EmailStyle17
{mso-style-type:personal-compose;
font-family:"Calibri","sans-serif";
color:windowtext;}
span.PrformatHTMLCar
{mso-style-name:"Pr\00E9format\00E9 HTML Car";
mso-style-priority:99;
mso-style-link:"Pr\00E9format\00E9 HTML";
font-family:"Courier New";
mso-fareast-language:FR;}
.MsoChpDefault
{mso-style-type:export-only;
font-family:"Calibri","sans-serif";
mso-fareast-language:EN-US;}
@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 lang="FR" link="blue" vlink="purple">
<div class="WordSection1">
<p class="MsoNormal"><span style="font-size:12.0pt">Dear All<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt">Most of the time I’ve no issue in mixing functions and vectorization, but here I don’t know why it does not work – one can see that using a vector I, the loop is called only ounce and I do not
understand why?<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt">I’ve spent hours in such case showing I’m not fully at ease with it :-) :-)<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt">Any explanation?<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt">Thanks for your support<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt">Paul<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt">#####################################################################<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#32B9B9;mso-fareast-language:FR">mode</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">(</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:rosybrown;mso-fareast-language:FR">0</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">)</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#32B9B9;mso-fareast-language:FR">clear</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#B01813;mso-fareast-language:FR">function</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#4A55DB">[</span><b><span style="color:#834310">Scar_P</span></b><span style="color:#4A55DB">]</span><span style="color:#5C5C5C">=</span><u><span style="color:black">Scalar_product</span></u><span style="color:#4A55DB">(</span><b><span style="color:#834310">C</span></b><span style="color:black">,
</span><b><span style="color:#834310">N</span></b><span style="color:black">, </span>
<b><span style="color:#834310">M</span></b><span style="color:#4A55DB">)</span> <i>
<span style="color:#64AE64">// Scalar product</span></i><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<b><span style="color:#834310">Scar_P</span></b> <span style="color:#5C5C5C">=</span>
<span style="color:#4A55DB">(</span><b><span style="color:#834310">M</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">1</span><span style="color:#4A55DB">)</span>
<span style="color:#5C5C5C">-</span> <b><span style="color:#834310">C</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">1</span><span style="color:#4A55DB">))</span><span style="color:#5C5C5C">*</span><span style="color:#4A55DB">(</span><b><span style="color:#834310">N</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">1</span><span style="color:#4A55DB">)</span>
<span style="color:#5C5C5C">-</span> <b><span style="color:#834310">C</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">1</span><span style="color:#4A55DB">))</span>
<span style="color:#5C5C5C">+</span> <span style="color:#4A55DB">(</span><b><span style="color:#834310">M</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">)</span>
<span style="color:#5C5C5C">-</span> <b><span style="color:#834310">C</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">))</span><span style="color:#5C5C5C">*</span><span style="color:#4A55DB">(</span><b><span style="color:#834310">N</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">)</span>
<span style="color:#5C5C5C">-</span> <b><span style="color:#834310">C</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">))</span><span style="color:black">;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#32B9B9">printf</span><span style="color:#4A55DB">(</span><span style="color:rosybrown">"C = (%g,%g)\n"</span><span style="color:black">,</span><b><span style="color:#834310">C</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">1</span><span style="color:#4A55DB">)</span><span style="color:black">,</span><b><span style="color:#834310">C</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">))</span><span style="color:black">;</span>
<span style="color:#32B9B9">printf</span><span style="color:#4A55DB">(</span><span style="color:rosybrown">"N = (%g,%g)\n"</span><span style="color:black">,</span><b><span style="color:#834310">N</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">1</span><span style="color:#4A55DB">)</span><span style="color:black">,</span><b><span style="color:#834310">N</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">))</span><span style="color:black">;</span>
<span style="color:#32B9B9">printf</span><span style="color:#4A55DB">(</span><span style="color:rosybrown">"M = (%g,%g)\n"</span><span style="color:black">,</span><b><span style="color:#834310">M</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">1</span><span style="color:#4A55DB">)</span><span style="color:black">,</span><b><span style="color:#834310">M</span></b><span style="color:#4A55DB">(</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">))</span><span style="color:black">;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#B01813;mso-fareast-language:FR">endfunction</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">n</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#5C5C5C">=</span> <span style="color:rosybrown">10</span><span style="color:black">;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">C</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#5C5C5C">=</span> <span style="color:#32B9B9">rand</span><span style="color:#4A55DB">(</span><span style="color:black">n,</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">)</span><span style="color:black">;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">M</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#5C5C5C">=</span> <span style="color:#32B9B9">rand</span><span style="color:#4A55DB">(</span><span style="color:black">n,</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">)</span><span style="color:black">;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">N</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#5C5C5C">=</span> <span style="color:#32B9B9">rand</span><span style="color:#4A55DB">(</span><span style="color:black">n,</span><span style="color:rosybrown">5</span><span style="color:#4A55DB">)</span><span style="color:black">;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">Scal</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#5C5C5C">=</span> <span style="color:#32B9B9">zeros</span><span style="color:#4A55DB">(</span><span style="color:black">n</span><span style="color:#4A55DB">)</span><span style="color:black">;</span>
<span style="color:black">Scal2</span> <span style="color:#5C5C5C">=</span> <span style="color:black">
Scal</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#32B9B9;mso-fareast-language:FR">printf</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">(</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:rosybrown;mso-fareast-language:FR">"
****************\n"</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">)</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">;</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">i</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#5C5C5C">=</span> <span style="color:rosybrown">1</span> <span style="color:#FFAA00">
:</span> <span style="color:black">n;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">Scal</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">(</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">i</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">)</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:#5C5C5C">=</span> <u><span style="color:black">Scalar_product</span></u><span style="color:#4A55DB">(</span><span style="color:black">C</span><span style="color:#4A55DB">(</span><span style="color:black">i,</span><span style="color:#FFAA00">:</span><span style="color:#4A55DB">)</span><span style="color:black">,N</span><span style="color:#4A55DB">(</span><span style="color:black">i,</span><span style="color:rosybrown">1</span><span style="color:#FFAA00">:</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">)</span><span style="color:#5C5C5C">'</span><span style="color:black">,M</span><span style="color:#4A55DB">(</span><span style="color:black">i,</span><span style="color:#FFAA00">:</span><span style="color:#4A55DB">))</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#32B9B9;mso-fareast-language:FR">printf</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">(</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:rosybrown;mso-fareast-language:FR">"\n
****************\n"</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#4A55DB;mso-fareast-language:FR">)</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:black;mso-fareast-language:FR">;</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";color:#A020F0;mso-fareast-language:FR">for</span><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:black">i</span> <span style="color:#5C5C5C">=</span> <span style="color:rosybrown">
1</span> <span style="color:#FFAA00">:</span> <span style="color:black">n</span><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR">
<span style="color:black">Scal2</span><span style="color:#4A55DB">(</span><span style="color:black">i</span><span style="color:#4A55DB">)</span>
<span style="color:#5C5C5C">=</span> <u><span style="color:black">Scalar_product</span></u><span style="color:#4A55DB">(</span><span style="color:black">C</span><span style="color:#4A55DB">(</span><span style="color:black">i,</span><span style="color:#FFAA00">:</span><span style="color:#4A55DB">)</span><span style="color:black">,N</span><span style="color:#4A55DB">(</span><span style="color:black">i,</span><span style="color:rosybrown">1</span><span style="color:#FFAA00">:</span><span style="color:rosybrown">2</span><span style="color:#4A55DB">)</span><span style="color:#5C5C5C">'</span><span style="color:black">,M</span><span style="color:#4A55DB">(</span><span style="color:black">i,</span><span style="color:#FFAA00">:</span><span style="color:#4A55DB">))</span><span style="color:black">;</span><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Monospaced","serif";color:#A020F0;mso-fareast-language:FR">end</span><span style="font-size:12.0pt;font-family:"Monospaced","serif";mso-fareast-language:FR"><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";color:black">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 style="font-size:12.0pt"><o:p> </o:p></span></p>
</div>
</body>
</html>