Commit d30e69e8 authored by Sebastian Hütter's avatar Sebastian Hütter
Browse files

fix writing binary dynmat file

parent adcd46da

src/USER-PHONON/dynamical_matrix.cpp

+2 −1
Original line number Diff line number Diff line
@@ -337,7 +337,8 @@ void DynamicalMatrix::writeMatrix(double **dynmat) 


    if (binaryflag && fp) {

        clearerr(fp);

        fwrite(&dynmat[0], sizeof(double), 3 * dynlen, fp);

        for (int i=0; i<3; i++)

            fwrite(dynmat[i], sizeof(double), dynlen, fp);

        if (ferror(fp))

            error->one(FLERR, "Error writing to binary file");

    }

CRA Git | Maintained and supported by SUSTech CRA and CCSE