from
slatec
by Ben Barrowes The slatec library converted into matlab functions.
[dfqd2result,x]=dfqd2(x);
function [dfqd2result,x]=dfqd2(x);
dfqd2result=[];
;
dfqd2result = exp(x).*cos(10.0d0.*x);
csnil=dbstack(1); csnil=csnil(1).name(1)~='@';
if csnil&&~isempty(inputname(1)), assignin('caller','FUntemp',x); evalin('caller',[inputname(1),'=FUntemp;']); end
end %function dfqd2