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 Dark)"/> 0006 </head><body style="background-color:#232629;color:#cfcfc2"><pre> 0007 <span style="color:#7a7c7d"># This is test comment</span> 0008 <span style="color:#7a7c7d">% this is another comment</span> 0009 a <span style="color:#3f8058">=</span> <span style="color:#f67400">3</span><span style="color:#3f8058">;</span> b <span style="color:#3f8058">=</span> <span style="color:#f67400">34</span><span style="color:#3f8058">;</span> 0010 0011 <span style="color:#fdbc4b;font-weight:bold">function</span> retval <span style="color:#3f8058">=</span> avg (v) 0012 retval <span style="color:#3f8058">=</span> <span style="color:#f67400">0</span><span style="color:#3f8058">;</span> 0013 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">isvector</span> (v)) 0014 retval <span style="color:#3f8058">=</span> <span style="color:#8e44ad">sum</span> (v) <span style="color:#3f8058">/</span> <span style="color:#8e44ad">length</span> (v)<span style="color:#3f8058">;</span> 0015 <span style="color:#fdbc4b;font-weight:bold">else</span> 0016 <span style="color:#8e44ad">error</span> (<span style="color:#f44f4f">"avg: expecting vector argument"</span>)<span style="color:#3f8058">;</span> 0017 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0018 <span style="color:#fdbc4b;font-weight:bold">endfunction</span> 0019 0020 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">rem</span> (x<span style="color:#3f8058">,</span> <span style="color:#f67400">2</span>) <span style="color:#3f8058">==</span> <span style="color:#f67400">0</span>) 0021 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is even\n"</span>)<span style="color:#3f8058">;</span> 0022 <span style="color:#fdbc4b;font-weight:bold">else</span> 0023 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is odd\n"</span>)<span style="color:#3f8058">;</span> 0024 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0025 0026 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">rem</span> (x<span style="color:#3f8058">,</span> <span style="color:#f67400">2</span>) <span style="color:#3f8058">==</span> <span style="color:#f67400">0</span>) 0027 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is even\n"</span>)<span style="color:#3f8058">;</span> 0028 <span style="color:#fdbc4b;font-weight:bold">elseif</span> (<span style="color:#8e44ad">rem</span> (x<span style="color:#3f8058">,</span> <span style="color:#f67400">3</span>) <span style="color:#3f8058">==</span> <span style="color:#f67400">0</span>) 0029 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is odd and divisible by 3\n"</span>)<span style="color:#3f8058">;</span> 0030 <span style="color:#fdbc4b;font-weight:bold">else</span> 0031 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is odd\n"</span>)<span style="color:#3f8058">;</span> 0032 <span style="color:#fdbc4b;font-weight:bold">end</span> 0033 0034 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">rem</span>(x<span style="color:#3f8058">,</span><span style="color:#f67400">2</span>) <span style="color:#3f8058">==</span> <span style="color:#f67400">0</span>) x <span style="color:#3f8058">=</span> <span style="color:#f67400">5</span><span style="color:#3f8058">;</span> <span style="color:#fdbc4b;font-weight:bold">elseif</span> (<span style="color:#8e44ad">rem</span> (x<span style="color:#3f8058">,</span><span style="color:#f67400">3</span>) <span style="color:#3f8058">==</span> <span style="color:#f67400">0</span>) x <span style="color:#3f8058">=</span> <span style="color:#f67400">3</span><span style="color:#3f8058">;</span> <span style="color:#fdbc4b;font-weight:bold">else</span> x <span style="color:#3f8058">=</span> <span style="color:#f67400">0</span><span style="color:#3f8058">;</span> <span style="color:#fdbc4b;font-weight:bold">end</span> 0035 0036 <span style="color:#7f8c8d">cd</span> .. 0037 0038 <span style="color:#fdbc4b;font-weight:bold">while</span> (<span style="color:#8e44ad">i</span> <span style="color:#3f8058"><=</span> <span style="color:#f67400">10</span>) 0039 fib (<span style="color:#8e44ad">i</span>) <span style="color:#3f8058">=</span> fib (<span style="color:#8e44ad">i</span><span style="color:#3f8058">-</span><span style="color:#f67400">1</span>) <span style="color:#3f8058">+</span> fib (<span style="color:#8e44ad">i</span><span style="color:#3f8058">-</span><span style="color:#f67400">2</span>)<span style="color:#3f8058">;</span> 0040 <span style="color:#8e44ad">i</span><span style="color:#3f8058">++;</span> 0041 <span style="color:#fdbc4b;font-weight:bold">endwhile</span> 0042 0043 <span style="color:#fdbc4b;font-weight:bold">classdef</span> polynomial2 0044 <span style="color:#fdbc4b;font-weight:bold">properties</span> 0045 <span style="color:#8e44ad">poly</span> <span style="color:#3f8058">=</span> <span style="color:#f67400">0</span><span style="color:#3f8058">;</span> 0046 <span style="color:#fdbc4b;font-weight:bold">endproperties</span> 0047 0048 <span style="color:#fdbc4b;font-weight:bold">methods</span> 0049 <span style="color:#fdbc4b;font-weight:bold">function</span> p <span style="color:#3f8058">=</span> polynomial2 (a) 0050 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">nargin</span> <span style="color:#3f8058">></span> <span style="color:#f67400">1</span>) 0051 <span style="color:#8e44ad">print_usage</span> ()<span style="color:#3f8058">;</span> 0052 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0053 0054 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">nargin</span> <span style="color:#3f8058">==</span> <span style="color:#f67400">1</span>) 0055 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">isa</span> (a<span style="color:#3f8058">,</span> <span style="color:#f44f4f">"polynomial2"</span>)) 0056 p.poly <span style="color:#3f8058">=</span> a.poly<span style="color:#3f8058">;</span> 0057 <span style="color:#fdbc4b;font-weight:bold">elseif</span> (<span style="color:#8e44ad">isreal</span> (a) <span style="color:#3f8058">&&</span> <span style="color:#8e44ad">isvector</span> (a)) 0058 p.poly <span style="color:#3f8058">=</span> a(<span style="color:#3f8058">:</span>)<span style="color:#3f8058">.';</span> <span style="color:#7a7c7d"># force row vector</span> 0059 <span style="color:#fdbc4b;font-weight:bold">else</span> 0060 <span style="color:#8e44ad">error</span> (<span style="color:#f44f4f">"polynomial2: A must be a real vector"</span>)<span style="color:#3f8058">;</span> 0061 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0062 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0063 <span style="color:#fdbc4b;font-weight:bold">endfunction</span> 0064 0065 <span style="color:#fdbc4b;font-weight:bold">function</span> <span style="color:#8e44ad">disp</span> (p) 0066 a <span style="color:#3f8058">=</span> p.poly<span style="color:#3f8058">;</span> 0067 first <span style="color:#3f8058">=</span> <span style="color:#8e44ad">true</span><span style="color:#3f8058">;</span> 0068 <span style="color:#fdbc4b;font-weight:bold">for</span> <span style="color:#8e44ad">i</span> <span style="color:#3f8058">=</span> <span style="color:#f67400">1</span> <span style="color:#3f8058">:</span> <span style="color:#8e44ad">length</span> (a)<span style="color:#3f8058">;</span> 0069 <span style="color:#fdbc4b;font-weight:bold">if</span> (a(<span style="color:#8e44ad">i</span>) <span style="color:#3f8058">!=</span> <span style="color:#f67400">0</span>) 0070 <span style="color:#fdbc4b;font-weight:bold">if</span> (first) 0071 first <span style="color:#3f8058">=</span> <span style="color:#8e44ad">false</span><span style="color:#3f8058">;</span> 0072 <span style="color:#fdbc4b;font-weight:bold">elseif</span> (a(<span style="color:#8e44ad">i</span>) <span style="color:#3f8058">></span> <span style="color:#f67400">0</span> <span style="color:#3f8058">||</span> <span style="color:#8e44ad">isnan</span> (a(<span style="color:#8e44ad">i</span>))) 0073 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" +"</span>)<span style="color:#3f8058">;</span> 0074 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0075 <span style="color:#fdbc4b;font-weight:bold">if</span> (a(<span style="color:#8e44ad">i</span>) <span style="color:#3f8058"><</span> <span style="color:#f67400">0</span>) 0076 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" -"</span>)<span style="color:#3f8058">;</span> 0077 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0078 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">i</span> <span style="color:#3f8058">==</span> <span style="color:#f67400">1</span>) 0079 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" %.5g"</span><span style="color:#3f8058">,</span> <span style="color:#8e44ad">abs</span> (a(<span style="color:#8e44ad">i</span>)))<span style="color:#3f8058">;</span> 0080 <span style="color:#fdbc4b;font-weight:bold">elseif</span> (<span style="color:#8e44ad">abs</span> (a(<span style="color:#8e44ad">i</span>)) <span style="color:#3f8058">!=</span> <span style="color:#f67400">1</span>) 0081 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" %.5g *"</span><span style="color:#3f8058">,</span> <span style="color:#8e44ad">abs</span> (a(<span style="color:#8e44ad">i</span>)))<span style="color:#3f8058">;</span> 0082 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0083 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">i</span> <span style="color:#3f8058">></span> <span style="color:#f67400">1</span>) 0084 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" X"</span>)<span style="color:#3f8058">;</span> 0085 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0086 <span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">i</span> <span style="color:#3f8058">></span> <span style="color:#f67400">2</span>) 0087 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" ^ %d"</span><span style="color:#3f8058">,</span> <span style="color:#8e44ad">i</span> <span style="color:#3f8058">-</span> <span style="color:#f67400">1</span>)<span style="color:#3f8058">;</span> 0088 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0089 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0090 <span style="color:#fdbc4b;font-weight:bold">endfor</span> 0091 0092 <span style="color:#fdbc4b;font-weight:bold">if</span> (first) 0093 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" 0"</span>)<span style="color:#3f8058">;</span> 0094 <span style="color:#fdbc4b;font-weight:bold">endif</span> 0095 <span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"\n"</span>)<span style="color:#3f8058">;</span> 0096 <span style="color:#fdbc4b;font-weight:bold">endfunction</span> 0097 <span style="color:#fdbc4b;font-weight:bold">endmethods</span> 0098 <span style="color:#fdbc4b;font-weight:bold">endclassdef</span> 0099 </pre></body></html>