Lines Matching refs:fp
62 FILE *fp; in matrix_init() local
64 fp = fopen(fname, "r"); in matrix_init()
65 if (fp == nullptr) { in matrix_init()
69 if (fscanf(fp, "%d", &n) <= 0) { in matrix_init()
76 if (fscanf(fp, "%lf ", &A[i * n + j]) <= 0) { in matrix_init()
85 fclose(fp); in matrix_init()
98 FILE *fp = nullptr; in matrix_write() local
100 fp = fopen(fname, "w"); in matrix_write()
101 if (fp == nullptr) { in matrix_write()
105 fprintf(fp, "%d\n", n); in matrix_write()
108 fprintf(fp, "%lf ", A[j * n + i]); in matrix_write()
112 fprintf(fp, "%lf ", A[i * n + j]); in matrix_write()
117 fprintf(fp, "%lf ", 0.0); in matrix_write()
120 fprintf(fp, "\n"); in matrix_write()
123 fprintf(fp, "\n"); in matrix_write()
126 fprintf(fp, "%lf ", 0.0); in matrix_write()
129 fprintf(fp, "%lf ", A[i * n + j]); in matrix_write()
131 fprintf(fp, "\n"); in matrix_write()
134 fclose(fp); in matrix_write()