function CostFunction_output = Function_fmincon (allVariables,f1)  
    nParam = round(allVariables(length(allVariables)-7));
    
    current_count = get(f1, 'UserData');
    if isempty(current_count); current_count = 0; end
    current_count = current_count + 1;
    set(f1, 'UserData', current_count);

    for ii = 1:nParam
        num_mean_a = 5+(ii-1)*2+1;
        num_mean_R = 5+((nParam-1)*2+2)+(ii-1)*2+1;
        num_mean_C = 5+((nParam-1)*2+2)*2+(ii-1)*2+1;
        allVariables_forRun = [allVariables(1:5),allVariables(num_mean_a:num_mean_a+1),...
            allVariables(num_mean_R:num_mean_R+1),...
            allVariables(num_mean_C:num_mean_C+1),allVariables(length(allVariables)-6:length(allVariables))];
        
        
        scatter(current_count, allVariables_forRun(num_mean_a),'filled');
        pause(0.1)
        CostFunction_output = 1;        
    end
end