char2dbl
double char2dbl(char);
char2float(char *&F, float *&T) { *T++ = char2dbl(*F++); }
char2double(char *&F, double *&T) { *T++ = char2dbl(*F++); }