4 %
function that splits detailed_data into detailed_data_primal and
5 % detailed_data_dual. This is important in
case you are interested in an
6 % improved output and therefore use a dual problem.
9 % connect dual and primal detailed_data so
this function works properly.
12 % lin_evol_rb_operators_primal_dual.
14 % Dominik Garmatter 23.07 2012
17 % first extract all fields corresponding to the dual detailed_data by hand
18 % also
remove all the fields that
get extracted
19 detailed_data_dual = [];
20 detailed_data_dual.grid = detailed_data.grid;
21 detailed_data_dual.W = detailed_data.W;
22 detailed_data_dual.RB = detailed_data.dual_RB;
23 detailed_data_dual.RB_info = detailed_data.dual_RB_info;
24 detailed_data_dual.N = detailed_data.dual_N;
25 if isfield(detailed_data,
'dual_L_I_comp')
26 detailed_data_dual.L_I_comp = detailed_data.dual_L_I_comp;
27 detailed_data = rmfield(detailed_data,'dual_L_I_comp');
29 if isfield(detailed_data, 'dual_L_E_comp')
30 detailed_data_dual.L_E_comp = detailed_data.dual_L_E_comp;
31 detailed_data = rmfield(detailed_data,'dual_L_E_comp');
33 if isfield(detailed_data, 'dual_b_comp')
34 detailed_data_dual.b_comp = detailed_data.dual_b_comp;
35 detailed_data = rmfield(detailed_data,'dual_b_comp');
37 detailed_data = rmfield(detailed_data,'dual_RB');
38 detailed_data = rmfield(detailed_data,'dual_RB_info');
39 detailed_data = rmfield(detailed_data,'dual_N');
40 % now copy the remaining fields, i.e. all the fields corresponding to the
41 % primal detailed_data
42 detailed_data_primal = [];
43 detailed_data_primal =
structcpy(detailed_data_primal, detailed_data);