' - - File: III_Unit2.txt    

pi = 3.14159
a = 1  :  k = 0.5

F{t} =k * (Unit[t - a] + Unit[t - 2*a] + Unit[t - 3*a] + Unit[t - 4*a] )
Dc{t} = F{t} - k * (Unit[t -  5*a] + Unit[t - 6*a] + Unit[t - 7*a] + Unit[t - 8*a] )

'A<t> = <t,F,0>	' Plot only A<t> results in half the plot.
B<t> = <t,Dc,0>

t0 = 0  :  tf = 10  :  n = 2000     ' High n count to ensure a "good" vertical for Markers.
Plot[B, {t, t0, tf, n}]



