# fft_seq.b FFT_seq : module { PATH : con "/dis/lib/fft_seq.dis"; init: fn(nil: ref Draw->Context, nil: list of string); Sequence : adt { offset : big; directory : string; framecount : big; samples : int; scan : fn(s : self ref Sequence); # sample : fn(s : self ref Sequence, freq, offset : big) : int; }; new_sequence : fn(directory : string) : ref Sequence; };