ref: d4973711223b25f7d2e70d2739c81257e28f3a14 dir: /fns.h/
void four1(double*, int, int); void realft(double*, int, int);