view general/numerical/expdecay.m @ 6:0ce3c2070089

Removed duplicate code and fixed doc in timed_action.

function lambda=expdecay(k,d)
% expdecay - compute interpolation ratio for exponential decay
%
% expdecay :: [Size->nonneg], [Size->nonneg] -> [Size->nonneg].
%
% this gives exponential convergence 

if nargin==2, lambda=1-k;
else lambda=@(d)1-k; end