(fp=fopen(filename, w))==NULL