Initialize output arrays to zero in fdderivs_c.C and fderivs_c.C

2026-02-26 11:48:28 +08:00
parent d2c2214fa1
commit dfb79e3e11
2 changed files with 9 additions and 0 deletions
--- a/AMSS_NCKU_source/fderivs_c.C
+++ b/AMSS_NCKU_source/fderivs_c.C
@@ -74,6 +74,11 @@ void fderivs(const int ex[3],

    // fx = fy = fz = 0
    const size_t all = (size_t)ex1 * (size_t)ex2 * (size_t)ex3;
+    for (size_t p = 0; p < all; ++p) {
+        fx[p] = ZEO;
+        fy[p] = ZEO;
+        fz[p] = ZEO;
+    }

    /*
     * Fortran loops: