Code covered by the BSD License
function [df2sresult,x]=df2s(x); df2sresult=[]; ; df2sresult = 0.1d+03; if( x~=0.0d+00 ) df2sresult = sin(0.314159d+03.*x)./(0.314159d+01.*x); end; 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 df2s
Contact us