Configure_HEV_Simulation.m

% Copyright 2011-2024 The MathWorks, Inc.

%disp('CONFIGURING MODEL...');
HEV_Solver_Selection = 'ode15s';
%HEV_Solver_Selection = 'ode23t';
%evalin('base',['disp([''Mode Logic TS = '' num2str(HEV_Param.Control.Mode_Logic_TS)])']);

%disp('Checking blocks...');
expModel = bdroot;
HEV_Model_DLevel_blk = [expModel '/Electrical'];
DetailLevel = get_param(HEV_Model_DLevel_blk,'OverrideUsingVariant');

f = Simulink.FindOptions('FollowLinks',1,'LookUnderMasks','all',...
    'MatchFilter',@Simulink.match.activeVariants,'SearchDepth',3);
HEV_Model_BattModel_blk = Simulink.findBlocks(bdroot,'Name','Battery',f);

BattModel = get_param(HEV_Model_BattModel_blk,'OverrideUsingVariant');


if (strcmp(DetailLevel,'Mean_Value'))
    decimation = 500;
    assignin('base','Ts',60e-6)
    assignin('base','decimation',decimation)
    if (strcmp(BattModel,'Predefined'))
        set_param(expModel,'Solver',HEV_Solver_Selection,'MaxStep','1e-3')
    else
        set_param(expModel,'Solver',HEV_Solver_Selection,'MaxStep','1e-3')
    end
    set_param([expModel,'/powergui'],'SimulationMode','Discrete');
elseif (strcmp(DetailLevel,'Detailed'))
    decimation = 5000;
%    decimation = 50;  % FOR POWER QUALITY
%    decimation = 1;  % FOR PLOTS
    assignin('base','Ts',2e-6)
    assignin('base','decimation',decimation)
    if (strcmp(BattModel,'Predefined'))
        set_param(expModel,'Solver',HEV_Solver_Selection,'MaxStep','1e-3')
        %set_param(expModel,'Solver','ode23tb','MaxStep','1e-3')
    else
        set_param(expModel,'Solver',HEV_Solver_Selection,'MaxStep','1e-3')
    end
    set_param([expModel,'/powergui'],'SimulationMode','Discrete');
elseif strcmp(DetailLevel,'System_Level')
    decimation = 1;
    assignin('base','Ts',[])
    assignin('base','decimation',decimation)
    set_param(expModel,'Solver',HEV_Solver_Selection,'MaxStep','auto')
    set_param([expModel,'/powergui'],'SimulationMode','Continuous');
end