if ((fp=fopen(data.txt,w))==NULL),