>char c;
〜略〜
>fwrite(&c,sizeof(double),1,fp2);

これは一体