view matlabFunctionSizePreserving.m @ 687:e8fc3aa1faf6 feature/poroelastic

Rename elastic scheme.
author Martin Almquist <malmquist@stanford.edu>
date Fri, 09 Feb 2018 13:34:27 -0800
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