dbl2long
long dbl2long(double, long);
float2char(float *&F, char *&T) { *T++ = (char)dbl2long(*F++, 127); }
float2short(float *&F, short *&T) { *T++ = (short)dbl2long(*F++, 32767); }
float2long(float *&F, long *&T) { *T++ = dbl2long(*F++, 2147483647); }
float2ulaw(float *&F, ulaw *&T) { *T++ = audio_s2u(dbl2long(*F++, 32767)); }
float2alaw(float *&F, alaw *&T) { *T++ = audio_s2a(dbl2long(*F++, 32767)); }
double2char(double *&F, char *&T) { *T++ = (char)dbl2long(*F++, 127); }
double2short(double *&F, short *&T) { *T++ = (short)dbl2long(*F++, 32767); }
double2long(double *&F, long *&T) { *T++ = dbl2long(*F++, 2147483647); }
double2ulaw(double *&F, ulaw *&T) { *T++ = audio_s2u(dbl2long(*F++, 32767)); }
double2alaw(double *&F, alaw *&T) { *T++ = audio_s2a(dbl2long(*F++, 32767)); }