Lines Matching defs:file
193 { FILE *file ;
196 if (! (file = fopen ("error.dat", "w")))
199 fprintf (file, "# Not created by Octave\n") ;
201 fprintf (file, "# name: a\n") ;
202 fprintf (file, "# type: matrix\n") ;
203 fprintf (file, "# rows: %d\n", len) ;
204 fprintf (file, "# columns: 1\n") ;
207 fprintf (file, "% d\n", a [k]) ;
209 fprintf (file, "# name: b\n") ;
210 fprintf (file, "# type: matrix\n") ;
211 fprintf (file, "# rows: %d\n", len) ;
212 fprintf (file, "# columns: 1\n") ;
215 fprintf (file, "% d\n", b [k]) ;
217 fclose (file) ;