WAV> (set-sample (sinus-sample 0.01 1000)) => Set the current sample to a sinus sample of 0.01 seconds length
and a frequency of 1000 Hz

WAV> _,Reset Bound Values_
=> Adapt the display to the length of current sample

WAV> (set-sample (noise-sample 1 100)) => Set the current sample to a noise sample of 0.01 seconds length
and a frequency of 100 Hz

WAV> _,Reset Bound Values_
=> Adapt the display to the length of current sample

WAV> (set-sample
(line-sample* 1 200 :ampls
'((0 0) (0.1 10000) (0.2 5000) (0.4 30000) (0.5 -5000)
(0.6 5000) (0.7 -10000) (0.8 -5000) (0.9 -20000) (1 0)))) => Set the current sample to a line sample defined with ampls parameters.
For the first parameter of each control point, 0 is the period begining and
1 is the end. The second parameter is the amplitude value