1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
|
<!DOCTYPE html>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
<title>test.octave</title>
<meta name="generator" content="KF5::SyntaxHighlighting - Definition (Octave) - Theme (Breeze Dark)"/>
</head><body style="background-color:#232629;color:#cfcfc2"><pre>
<span style="color:#7a7c7d"># This is test comment</span>
<span style="color:#7a7c7d">% this is another comment</span>
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>
<span style="color:#fdbc4b;font-weight:bold">function</span> retval <span style="color:#3f8058">=</span> avg (v)
retval <span style="color:#3f8058">=</span> <span style="color:#f67400">0</span><span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">if</span> (<span style="color:#8e44ad">isvector</span> (v))
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>
<span style="color:#fdbc4b;font-weight:bold">else</span>
<span style="color:#8e44ad">error</span> (<span style="color:#f44f4f">"avg: expecting vector argument"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<span style="color:#fdbc4b;font-weight:bold">endfunction</span>
<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>)
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is even\n"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">else</span>
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is odd\n"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<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>)
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is even\n"</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>)
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is odd and divisible by 3\n"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">else</span>
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"x is odd\n"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">end</span>
<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>
<span style="color:#7f8c8d">cd</span> ..
<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>)
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>
<span style="color:#8e44ad">i</span><span style="color:#3f8058">++;</span>
<span style="color:#fdbc4b;font-weight:bold">endwhile</span>
<span style="color:#fdbc4b;font-weight:bold">classdef</span> polynomial2
<span style="color:#fdbc4b;font-weight:bold">properties</span>
<span style="color:#8e44ad">poly</span> <span style="color:#3f8058">=</span> <span style="color:#f67400">0</span><span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endproperties</span>
<span style="color:#fdbc4b;font-weight:bold">methods</span>
<span style="color:#fdbc4b;font-weight:bold">function</span> p <span style="color:#3f8058">=</span> polynomial2 (a)
<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>)
<span style="color:#8e44ad">print_usage</span> ()<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<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>)
<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>))
p.poly <span style="color:#3f8058">=</span> a.poly<span style="color:#3f8058">;</span>
<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))
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>
<span style="color:#fdbc4b;font-weight:bold">else</span>
<span style="color:#8e44ad">error</span> (<span style="color:#f44f4f">"polynomial2: A must be a real vector"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<span style="color:#fdbc4b;font-weight:bold">endfunction</span>
<span style="color:#fdbc4b;font-weight:bold">function</span> <span style="color:#8e44ad">disp</span> (p)
a <span style="color:#3f8058">=</span> p.poly<span style="color:#3f8058">;</span>
first <span style="color:#3f8058">=</span> <span style="color:#8e44ad">true</span><span style="color:#3f8058">;</span>
<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>
<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>)
<span style="color:#fdbc4b;font-weight:bold">if</span> (first)
first <span style="color:#3f8058">=</span> <span style="color:#8e44ad">false</span><span style="color:#3f8058">;</span>
<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>)))
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" +"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<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>)
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" -"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<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>)
<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>
<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>)
<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>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<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>)
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" X"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<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>)
<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>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<span style="color:#fdbc4b;font-weight:bold">endfor</span>
<span style="color:#fdbc4b;font-weight:bold">if</span> (first)
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">" 0"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endif</span>
<span style="color:#8e44ad">printf</span> (<span style="color:#f44f4f">"\n"</span>)<span style="color:#3f8058">;</span>
<span style="color:#fdbc4b;font-weight:bold">endfunction</span>
<span style="color:#fdbc4b;font-weight:bold">endmethods</span>
<span style="color:#fdbc4b;font-weight:bold">endclassdef</span>
</pre></body></html>
|
