Project 1

% Vehicle Parameters
M = 1500;       % Vehicle weight [kg]
Cr = 0.015;     % Rolling resistance coefficient
Rw = 0.35;      % Rolling radius [m]
Cd = 0.33;      % Drag coefficient
Af = 2;         % Frontal area [m2]
rhoa = 1.225;   % Air density [kg/m3]
Vwind = 0;      % Wind velocity [kmph]
g = 9.81;       % Gravitational acceleration [m/s2]
theta = 0;      % Slope [deg]
myu_road_tire = 1; % Coefficient of friction between tire - road interface

% Powertrain Parameters 
FDR = 3.73;                         % Final Drive Ratio / Diff Ratio
DiffEff = 0.99;                     % Differential efficiency (assumed independent of operating conditions)

NumGear = 4;                        % Number of gears in transmission
TransGear = [1:NumGear];            % Transmission Gears
TransRatio = [3.06, 1.62, 1, 0.7];  % Corresponding Transmission ratios
TransEff = 0.90;                    % Transmission efficiency (assumed independent of operating conditions)

TC_SR = [0, .5, .6, .7, .8, .87, .92, .94, .96, .97, 1];   % Torque Converter Speed Ratio (Matlab default) -> TurbSpd/PumpSpd  
TC_TR = [2.232, 1.5462, 1.4058, 1.2746, 1.1528, 1.0732, 1.0192, 1, 1, 1, 1];   % Torque Converter Torque Ratio (Matlab default) -> TurbTrq/PumpTrq
TC_Cf = 1e-4 * [.72558, .66322, .63463, .59042, .51331, .4144, .29287, .22444, .12186, .04386, 0]; % Torque Converter Capacity Factor (Matlab default) -> PumpTrq/PumpSpd^2 [Nm/rpm^2]

load Vehicle_Data/Engine_data_1_9L_Saturn_95kW;
load Vehicle_Data/Trans_Shift_map;

% Driver Parameters
Kp = 10;                    % P gain for driver PI model
Ki = 1;                     % I gain for driver PI model
Drive_Cycle_Select = 1;     % Drive cycle selection



% Drive cycle values in m/s

if Drive_Cycle_Select == 1
    load DriveCycles/UDDS;
    
elseif Drive_Cycle_Select == 2
    load DriveCycles/HWFET;
    
elseif Drive_Cycle_Select == 3
    load DriveCycles/FTP;
    
elseif Drive_Cycle_Select == 4
    load DriveCycles/US06;
    
elseif Drive_Cycle_Select == 5
    load DriveCycles/NEDC;
    
elseif Drive_Cycle_Select == 6
    load DriveCycles/WLTP;
 
end

time_end = cyc_time(end);
vel_end = cyc_vel(end);

To develop a forward energy-based fuel consumption model of a conventional vehicle using matlab and simulink

in a conventionalvehicle the power is generated by an internal combution engine that converts the chemical in fuel to mechanical energy.this mechanical energy reach the wheels througha drive train which contains the transmission ,differential components.efficiency of ic engine is ratio of workdone to the energy supplied to an engine.

conventional vehicle model:

DRIVER BLOCK:

CONTROLLER:

ENGINE CONTROL:

IDLE SPEED CONTROLLER:

TRANSMISSION CONTROLLER:

state flow:

BRAKE CONTROL UNIT:

POWER TRAIN:

ENGINE:

TRANSMISSION:

TORQUE CONVERTER:

DIFFERENTIAL:

WHEELS:

VEHICLE DYNAMICS:

%Renaming variables
Time = out.tout;
Acc_Pdl = out.Acc_Pdl;          % Accelerator pedal [%]
Brk_Pdl = out.Brk_Pdl;          % Brake pedal [%]
Gear_Cmd = out.Gear_Cmd;        % Transmission gear
Trans_In_Spd = out.Trans_In_Spd*30/pi;  % Transmission input speed [rpm]
Trans_Out_Spd = out.Trans_Out_Spd*30/pi;% Transmission output speed [rpm]
Eng_Trq = out.Eng_Trq;          % Engine brake torque [Nm]
Eng_Spd = out.Eng_Spd*30/pi;    % Engine speed [rpm]
Eng_Fuel_Consump = out.Eng_Fuel_Consumption;    % Engine fuel consumption [g]
Veh_Dist = out.Veh_Dist/1000;   % Distance traveled by vehicle [km]
Veh_Spd = out.Veh_Spd*18/5;     % Vehicle speed [kmph]
wheel_Spd=out.wh_speed;
fuel_rate=out.Eng_Fuel_Rate;

%Data Analysis
Eng_Pwr = Eng_Spd*pi/30*Eng_Trq/1000;   % Engine brake power [kW]
rho_petrol = 0.7197;                    % Density of petrol [kg/L]
kmpl = Veh_Dist(end)/(Eng_Fuel_Consump(end)/1000/rho_petrol);    % Fuel economy [kmpl] 


%Plotting vehicle characteristics time trace
figure(1)
subplot(3,1,1)
hold on
grid on
plot(Time, Acc_Pdl, 'linewidth', 1, 'Color', 'black');
plot(Time, Brk_Pdl, 'linewidth', 1, 'Color', 'red');
ylabel('Pedal [%]')
xlim([0, Time(end)]);
legend('Accel','Brake');
subplot(3,1,2)
hold on
grid on
plot(Time, Trans_In_Spd, 'linewidth', 1, 'Color', 'black');
plot(Time, Trans_Out_Spd, 'linewidth', 1, 'Color', 'red');
plot(Time,wheel_Spd,'linewidth',1,'color','blue')
ylabel('Speed [rpm]')
xlim([0, Time(end)]);
ylim([0, 6000]);
legend('Trans Input','Trans Output','wheel speed');
subplot(3,1,3)
hold on
grid on
plot(Time, Gear_Cmd, 'linewidth', 1, 'Color', 'black');
xlim([0, Time(end)]);
xlabel('Time [s]');
ylabel('Gear');

eng_spd=Eng_Spd.Data(:,1);
eng_trq=Eng_Trq.Data(:,1);
eng_pwr=Eng_Pwr.Data(:,1);
Eng_fuel_rate=fuel_rate.Data(:,1);
Eng_fuel_consum=Eng_Fuel_Consump.Data(:,1);
veh_dist=Veh_Dist.Data(:,1);
veh_spd=Veh_Spd.Data(:,1);

%plotting enginespeed,engine torque,enginepower,engine fuelrate,enginefuel_consumption
figure(2)
subplot(2,2,1)
plot(Time,eng_trq,'linewidth',1,'color','black')
xlabel('time[s]')
ylabel('torque')
legend('engine torque')
grid on
subplot(2,2,2)
plot(Time,eng_pwr,'linewidth',1,'color','blue')
xlabel('time[s]')
ylabel('power')
legend('engine power')
grid on
subplot(2,2,3)
plot(Time,Eng_fuel_rate,'linewidth',1,'color','red')
xlabel('time[s]')
ylabel('fuelrate')
legend('engine fuel rate')
grid on
subplot(2,2,4)
plot(Time,Eng_fuel_consum,'linewidth',1,'color','green')
xlabel('time[s]')
ylabel('fuel consumption')
legend('engine fuel consumption')
grid on

figure(3)
plot(Eng_fuel_consum,Eng_fuel_rate,'linewidth',1,'color','blue')
ylabel('engine fuel rate')
xlabel('engine fuel consumption')
title('fuelrate vs fuel consumption')


%plotting gear command vehicle desired with actual speed
figure(4)
subplot(2,1,1)
plot(veh_spd,Gear_Cmd,'linewidth',1,'color','blue')
xlabel('speed')
ylabel('gear')
grid on
title('gear command with speed')

subplot(2,1,2)
plot(veh_dist,Gear_Cmd,'linewidth',1,'color','red')
xlabel('distance')
ylabel('gear')
grid on
title('gear command with distance')


%Plotting engine operating points on engine fuel map
figure('Name','Engine Operating Points');
hold on
grid on
title('Engine Operating Points','fontsize',12);
p1=plot(Eng_map_spd*30/pi,Eng_max_trq,'linewidth',2,'color','r');
p2=line([Eng_map_spd(end)*30/pi Eng_map_spd(end)*30/pi],[0 Eng_max_trq(end)]);
set(p2,'linewidth',1,'linestyle','--','color','k');
p3=line([Eng_map_spd(1)*30/pi Eng_map_spd(1)*30/pi],[0 Eng_max_trq(1)]);
set(p3,'linewidth',1,'linestyle','--','color','k');
[c,h] = contour(Eng_map_spd'*30/pi,Eng_map_trq,Eng_fuel_map');
clabel(c,h);
xlabel('Engine Speed [rpm]');
ylabel('Engine Torque [Nm]');
title('Engine Fuel Consumption Map [g/s]');
legend([p1 p3],{'Max Curve','Operating Points'});
axis([Eng_map_spd(1)*30/pi Eng_map_spd(end)*30/pi 0 Eng_map_trq(end)]);