lin_evol_opt_gen_reduced_data.m

function reduced_data = lin_evol_opt_gen_reduced_data(model,detailed_data)
%function reduced_data = lin_evol_opt_gen_reduced_data(model,detailed_data)
%
% method which produces reduced_data, which is the data, that will be passed to
% an online-algorithm. Therefore, no quantities dependent on the high-dimension
% H may be included here. Neither may online-data include parameter-dependent
% mu-quantities. So no complete grid or detailed solutions or reduced basis
% vectors may be stored here. So online data is produced in the offline stage,
% but may be used in online-stages. So the computation time may depend on H,
% but the results may not depend on this complexity.
%    
% allowed dependency of generated data: Nmax
% not allowed dependency of data: H
% allowed dependency of computation: Nmax, H
% Unknown at this stage: mu, N
%
% optional fields of model:
%   compute_derivative_info = 0 if derivative information is not needed
%                           = 1 if derivative information is needed

% Markus Dihlmann 10.06.2010, Oliver Zeeb 14.10.10

if ~isfield(model,'compute_derivative_info')
    model.compute_derivative_info=1;
end

model.decomp_mode = 1;
reduced_data.a0 = rb_init_values(model, detailed_data);

% assuming that components do not change in time, so wlg t = 0!!!
%model = set_time(model,0);

% OLI 10.11.10 IF ANWEISUNG NEU!!!
if model.compute_derivative_info
    [reduced_data.LL_I, reduced_data.LL_E, reduced_data.bb, ...
        reduced_data.M_E, reduced_data.M_b, ... 
        reduced_data.M_EE, reduced_data.M_Eb, reduced_data.M_bb, ...
        reduced_data.M_I, reduced_data.M_II, reduced_data.M_IE, reduced_data.M_Ib, ...
        reduced_data.M_EdEd, reduced_data.M_IdId, reduced_data.M_bdbd, ...
        reduced_data.M_Ed, reduced_data.M_Id, reduced_data.M_bd, reduced_data.M_IEd, ...
        reduced_data.M_IId, reduced_data.M_Ibd, reduced_data.M_EEd, reduced_data.M_EId, ...
        reduced_data.M_Ebd, reduced_data.M_EdId, reduced_data.M_Edbd, ...
        reduced_data.M_Idbd] = rb_operators(model, detailed_data);
else
    [reduced_data.LL_I, reduced_data.LL_E, reduced_data.bb, ...
 reduced_data.M_E, reduced_data.M_b, ... 
 reduced_data.M_EE, reduced_data.M_Eb, reduced_data.M_bb, ...
 reduced_data.M_I, reduced_data.M_II, reduced_data.M_IE, reduced_data.M_Ib] ...
 = rb_operators(model, detailed_data);
end

%original, 10.11.10:
% [reduced_data.LL_I, reduced_data.LL_E, reduced_data.bb, ...
%     reduced_data.M_E, reduced_data.M_b, ... 
%     reduced_data.M_EE, reduced_data.M_Eb, reduced_data.M_bb, ...
%     reduced_data.M_I, reduced_data.M_II, reduced_data.M_IE, reduced_data.M_Ib, ...
%     reduced_data.M_EdEd, reduced_data.M_IdId, reduced_data.M_bdbd, ...
%     reduced_data.M_Ed, reduced_data.M_Id, reduced_data.M_bd, reduced_data.M_IEd, ...
%     reduced_data.M_IId, reduced_data.M_Ibd, reduced_data.M_EEd, reduced_data.M_EId, ...
%     reduced_data.M_Ebd, reduced_data.M_EdId, reduced_data.M_Edbd, ...
%     reduced_data.M_Idbd] = rb_operators(model, detailed_data);

if isfield(model,'name_output_functional')
  reduced_data = rb_output_functional_prep(model,reduced_data,detailed_data);
end;

reduced_data.N = model.get_rb_size(model,detailed_data);


%| \docupdate