see NMscatt written by Merzel and colleagues for an early implementation of phonon calculation from macromolecular crystals.
fredericpoitevin/CrystalDance
on the quantitative treatment of macromolecular lattice dynamics and associated scattering of X-rays
Fortran