[f2sresult,x]=f2s(x);

function [f2sresult,x]=f2s(x);
f2sresult=[];

;
f2sresult = 100.0;
if( x~=0.0 )
f2sresult = sin(0.314159e+03.*x)./(0.314159e+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 f2s