| 55 |
|
#include "primitives/Molecule.hpp" |
| 56 |
|
#include "primitives/StuntDouble.hpp" |
| 57 |
|
#include "UseTheForce/DarkSide/neighborLists_interface.h" |
| 58 |
+ |
#include "UseTheForce/doForces_interface.h" |
| 59 |
|
#include "utils/MemoryUtils.hpp" |
| 60 |
|
#include "utils/simError.h" |
| 61 |
|
#include "selection/SelectionManager.hpp" |
| 925 |
|
sprintf(checkPointMsg, " mpiRefresh successful.\n"); |
| 926 |
|
errorCheckPoint(); |
| 927 |
|
#endif |
| 928 |
+ |
|
| 929 |
+ |
initFortranFF(&isError); |
| 930 |
+ |
if (isError) { |
| 931 |
+ |
sprintf(painCave.errMsg, |
| 932 |
+ |
"initFortranFF errror: fortran didn't like something we gave it.\n"); |
| 933 |
+ |
painCave.isFatal = 1; |
| 934 |
+ |
simError(); |
| 935 |
+ |
} |
| 936 |
|
fortranInitialized_ = true; |
| 937 |
|
} |
| 938 |
|
|
