t_part_reduced_data_subset.m

Go to the documentation of this file.

function reduced_data_sub = t_part_reduced_data_subset(model, reduced_data)
%function reduced_data_sub = t_part_reduced_data_subset(model,
%reduced_data)
%
% Pulling a subset out of the t_part reduced_data.
%
%

% Markus dihlmann 18.02.2011


if ~isfield(reduced_data,'t_part_reduced_data')
        error('No t-partition model. Can not create reduced_data');
else
    tp_reduced_data = reduced_data.t_part_reduced_data;
end


base_model = model.base_model;
base_model.N = model.N;

tp_sub = cell(1,length(tp_reduced_data));

for i=1:length(tp_reduced_data)
    if ~isfield(tp_reduced_data{i},'N')
        tp_reduced_data{i}.N = reduced_data.N;
    end
    tp_sub{i} = base_model.reduced_data_subset(base_model, tp_reduced_data{i});
end

reduced_data_sub=[];
reduced_data_sub.t_part_reduced_data = tp_sub;