takahiro/dump2sq
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

modified output.c to increase float number

Browse Source
This commit is contained in:
大窪 貴洋
2022-08-31 19:16:58 +09:00
parent 9d446f1d61
commit 3a632914b9
4 changed files with 97 additions and 76 deletions
Download Patch File Download Diff File Expand all files Collapse all files
output.c
+8 -8
View File
@@ -74,9 +74,9 @@ void OutputCN(COMMAND *com, HEAD *head, TYPE *type, DATASET *cn){
fprintf(f, "%15s\n", "Total");
for (i=0; i<cn->n; i++){
fprintf(f, "%14e", cn->x[i]);
fprintf(f, "%24.16e", cn->x[i]);
for (j=0; j<cn->m; j++) {
fprintf(f, " %14e", cn_[i][j]);
fprintf(f, " %24.16e", cn_[i][j]);
}
fprintf(f, "\n");
}
@@ -97,9 +97,9 @@ void OutputGr(COMMAND *com, HEAD *head, TYPE *type, DATASET *gr){
fprintf(f, "%15s\n", "Total");
for (i=0; i<gr->n; i++){
fprintf(f, "%14e", gr->x[i]);
fprintf(f, "%24.16e", gr->x[i]);
for (j=0; j<gr->m; j++) {
fprintf(f, " %14e", gr->y[i][j]);
fprintf(f, " %24.16e", gr->y[i][j]);
}
fprintf(f, "\n");
}
@@ -125,9 +125,9 @@ void OutputSQ(COMMAND *com, HEAD *head, TYPE *type, DATASET *sq){
fprintf(f, "\n");
/* データ */
for (i=0; i<sq->n; i++){
fprintf(f, "%14e", sq->x[i]);
fprintf(f, "%24.16e", sq->x[i]);
for (j=0; j<sq->m; j++){
fprintf(f, " %14e", sq->y[i][j]);
fprintf(f, " %24.16e", sq->y[i][j]);
}
fprintf(f, "\n");
}
@@ -156,9 +156,9 @@ void OutputCoeff(COMMAND *com, HEAD *head, TYPE *type, DATASET *sq){
}
fprintf(f, "\n");
for (i=0; i<sq->n; i++){
fprintf(f, " %12.6f", sq->x[i]);
fprintf(f, " %24.16e", sq->x[i]);
for (j=0; j<type->types; j++){
fprintf(f, " %12.6f", type->XRDcoeff[i][j]);
fprintf(f, " %24.16e", type->XRDcoeff[i][j]);
}
fprintf(f, "\n");
}