From ad4c9e1b25a9df76da8a0c31c5a81c4209b76292 Mon Sep 17 00:00:00 2001 From: oguyon Date: Sat, 17 Feb 2024 18:46:44 -1000 Subject: [PATCH] don't write test file --- plugins/milk-extra-src/linalgebra/basis_rotate_match.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/plugins/milk-extra-src/linalgebra/basis_rotate_match.c b/plugins/milk-extra-src/linalgebra/basis_rotate_match.c index 84f99009..9d6612e4 100644 --- a/plugins/milk-extra-src/linalgebra/basis_rotate_match.c +++ b/plugins/milk-extra-src/linalgebra/basis_rotate_match.c @@ -536,16 +536,17 @@ errno_t compute_basis_rotate_match( // sort by effective index quick_sort2l(AmodeBeff, iarray, Adim); + /* { char fname[STRINGMAXLEN_FILENAME]; - WRITE_FILENAME(fname, "Beff.%04d.dat", loopiter); + WRITE_FILENAME(fname, "./compfCM/Beff.%04d.dat", loopiter); FILE * fpBeff = fopen(fname, "w"); for( int iia = 0; iia < Adim; iia++ ) { fprintf(fpBeff, "%4d %16f %4ld\n", iia, AmodeBeff[iia], iarray[iia]); } fclose(fpBeff); - } + }*/ if ( loopiter == loopiterMax-1 )