diff +time/+rk/ButcherTableau.m @ 994:2f89959fb9f0 feature/timesteppers

Implement method to get gain from butcher tableu
author Jonatan Werpers <jonatan@werpers.com>
date Wed, 09 Jan 2019 12:14:30 +0100
parents 1066bb31bc95
children
line wrap: on
line diff
--- a/+time/+rk/ButcherTableau.m	Wed Jan 09 11:14:16 2019 +0100
+++ b/+time/+rk/ButcherTableau.m	Wed Jan 09 12:14:30 2019 +0100
@@ -27,6 +27,18 @@
             b = all(all(triu(obj.a)==0));
         end
 
+        function g = testEquationGain(obj, z)
+            default_arg('z', sym('z'));
+            s = obj.nStages();
+
+            b = sym(obj.b);
+            A = sym(obj.a);
+            one = sym(ones(s,1));
+            I = sym(eye(s));
+
+            g = abs(1 + z*b*inv(I-z*A)*one);
+        end
+
         % TBD: Add functions for checking accuracy, stability?
     end