[df0wsresult,x]=df0ws(x);

function [df0wsresult,x]=df0ws(x);
df0wsresult=[];

;
df0wsresult = sin(0.1d+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 df0ws