stepsize_quotient.m

Go to the documentation of this file.

function [model, t, nr_fct, output] = stepsize_quotient(model, x, d, quot_step)
%function [model, t, nr_fct, output] = stepsize_quotient(model, model_data, output, x, d, quot_step)
%function [model, t_opt, output] = stepsize_quotient(model, model_data, output, x, d, quot_step)

if(model.verbose>=8)
    disp('entered stepsize_quotient')
end

if isfield(model,'stepsize_coefficient')
    stepsize_coefficient = model.stepsize_coefficient;
else
    stepsize_coefficient = 7;
    disp('No stepsize coefficient given in model!!!')
end

if model.optimization.min_or_max == 'min'
    min_or_max=1;
elseif model.optimization.min_or_max == 'max'
    min_or_max=-1;
else disp('maximize or minimize? model.optimization.min_or_max not properly defined')
    return
end

%initializing
nr_fct = 0;
if isfield(model.optimization,'initial_stepsize')
    t_initial = model.optimization.initial_stepsize;
else
    t_initial=1;
end

%reducing the stepsize
%t=t_initial/quot_step;
t=(t_initial-t_initial*quot_step/(quot_step+stepsize_coefficient));
%t=t_initial;

%calculate new output value
%model=set_mu_to_optimize(model,x,t,d);
%output=[output; model.optimization.objective_function(model,model_data)*min_or_max]; nr_fct=nr_fct+1;