' - - File: III_Trig1.txt    

pi = 3.14159

Xs{t} = 4 * Sign[Sin[t]] * Sin[t]^4	' 4th power applies to function, not the angle.
X<t> = <t,Xs,0>			' Recall: Parameters not listed in <...> .

t0 = 0  :  tf = 2*pi  : n = 200
Plot[X,{t, t0, tf, n}]




