X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2Fcsa.f;h=a5149f2dabd2ea26019bf44abdca7c20fc463fc1;hb=b0afc942699ed3c410a4b648c0cd8f51612c8a5a;hp=cfb017abbdaed74bfb8b2155007953cdeedea345;hpb=01776a164e296116ffa3757aab79602edf2439af;p=unres.git diff --git a/source/unres/src_CSA/csa.f b/source/unres/src_CSA/csa.f index cfb017a..a5149f2 100644 --- a/source/unres/src_CSA/csa.f +++ b/source/unres/src_CSA/csa.f @@ -213,6 +213,9 @@ ccccccccccccccccccccccccccccccccccccccccccccccccc include 'COMMON.BANK' include 'COMMON.GEO' include 'COMMON.CONTACTS' +#ifdef MOMENT + include 'COMMON.CONTACTS.MOMENT' +#endif integer ilen external ilen logical fail