'- - File: IV_Der5.txt

Ac{t} = Sin[t]
Fc{t} = Abs[Ac{t} - Sign[Ac{t}] ]
D{t} = Diff[Fc,t]

B<t> = <t, Fc, 0>
C<t> = <t, D, 0>

t0 = 0  :  tf = 8  :  n = 100
Plot[B, C, {t, t0, tf, n}]

<t = 4>   ' Optional--use to check worksheet output.


