| 50 |  | namespace oopse { | 
| 51 |  | NPrT::NPrT(SimInfo* info) : NPT(info) { | 
| 52 |  | Globals* simParams = info_->getSimParams(); | 
| 53 | < | if (!simParams->haveTargetStress()) { | 
| 53 | > | if (!simParams->haveSurfaceTension()) { | 
| 54 |  | sprintf(painCave.errMsg, | 
| 55 |  | "If you use the NPT integrator, you must set tauBarostat.\n"); | 
| 56 |  | painCave.severity = OOPSE_ERROR; | 
| 57 |  | painCave.isFatal = 1; | 
| 58 |  | simError(); | 
| 59 |  | } else { | 
| 60 | < | targetStress= simParams->getTargetStress(); | 
| 60 | > | surfaceTension= simParams->getSurfaceTension(); | 
| 61 |  | } | 
| 62 |  |  | 
| 63 |  | } | 
| 67 |  | double Axy = hmat(0,0) * hmat(1, 1); | 
| 68 |  | double sx = -hz * (press(0, 0) - targetPressure/OOPSEConstant::pressureConvert); | 
| 69 |  | double sy = -hz * (press(1, 1) - targetPressure/OOPSEConstant::pressureConvert); | 
| 70 | < | eta(0,0) -= Axy * (sx - targetStress) / (NkBT*tb2); | 
| 71 | < | eta(1,1) -= Axy * (sy - targetStress) / (NkBT*tb2); | 
| 70 | > | eta(0,0) -= Axy * (sx - surfaceTension) / (NkBT*tb2); | 
| 71 | > | eta(1,1) -= Axy * (sy - surfaceTension) / (NkBT*tb2); | 
| 72 |  | eta(2,2) += dt2 *  instaVol * (press(2, 2) - targetPressure/OOPSEConstant::pressureConvert) / (NkBT*tb2); | 
| 73 |  | oldEta = eta; | 
| 74 |  | } | 
| 80 |  | prevEta = eta; | 
| 81 |  | double sx = -hz * (press(0, 0) - targetPressure/OOPSEConstant::pressureConvert); | 
| 82 |  | double sy = -hz * (press(1, 1) - targetPressure/OOPSEConstant::pressureConvert); | 
| 83 | < | eta(0,0) -= Axy * (sx -targetStress) / (NkBT*tb2); | 
| 84 | < | eta(1,1) -= Axy * (sy -targetStress) / (NkBT*tb2); | 
| 83 | > | eta(0,0) = oldEta(0, 0) - Axy * (sx -surfaceTension) / (NkBT*tb2); | 
| 84 | > | eta(1,1) = oldEta(1, 1) - Axy * (sy -surfaceTension) / (NkBT*tb2); | 
| 85 |  | eta(2,2) = oldEta(2, 2) + dt2 *  instaVol * | 
| 86 |  | (press(2, 2) - targetPressure/OOPSEConstant::pressureConvert) / (NkBT*tb2); | 
| 87 |  | } | 
| 115 |  | } | 
| 116 |  |  | 
| 117 |  | void NPrT::scaleSimBox(){ | 
| 118 | – |  | 
| 119 | – | int i; | 
| 120 | – | int j; | 
| 121 | – | int k; | 
| 118 |  | Mat3x3d scaleMat; | 
| 123 | – | double eta2ij; | 
| 124 | – | double bigScale, smallScale, offDiagMax; | 
| 125 | – | Mat3x3d hm; | 
| 126 | – | Mat3x3d hmnew; | 
| 119 |  |  | 
| 120 | + | scaleMat(0, 0) = exp(dt*eta(0, 0)); | 
| 121 | + | scaleMat(1, 1) = exp(dt*eta(1, 1)); | 
| 122 | + | scaleMat(2, 2) = exp(dt*eta(2, 2)); | 
| 123 | + | Mat3x3d hmat = currentSnapshot_->getHmat(); | 
| 124 | + | hmat = hmat *scaleMat; | 
| 125 | + | currentSnapshot_->setHmat(hmat); | 
| 126 |  |  | 
| 129 | – |  | 
| 130 | – | // Scale the box after all the positions have been moved: | 
| 131 | – |  | 
| 132 | – | // Use a taylor expansion for eta products:  Hmat = Hmat . exp(dt * etaMat) | 
| 133 | – | //  Hmat = Hmat . ( Ident + dt * etaMat  + dt^2 * etaMat*etaMat / 2) | 
| 134 | – |  | 
| 135 | – | bigScale = 1.0; | 
| 136 | – | smallScale = 1.0; | 
| 137 | – | offDiagMax = 0.0; | 
| 138 | – |  | 
| 139 | – | for(i=0; i<3; i++){ | 
| 140 | – | for(j=0; j<3; j++){ | 
| 141 | – |  | 
| 142 | – | // Calculate the matrix Product of the eta array (we only need | 
| 143 | – | // the ij element right now): | 
| 144 | – |  | 
| 145 | – | eta2ij = 0.0; | 
| 146 | – | for(k=0; k<3; k++){ | 
| 147 | – | eta2ij += eta(i, k) * eta(k, j); | 
| 148 | – | } | 
| 149 | – |  | 
| 150 | – | scaleMat(i, j) = 0.0; | 
| 151 | – | // identity matrix (see above): | 
| 152 | – | if (i == j) scaleMat(i, j) = 1.0; | 
| 153 | – | // Taylor expansion for the exponential truncated at second order: | 
| 154 | – | scaleMat(i, j) += dt*eta(i, j)  + 0.5*dt*dt*eta2ij; | 
| 155 | – |  | 
| 156 | – |  | 
| 157 | – | if (i != j) | 
| 158 | – | if (fabs(scaleMat(i, j)) > offDiagMax) | 
| 159 | – | offDiagMax = fabs(scaleMat(i, j)); | 
| 160 | – | } | 
| 161 | – |  | 
| 162 | – | if (scaleMat(i, i) > bigScale) bigScale = scaleMat(i, i); | 
| 163 | – | if (scaleMat(i, i) < smallScale) smallScale = scaleMat(i, i); | 
| 164 | – | } | 
| 165 | – |  | 
| 166 | – | if ((bigScale > 1.01) || (smallScale < 0.99)) { | 
| 167 | – | sprintf( painCave.errMsg, | 
| 168 | – | "NPrT error: Attempting a Box scaling of more than 1 percent.\n" | 
| 169 | – | " Check your tauBarostat, as it is probably too small!\n\n" | 
| 170 | – | " scaleMat = [%lf\t%lf\t%lf]\n" | 
| 171 | – | "            [%lf\t%lf\t%lf]\n" | 
| 172 | – | "            [%lf\t%lf\t%lf]\n" | 
| 173 | – | "      eta = [%lf\t%lf\t%lf]\n" | 
| 174 | – | "            [%lf\t%lf\t%lf]\n" | 
| 175 | – | "            [%lf\t%lf\t%lf]\n", | 
| 176 | – | scaleMat(0, 0),scaleMat(0, 1),scaleMat(0, 2), | 
| 177 | – | scaleMat(1, 0),scaleMat(1, 1),scaleMat(1, 2), | 
| 178 | – | scaleMat(2, 0),scaleMat(2, 1),scaleMat(2, 2), | 
| 179 | – | eta(0, 0),eta(0, 1),eta(0, 2), | 
| 180 | – | eta(1, 0),eta(1, 1),eta(1, 2), | 
| 181 | – | eta(2, 0),eta(2, 1),eta(2, 2)); | 
| 182 | – | painCave.isFatal = 1; | 
| 183 | – | simError(); | 
| 184 | – | } else if (offDiagMax > 0.01) { | 
| 185 | – | sprintf( painCave.errMsg, | 
| 186 | – | "NPrT error: Attempting an off-diagonal Box scaling of more than 1 percent.\n" | 
| 187 | – | " Check your tauBarostat, as it is probably too small!\n\n" | 
| 188 | – | " scaleMat = [%lf\t%lf\t%lf]\n" | 
| 189 | – | "            [%lf\t%lf\t%lf]\n" | 
| 190 | – | "            [%lf\t%lf\t%lf]\n" | 
| 191 | – | "      eta = [%lf\t%lf\t%lf]\n" | 
| 192 | – | "            [%lf\t%lf\t%lf]\n" | 
| 193 | – | "            [%lf\t%lf\t%lf]\n", | 
| 194 | – | scaleMat(0, 0),scaleMat(0, 1),scaleMat(0, 2), | 
| 195 | – | scaleMat(1, 0),scaleMat(1, 1),scaleMat(1, 2), | 
| 196 | – | scaleMat(2, 0),scaleMat(2, 1),scaleMat(2, 2), | 
| 197 | – | eta(0, 0),eta(0, 1),eta(0, 2), | 
| 198 | – | eta(1, 0),eta(1, 1),eta(1, 2), | 
| 199 | – | eta(2, 0),eta(2, 1),eta(2, 2)); | 
| 200 | – | painCave.isFatal = 1; | 
| 201 | – | simError(); | 
| 202 | – | } else { | 
| 203 | – |  | 
| 204 | – | Mat3x3d hmat = currentSnapshot_->getHmat(); | 
| 205 | – | hmat = hmat *scaleMat; | 
| 206 | – | currentSnapshot_->setHmat(hmat); | 
| 207 | – |  | 
| 208 | – | } | 
| 127 |  | } | 
| 128 |  |  | 
| 129 |  | bool NPrT::etaConverged() { | 
| 156 |  | // of freedom). | 
| 157 |  | fkBT = info_->getNdf()*OOPSEConstant::kB *targetTemp; | 
| 158 |  |  | 
| 241 | – | double conservedQuantity; | 
| 242 | – | double totalEnergy; | 
| 243 | – | double thermostat_kinetic; | 
| 244 | – | double thermostat_potential; | 
| 245 | – | double barostat_kinetic; | 
| 246 | – | double barostat_potential; | 
| 247 | – | double trEta; | 
| 159 |  |  | 
| 160 | < | totalEnergy = thermo.getTotalE(); | 
| 160 | > | double totalEnergy = thermo.getTotalE(); | 
| 161 |  |  | 
| 162 | < | thermostat_kinetic = fkBT * tt2 * chi * chi /(2.0 * OOPSEConstant::energyConvert); | 
| 162 | > | double thermostat_kinetic = fkBT * tt2 * chi * chi /(2.0 * OOPSEConstant::energyConvert); | 
| 163 |  |  | 
| 164 | < | thermostat_potential = fkBT* integralOfChidt / OOPSEConstant::energyConvert; | 
| 164 | > | double thermostat_potential = fkBT* integralOfChidt / OOPSEConstant::energyConvert; | 
| 165 |  |  | 
| 166 |  | SquareMatrix<double, 3> tmp = eta.transpose() * eta; | 
| 167 | < | trEta = tmp.trace(); | 
| 167 | > | double trEta = tmp.trace(); | 
| 168 |  |  | 
| 169 | < | barostat_kinetic = NkBT * tb2 * trEta /(2.0 * OOPSEConstant::energyConvert); | 
| 169 | > | double barostat_kinetic = NkBT * tb2 * trEta /(2.0 * OOPSEConstant::energyConvert); | 
| 170 |  |  | 
| 171 | < | barostat_potential = (targetPressure * thermo.getVolume() / OOPSEConstant::pressureConvert) /OOPSEConstant::energyConvert; | 
| 171 | > | double barostat_potential = (targetPressure * thermo.getVolume() / OOPSEConstant::pressureConvert) /OOPSEConstant::energyConvert; | 
| 172 |  |  | 
| 173 | < | conservedQuantity = totalEnergy + thermostat_kinetic + thermostat_potential + | 
| 174 | < | barostat_kinetic + barostat_potential; | 
| 173 | > | Mat3x3d hmat = currentSnapshot_->getHmat(); | 
| 174 | > | double hz = hmat(2, 2); | 
| 175 | > | double area = hmat(0,0) * hmat(1, 1); | 
| 176 |  |  | 
| 177 | + | double conservedQuantity = totalEnergy + thermostat_kinetic + thermostat_potential + | 
| 178 | + | barostat_kinetic + barostat_potential - surfaceTension * area; | 
| 179 | + |  | 
| 180 |  | return conservedQuantity; | 
| 181 |  |  | 
| 182 |  | } |