annotate test/bug-61105/nested_test_1.m @ 31225:3eab70385569

sparse-xpow.cc: Use faster multiplication technique, this time for complex
author Arun Giridhar <arungiridhar@gmail.com>
date Sun, 11 Sep 2022 13:53:38 -0400
parents 55eeb7f0850b
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
30103
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
1 function r = nested_test_1 (val)
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
2 a = 3;
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
3 b = 5;
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
4 c = 7;
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
5 function r = f1 (f, x)
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
6 r = f(x) + a;
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
7 endfunction
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
8 function r = f2 (y)
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
9 function r2 = f3 (z)
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
10 r2 = z^2 + b*y;
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
11 endfunction
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
12 r = f1 (@f3, y) + c;
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
13 endfunction
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
14 r = f2 (val);
55eeb7f0850b store parent name in function object when caching parents in scope (bug #61105)
John W. Eaton <jwe@octave.org>
parents:
diff changeset
15 endfunction