/span>
0014 <span class="comment">%________________________________________________________</span>
0015 <span class="comment">%</span>
0016 <span class="comment">% Authors : Antoine Muller, Charles Pontonnier, Pierre Puchaud and</span>
0017 <span class="comment">% Georges Dumont</span>
0018 <span class="comment">%________________________________________________________</span>
0019 
0020 Io=Ig+m*[OG(2)^2 + OG(3)^2 -OG(1)*OG(2) -OG(1)*OG(3);-OG(1)*OG(2) OG(1)^2+OG(3)^2 -OG(2)*OG(3);-OG(1)*OG(3) -OG(2)*OG(3) O