Mercurial > repos > public > sbplib

view matlabFunctionSizePreserving.m @ 1128:3a9262c045d0 feature/laplace_curvilinear_test

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Copy diracDiscr.m from feature/poroelastic
author Martin Almquist <malmquist@stanford.edu>
date Tue, 21 May 2019 17:59:30 -0700
parents 489bea7fc33f
children
line wrap: on
line source

% Takes a symfun and makes a better anonymous function
function fun = matlabFunctionSizePreserving(f)
    mf = matlabFunction(f);
    args = argnames(f);

    funStr = func2str(mf);
    for i = 1:length(args)
        funStr = [funStr sprintf(' + 0*%s', toString(args(i)))];
    end

    fun = str2func(funStr);
end