Mercurial > repos > public > sbplib
diff diracDiscrCurve.m @ 1246:25efceb0c392 feature/dirac_discr
Apply some nitpicking
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Wed, 20 Nov 2019 21:02:06 +0100 |
parents | 745dc1f1a069 |
children | 663eb90a4559 |
line wrap: on
line diff
--- a/diracDiscrCurve.m Wed Nov 20 20:30:45 2019 +0100 +++ b/diracDiscrCurve.m Wed Nov 20 21:02:06 2019 +0100 @@ -1,12 +1,11 @@ +% 2-dimensional delta function for single-block curvilinear grid +% x_s: source point coordinate vector, e.g. [x; y] or [x; y; z]. +% g: single-block grid containing the source +% m_order: Number of moment conditions +% s_order: Number of smoothness conditions +% order: Order of SBP derivative approximations +% opSet: Cell array of function handle to opSet generator function d = diracDiscrCurve(x_s, g, m_order, s_order, order, opSet) - % 2-dimensional delta function for single-block curvilinear grid - % x_s: source point coordinate vector, e.g. [x; y] or [x; y; z]. - % g: single-block grid containing the source - % m_order: Number of moment conditions - % s_order: Number of smoothness conditions - % order: Order of SBP derivative approximations - % opSet: Cell array of function handle to opSet generator - default_arg('order', m_order); default_arg('opSet', {@sbp.D2Variable, @sbp.D2Variable}); @@ -34,7 +33,6 @@ % Get delta function for logical grid and scale by Jacobian d = (1./J).*diracDiscr(g, [uS; vS], m_order, s_order, {H_u, H_v}); - end function J = jacobian(g, opSet, order) @@ -62,4 +60,4 @@ y_v = Dv*y; J = x_u.*y_v - x_v.*y_u; -end \ No newline at end of file +end