Mercurial > repos > public > sbplib
annotate matlabFunctionSizePreserving.m @ 995:10c5eda235b7 feature/timesteppers
Full use of butcher tableau in time.rk.General. Inline rungekutta step methods
| author | Jonatan Werpers <jonatan@werpers.com> |
|---|---|
| date | Wed, 09 Jan 2019 22:57:13 +0100 |
| parents | 489bea7fc33f |
| children |
| rev | line source |
|---|---|
|
599
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
1 % Takes a symfun and makes a better anonymous function |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
2 function fun = matlabFunctionSizePreserving(f) |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
3 mf = matlabFunction(f); |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
4 args = argnames(f); |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
5 |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
6 funStr = func2str(mf); |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
7 for i = 1:length(args) |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
8 funStr = [funStr sprintf(' + 0*%s', toString(args(i)))]; |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
9 end |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
10 |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
11 fun = str2func(funStr); |
|
489bea7fc33f
Add some functions to make symbolic life easier
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
12 end |
