%==========================================
%=== The Decaying Exponential Function  ===
%==========================================
clear
clc

Duration = 11;
SamplingRate = 100;
Time = 0:1/SamplingRate:Duration;

DecExpFunctionI = exp(-Time);
DecExpFunctionII = 1./exp(Time);

figure(1);
subplot(2,1,1), plot(Time,DecExpFunctionI);
axis([0 7 0 1.5]);
title('The Decaying Exponential Function [exp(-Time)]');
xlabel('Time (Sec)');
ylabel('Amplitude');
grid on

subplot(2,1,2), plot(Time,DecExpFunctionII);
axis([0 7 0 1.5]);
title('The Decaying Exponential Function [1/exp(Time)]');
xlabel('Time (Sec)');
ylabel('Amplitude');
grid on