как очистить файл???

[Shahzod]

Дан файл вещественных чисел. Создать новый файл и копировать в него данные первого файла, затем очистить первый файл и записать в него целые числа с 1 до 40.
Пробовал так, прощу помочь мне...

char s1[20], s2[20];
gets(s1); gets(s2);
OemToChar(s1, s1);
OemToChar(s2, s2);
fstream xon(s1, ios::binary | ios::in | ios::out);
ofstream sabt(s2, ios::binary);
sabt << xon.rdbuff();
sabt.close();
//здесь не переоткрывая хочу очистить первый файл - xon
for(int i = 1; i <= 40; i++){
    xon << i;
    if(i < 40)
        xon << "  ";
}
xon.close();

[Shahzod]

здесь можно закрыть файл xon и снова открыть с флагом ios::trunc, файл очищается. Но есть ли вариант, чтобы не переоткрывать файл и очистить его?