609     char fmode[10];  in Write_Field()  local
611       strcpy(fmode,"write");  in Write_Field()
613       strcpy(fmode,"append");  in Write_Field()
725     char fmode[10];  in Write_PhAvg()  local
727       strcpy(fmode,"write");  in Write_PhAvg()
729       strcpy(fmode,"append");  in Write_PhAvg()
737     openfile(rfile, fmode, &irstou);  in Write_PhAvg()
739     if(!strcmp(fmode,"write")) {  in Write_PhAvg()
784     closefile( &irstou, fmode);  in Write_PhAvg()
840     char fmode[10];  in Write_PhAvg2()  local
842       strcpy(fmode,"write");  in Write_PhAvg2()
844       strcpy(fmode,"append");  in Write_PhAvg2()