funf693.m

matlab算法集 matlab算法集

function y = funf693 (x) 
%------------------------------------------------------------------------
% Objective function
%------------------------------------------------------------------------
   global R
   tol = 1.e-5;
   R = x;
   [i,k] = bisect (0,10,tol,100,'funp693'); 
   y = -R*i^2;