view matlabFunctionSizePreserving.m @ 1309:f59b849df30f feature/poroelastic

Add displacement BC to viscoelastic
author Martin Almquist <malmquist@stanford.edu>
date Mon, 20 Jul 2020 17:45:58 -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