[df1sresult,x]=df1s(x);

function [df1sresult,x]=df1s(x);
df1sresult=[];

;
df1sresult = 0.2d+01./(0.2d+01+sin(0.314159d+02.*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 df1s