| 59 |  | #include "UseTheForce/DarkSide/fSwitchingFunctionType.h" | 
| 60 |  | #include "UseTheForce/doForces_interface.h" | 
| 61 |  | #include "UseTheForce/DarkSide/electrostatic_interface.h" | 
| 62 | – | #include "UseTheForce/notifyCutoffs_interface.h" | 
| 62 |  | #include "UseTheForce/DarkSide/switcheroo_interface.h" | 
| 63 |  | #include "utils/MemoryUtils.hpp" | 
| 64 |  | #include "utils/simError.h" | 
| 921 |  | } | 
| 922 |  |  | 
| 923 |  | #endif | 
| 925 | – |  | 
| 926 | – | double SimInfo::calcMaxCutoffRadius() { | 
| 927 | – |  | 
| 928 | – |  | 
| 929 | – | std::set<AtomType*> atomTypes; | 
| 930 | – | std::set<AtomType*>::iterator i; | 
| 931 | – | std::vector<double> cutoffRadius; | 
| 932 | – |  | 
| 933 | – | //get the unique atom types | 
| 934 | – | atomTypes = getUniqueAtomTypes(); | 
| 924 |  |  | 
| 925 | < | //query the max cutoff radius among these atom types | 
| 937 | < | for (i = atomTypes.begin(); i != atomTypes.end(); ++i) { | 
| 938 | < | cutoffRadius.push_back(forceField_->getRcutFromAtomType(*i)); | 
| 939 | < | } | 
| 940 | < |  | 
| 941 | < | double maxCutoffRadius = *(std::max_element(cutoffRadius.begin(), cutoffRadius.end())); | 
| 942 | < | #ifdef IS_MPI | 
| 943 | < | //pick the max cutoff radius among the processors | 
| 944 | < | #endif | 
| 945 | < |  | 
| 946 | < | return maxCutoffRadius; | 
| 947 | < | } | 
| 948 | < |  | 
| 949 | < | void SimInfo::getCutoff(double& rcut, double& rsw) { | 
| 925 | > | void SimInfo::setupCutoff() { | 
| 926 |  |  | 
| 927 | < | if (fInfo_.SIM_uses_Charges | fInfo_.SIM_uses_Dipoles | fInfo_.SIM_uses_RF) { | 
| 952 | < |  | 
| 953 | < | if (!simParams_->haveCutoffRadius()){ | 
| 954 | < | sprintf(painCave.errMsg, | 
| 955 | < | "SimCreator Warning: No value was set for the cutoffRadius.\n" | 
| 956 | < | "\tOOPSE will use a default value of 15.0 angstroms" | 
| 957 | < | "\tfor the cutoffRadius.\n"); | 
| 958 | < | painCave.isFatal = 0; | 
| 959 | < | simError(); | 
| 960 | < | rcut = 15.0; | 
| 961 | < | } else{ | 
| 962 | < | rcut = simParams_->getCutoffRadius(); | 
| 963 | < | } | 
| 964 | < |  | 
| 965 | < | if (!simParams_->haveSwitchingRadius()){ | 
| 966 | < | sprintf(painCave.errMsg, | 
| 967 | < | "SimCreator Warning: No value was set for switchingRadius.\n" | 
| 968 | < | "\tOOPSE will use a default value of\n" | 
| 969 | < | "\t0.85 * cutoffRadius for the switchingRadius\n"); | 
| 970 | < | painCave.isFatal = 0; | 
| 971 | < | simError(); | 
| 972 | < | rsw = 0.85 * rcut; | 
| 973 | < | } else{ | 
| 974 | < | rsw = simParams_->getSwitchingRadius(); | 
| 975 | < | } | 
| 976 | < |  | 
| 977 | < | } else { | 
| 978 | < | // if charge, dipole or reaction field is not used and the cutofff radius is not specified in | 
| 979 | < | //meta-data file, the maximum cutoff radius calculated from forcefiled will be used | 
| 980 | < |  | 
| 981 | < | if (simParams_->haveCutoffRadius()) { | 
| 982 | < | rcut = simParams_->getCutoffRadius(); | 
| 983 | < | } else { | 
| 984 | < | //set cutoff radius to the maximum cutoff radius based on atom types in the whole system | 
| 985 | < | rcut = calcMaxCutoffRadius(); | 
| 986 | < | } | 
| 987 | < |  | 
| 988 | < | if (simParams_->haveSwitchingRadius()) { | 
| 989 | < | rsw  = simParams_->getSwitchingRadius(); | 
| 990 | < | } else { | 
| 991 | < | rsw = rcut; | 
| 992 | < | } | 
| 993 | < |  | 
| 994 | < | } | 
| 995 | < | } | 
| 996 | < |  | 
| 997 | < | void SimInfo::setupCutoff() { | 
| 998 | < | getCutoff(rcut_, rsw_); | 
| 999 | < | double rnblist = rcut_ + 1; // skin of neighbor list | 
| 1000 | < |  | 
| 1001 | < | //Pass these cutoff radius etc. to fortran. This function should be called once and only once | 
| 1002 | < |  | 
| 927 | > | // Check the cutoff policy | 
| 928 |  | int cp =  TRADITIONAL_CUTOFF_POLICY; | 
| 929 |  | if (simParams_->haveCutoffPolicy()) { | 
| 930 |  | std::string myPolicy = simParams_->getCutoffPolicy(); | 
| 946 |  | } | 
| 947 |  | } | 
| 948 |  | } | 
| 949 | < | } | 
| 949 | > | } | 
| 950 | > | notifyFortranCutoffPolicy(&cp); | 
| 951 |  |  | 
| 952 | < |  | 
| 952 | > | // Check the Skin Thickness for neighborlists | 
| 953 | > | double skin; | 
| 954 |  | if (simParams_->haveSkinThickness()) { | 
| 955 | < | double skinThickness = simParams_->getSkinThickness(); | 
| 956 | < | } | 
| 955 | > | skin = simParams_->getSkinThickness(); | 
| 956 | > | notifyFortranSkinThickness(&skin); | 
| 957 | > | } | 
| 958 | > |  | 
| 959 | > | // Check if the cutoff was set explicitly: | 
| 960 | > | if (simParams_->haveCutoffRadius()) { | 
| 961 | > | rcut_ = simParams_->getCutoffRadius(); | 
| 962 | > | if (simParams_->haveSwitchingRadius()) { | 
| 963 | > | rsw_  = simParams_->getSwitchingRadius(); | 
| 964 | > | } else { | 
| 965 | > | rsw_ = rcut_; | 
| 966 | > | } | 
| 967 | > | notifyFortranCutoffs(&rcut_, &rsw_); | 
| 968 | > |  | 
| 969 | > | } else { | 
| 970 | > |  | 
| 971 | > | // For electrostatic atoms, we'll assume a large safe value: | 
| 972 | > | if (fInfo_.SIM_uses_Charges | fInfo_.SIM_uses_Dipoles | fInfo_.SIM_uses_RF) { | 
| 973 | > | sprintf(painCave.errMsg, | 
| 974 | > | "SimCreator Warning: No value was set for the cutoffRadius.\n" | 
| 975 | > | "\tOOPSE will use a default value of 15.0 angstroms" | 
| 976 | > | "\tfor the cutoffRadius.\n"); | 
| 977 | > | painCave.isFatal = 0; | 
| 978 | > | simError(); | 
| 979 | > | rcut_ = 15.0; | 
| 980 | > |  | 
| 981 | > | if (simParams_->haveElectrostaticSummationMethod()) { | 
| 982 | > | std::string myMethod = simParams_->getElectrostaticSummationMethod(); | 
| 983 | > | toUpper(myMethod); | 
| 984 | > | if (myMethod == "SHIFTED_POTENTIAL" || myMethod == "SHIFTED_FORCE") { | 
| 985 | > | if (simParams_->haveSwitchingRadius()){ | 
| 986 | > | sprintf(painCave.errMsg, | 
| 987 | > | "SimInfo Warning: A value was set for the switchingRadius\n" | 
| 988 | > | "\teven though the electrostaticSummationMethod was\n" | 
| 989 | > | "\tset to %s\n", myMethod.c_str()); | 
| 990 | > | painCave.isFatal = 1; | 
| 991 | > | simError(); | 
| 992 | > | } | 
| 993 | > | } | 
| 994 | > | } | 
| 995 | > |  | 
| 996 | > | if (simParams_->haveSwitchingRadius()){ | 
| 997 | > | rsw_ = simParams_->getSwitchingRadius(); | 
| 998 | > | } else { | 
| 999 | > | sprintf(painCave.errMsg, | 
| 1000 | > | "SimCreator Warning: No value was set for switchingRadius.\n" | 
| 1001 | > | "\tOOPSE will use a default value of\n" | 
| 1002 | > | "\t0.85 * cutoffRadius for the switchingRadius\n"); | 
| 1003 | > | painCave.isFatal = 0; | 
| 1004 | > | simError(); | 
| 1005 | > | rsw_ = 0.85 * rcut_; | 
| 1006 | > | } | 
| 1007 | > | notifyFortranCutoffs(&rcut_, &rsw_); | 
| 1008 | > | } else { | 
| 1009 | > | // We didn't set rcut explicitly, and we don't have electrostatic atoms, so | 
| 1010 | > | // We'll punt and let fortran figure out the cutoffs later. | 
| 1011 | > |  | 
| 1012 | > | notifyFortranYouAreOnYourOwn(); | 
| 1013 |  |  | 
| 1014 | < | notifyFortranCutoffs(&rcut_, &rsw_, &rnblist, &cp); | 
| 1015 | < | // also send cutoff notification to electrostatics | 
| 1033 | < | setElectrostaticCutoffRadius(&rcut_, &rsw_); | 
| 1014 | > | } | 
| 1015 | > | } | 
| 1016 |  | } | 
| 1017 |  |  | 
| 1018 |  | void SimInfo::setupElectrostaticSummationMethod( int isError ) { | 
| 1047 |  | } else { | 
| 1048 |  | // throw error | 
| 1049 |  | sprintf( painCave.errMsg, | 
| 1050 | < | "SimInfo error: Unknown electrostaticSummationMethod. (Input file specified %s .)\n\telectrostaticSummationMethod must be one of: \"none\", \"shifted_potential\", \"shifted_force\", or \"reaction_field\".", myMethod.c_str() ); | 
| 1050 | > | "SimInfo error: Unknown electrostaticSummationMethod.\n" | 
| 1051 | > | "\t(Input file specified %s .)\n" | 
| 1052 | > | "\telectrostaticSummationMethod must be one of: \"none\",\n" | 
| 1053 | > | "\t\"shifted_potential\", \"shifted_force\", or \n" | 
| 1054 | > | "\t\"reaction_field\".\n", myMethod.c_str() ); | 
| 1055 |  | painCave.isFatal = 1; | 
| 1056 |  | simError(); | 
| 1057 |  | } | 
| 1072 |  | if (!simParams_->haveDampingAlpha()) { | 
| 1073 |  | //throw error | 
| 1074 |  | sprintf( painCave.errMsg, | 
| 1075 | < | "SimInfo warning: dampingAlpha was not specified in the input file. A default value of %f (1/ang) will be used.", alphaVal); | 
| 1075 | > | "SimInfo warning: dampingAlpha was not specified in the input file.\n" | 
| 1076 | > | "\tA default value of %f (1/ang) will be used.\n", alphaVal); | 
| 1077 |  | painCave.isFatal = 0; | 
| 1078 |  | simError(); | 
| 1079 |  | } | 
| 1080 |  | } else { | 
| 1081 |  | // throw error | 
| 1082 |  | sprintf( painCave.errMsg, | 
| 1083 | < | "SimInfo error: Unknown electrostaticScreeningMethod. (Input file specified %s .)\n\telectrostaticScreeningMethod must be one of: \"undamped\" or \"damped\".", myScreen.c_str() ); | 
| 1083 | > | "SimInfo error: Unknown electrostaticScreeningMethod.\n" | 
| 1084 | > | "\t(Input file specified %s .)\n" | 
| 1085 | > | "\telectrostaticScreeningMethod must be one of: \"undamped\"\n" | 
| 1086 | > | "or \"damped\".\n", myScreen.c_str() ); | 
| 1087 |  | painCave.isFatal = 1; | 
| 1088 |  | simError(); | 
| 1089 |  | } | 
| 1092 |  |  | 
| 1093 |  | // let's pass some summation method variables to fortran | 
| 1094 |  | setElectrostaticSummationMethod( &esm ); | 
| 1095 | + | notifyFortranElectrostaticMethod( &esm ); | 
| 1096 |  | setScreeningMethod( &sm ); | 
| 1097 |  | setDampingAlpha( &alphaVal ); | 
| 1098 |  | setReactionFieldDielectric( &dielectric ); | 
| 1099 | < | initFortranFF( &esm, &errorOut ); | 
| 1099 | > | initFortranFF( &errorOut ); | 
| 1100 |  | } | 
| 1101 |  |  | 
| 1102 |  | void SimInfo::setupSwitchingFunction() { |