File indexing completed on 2024-05-12 04:02:09
0001 <!DOCTYPE html> 0002 <html><head> 0003 <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/> 0004 <title>test.octave</title> 0005 <meta name="generator" content="KF5::SyntaxHighlighting - Definition (Octave) - Theme (Breeze Light)"/> 0006 </head><body style="background-color:#ffffff;color:#1f1c1b"><pre> 0007 <span style="color:#898887"># This is test comment</span> 0008 <span style="color:#898887">% this is another comment</span> 0009 a <span style="color:#ca60ca">=</span> <span style="color:#b08000">3</span><span style="color:#ca60ca">;</span> b <span style="color:#ca60ca">=</span> <span style="color:#b08000">34</span><span style="color:#ca60ca">;</span> 0010 0011 <span style="font-weight:bold">function</span> retval <span style="color:#ca60ca">=</span> avg (v) 0012 retval <span style="color:#ca60ca">=</span> <span style="color:#b08000">0</span><span style="color:#ca60ca">;</span> 0013 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">isvector</span> (v)) 0014 retval <span style="color:#ca60ca">=</span> <span style="color:#644a9b">sum</span> (v) <span style="color:#ca60ca">/</span> <span style="color:#644a9b">length</span> (v)<span style="color:#ca60ca">;</span> 0015 <span style="font-weight:bold">else</span> 0016 <span style="color:#644a9b">error</span> (<span style="color:#bf0303">"avg: expecting vector argument"</span>)<span style="color:#ca60ca">;</span> 0017 <span style="font-weight:bold">endif</span> 0018 <span style="font-weight:bold">endfunction</span> 0019 0020 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">rem</span> (x<span style="color:#ca60ca">,</span> <span style="color:#b08000">2</span>) <span style="color:#ca60ca">==</span> <span style="color:#b08000">0</span>) 0021 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">"x is even\n"</span>)<span style="color:#ca60ca">;</span> 0022 <span style="font-weight:bold">else</span> 0023 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">"x is odd\n"</span>)<span style="color:#ca60ca">;</span> 0024 <span style="font-weight:bold">endif</span> 0025 0026 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">rem</span> (x<span style="color:#ca60ca">,</span> <span style="color:#b08000">2</span>) <span style="color:#ca60ca">==</span> <span style="color:#b08000">0</span>) 0027 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">"x is even\n"</span>)<span style="color:#ca60ca">;</span> 0028 <span style="font-weight:bold">elseif</span> (<span style="color:#644a9b">rem</span> (x<span style="color:#ca60ca">,</span> <span style="color:#b08000">3</span>) <span style="color:#ca60ca">==</span> <span style="color:#b08000">0</span>) 0029 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">"x is odd and divisible by 3\n"</span>)<span style="color:#ca60ca">;</span> 0030 <span style="font-weight:bold">else</span> 0031 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">"x is odd\n"</span>)<span style="color:#ca60ca">;</span> 0032 <span style="font-weight:bold">end</span> 0033 0034 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">rem</span>(x<span style="color:#ca60ca">,</span><span style="color:#b08000">2</span>) <span style="color:#ca60ca">==</span> <span style="color:#b08000">0</span>) x <span style="color:#ca60ca">=</span> <span style="color:#b08000">5</span><span style="color:#ca60ca">;</span> <span style="font-weight:bold">elseif</span> (<span style="color:#644a9b">rem</span> (x<span style="color:#ca60ca">,</span><span style="color:#b08000">3</span>) <span style="color:#ca60ca">==</span> <span style="color:#b08000">0</span>) x <span style="color:#ca60ca">=</span> <span style="color:#b08000">3</span><span style="color:#ca60ca">;</span> <span style="font-weight:bold">else</span> x <span style="color:#ca60ca">=</span> <span style="color:#b08000">0</span><span style="color:#ca60ca">;</span> <span style="font-weight:bold">end</span> 0035 0036 <span style="color:#644a9b;font-weight:bold">cd</span> .. 0037 0038 <span style="font-weight:bold">while</span> (<span style="color:#644a9b">i</span> <span style="color:#ca60ca"><=</span> <span style="color:#b08000">10</span>) 0039 fib (<span style="color:#644a9b">i</span>) <span style="color:#ca60ca">=</span> fib (<span style="color:#644a9b">i</span><span style="color:#ca60ca">-</span><span style="color:#b08000">1</span>) <span style="color:#ca60ca">+</span> fib (<span style="color:#644a9b">i</span><span style="color:#ca60ca">-</span><span style="color:#b08000">2</span>)<span style="color:#ca60ca">;</span> 0040 <span style="color:#644a9b">i</span><span style="color:#ca60ca">++;</span> 0041 <span style="font-weight:bold">endwhile</span> 0042 0043 <span style="font-weight:bold">classdef</span> polynomial2 0044 <span style="font-weight:bold">properties</span> 0045 <span style="color:#644a9b">poly</span> <span style="color:#ca60ca">=</span> <span style="color:#b08000">0</span><span style="color:#ca60ca">;</span> 0046 <span style="font-weight:bold">endproperties</span> 0047 0048 <span style="font-weight:bold">methods</span> 0049 <span style="font-weight:bold">function</span> p <span style="color:#ca60ca">=</span> polynomial2 (a) 0050 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">nargin</span> <span style="color:#ca60ca">></span> <span style="color:#b08000">1</span>) 0051 <span style="color:#644a9b">print_usage</span> ()<span style="color:#ca60ca">;</span> 0052 <span style="font-weight:bold">endif</span> 0053 0054 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">nargin</span> <span style="color:#ca60ca">==</span> <span style="color:#b08000">1</span>) 0055 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">isa</span> (a<span style="color:#ca60ca">,</span> <span style="color:#bf0303">"polynomial2"</span>)) 0056 p.poly <span style="color:#ca60ca">=</span> a.poly<span style="color:#ca60ca">;</span> 0057 <span style="font-weight:bold">elseif</span> (<span style="color:#644a9b">isreal</span> (a) <span style="color:#ca60ca">&&</span> <span style="color:#644a9b">isvector</span> (a)) 0058 p.poly <span style="color:#ca60ca">=</span> a(<span style="color:#ca60ca">:</span>)<span style="color:#ca60ca">.';</span> <span style="color:#898887"># force row vector</span> 0059 <span style="font-weight:bold">else</span> 0060 <span style="color:#644a9b">error</span> (<span style="color:#bf0303">"polynomial2: A must be a real vector"</span>)<span style="color:#ca60ca">;</span> 0061 <span style="font-weight:bold">endif</span> 0062 <span style="font-weight:bold">endif</span> 0063 <span style="font-weight:bold">endfunction</span> 0064 0065 <span style="font-weight:bold">function</span> <span style="color:#644a9b">disp</span> (p) 0066 a <span style="color:#ca60ca">=</span> p.poly<span style="color:#ca60ca">;</span> 0067 first <span style="color:#ca60ca">=</span> <span style="color:#644a9b">true</span><span style="color:#ca60ca">;</span> 0068 <span style="font-weight:bold">for</span> <span style="color:#644a9b">i</span> <span style="color:#ca60ca">=</span> <span style="color:#b08000">1</span> <span style="color:#ca60ca">:</span> <span style="color:#644a9b">length</span> (a)<span style="color:#ca60ca">;</span> 0069 <span style="font-weight:bold">if</span> (a(<span style="color:#644a9b">i</span>) <span style="color:#ca60ca">!=</span> <span style="color:#b08000">0</span>) 0070 <span style="font-weight:bold">if</span> (first) 0071 first <span style="color:#ca60ca">=</span> <span style="color:#644a9b">false</span><span style="color:#ca60ca">;</span> 0072 <span style="font-weight:bold">elseif</span> (a(<span style="color:#644a9b">i</span>) <span style="color:#ca60ca">></span> <span style="color:#b08000">0</span> <span style="color:#ca60ca">||</span> <span style="color:#644a9b">isnan</span> (a(<span style="color:#644a9b">i</span>))) 0073 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">" +"</span>)<span style="color:#ca60ca">;</span> 0074 <span style="font-weight:bold">endif</span> 0075 <span style="font-weight:bold">if</span> (a(<span style="color:#644a9b">i</span>) <span style="color:#ca60ca"><</span> <span style="color:#b08000">0</span>) 0076 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">" -"</span>)<span style="color:#ca60ca">;</span> 0077 <span style="font-weight:bold">endif</span> 0078 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">i</span> <span style="color:#ca60ca">==</span> <span style="color:#b08000">1</span>) 0079 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">" %.5g"</span><span style="color:#ca60ca">,</span> <span style="color:#644a9b">abs</span> (a(<span style="color:#644a9b">i</span>)))<span style="color:#ca60ca">;</span> 0080 <span style="font-weight:bold">elseif</span> (<span style="color:#644a9b">abs</span> (a(<span style="color:#644a9b">i</span>)) <span style="color:#ca60ca">!=</span> <span style="color:#b08000">1</span>) 0081 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">" %.5g *"</span><span style="color:#ca60ca">,</span> <span style="color:#644a9b">abs</span> (a(<span style="color:#644a9b">i</span>)))<span style="color:#ca60ca">;</span> 0082 <span style="font-weight:bold">endif</span> 0083 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">i</span> <span style="color:#ca60ca">></span> <span style="color:#b08000">1</span>) 0084 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">" X"</span>)<span style="color:#ca60ca">;</span> 0085 <span style="font-weight:bold">endif</span> 0086 <span style="font-weight:bold">if</span> (<span style="color:#644a9b">i</span> <span style="color:#ca60ca">></span> <span style="color:#b08000">2</span>) 0087 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">" ^ %d"</span><span style="color:#ca60ca">,</span> <span style="color:#644a9b">i</span> <span style="color:#ca60ca">-</span> <span style="color:#b08000">1</span>)<span style="color:#ca60ca">;</span> 0088 <span style="font-weight:bold">endif</span> 0089 <span style="font-weight:bold">endif</span> 0090 <span style="font-weight:bold">endfor</span> 0091 0092 <span style="font-weight:bold">if</span> (first) 0093 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">" 0"</span>)<span style="color:#ca60ca">;</span> 0094 <span style="font-weight:bold">endif</span> 0095 <span style="color:#644a9b">printf</span> (<span style="color:#bf0303">"\n"</span>)<span style="color:#ca60ca">;</span> 0096 <span style="font-weight:bold">endfunction</span> 0097 <span style="font-weight:bold">endmethods</span> 0098 <span style="font-weight:bold">endclassdef</span> 0099 </pre></body></html>