function fcpp(fun)
%#function SAA				
fun=@SAA;					
xs=1;
x=fminsearch(fun,xs);
y=feval(fun,x);
disp(blanks(2)')
disp('獨立外部程序 fcpp.exe 運行結果顯示')
disp(blanks(2)')
ss=['sin(exp(0.6x))/x 函數在 x = ' num2str(xs) ' 附近達最小值的坐標為   '];
disp(ss);
disp(blanks(1)');
disp(['		(' num2str(x) ',' num2str(y) ')'])