Tondefinitonen

Clear[CC, DD, B, f, b, d1, f1, as1, b1, d, f, a] ;

CC[td_] := Play[Sin[2 π * fgr * 1t], {t, 0, td}, DisplayFunctionIdentity] ; c[td_ ... := Play[Sin[2 π * fgr * 4/3t * 2^3], {t, 0, td}, DisplayFunctionIdentity] ;

Created by Mathematica  (May 26, 2006)