| 86 |  | void NPAT::getPosScale(const Vector3d& pos, const Vector3d& COM, int index, Vector3d& sc) { | 
| 87 |  |  | 
| 88 |  | /**@todo */ | 
| 89 | < | Vector3d rj = (oldPos[index] + pos)/2.0 -COM; | 
| 89 | > | Vector3d rj = (oldPos[index] + pos)/(RealType)2.0 -COM; | 
| 90 |  | sc = eta * rj; | 
| 91 |  | } | 
| 92 |  |  | 
| 93 |  | void NPAT::scaleSimBox(){ | 
| 94 | – |  | 
| 95 | – | int i; | 
| 96 | – | int j; | 
| 97 | – | int k; | 
| 94 |  | Mat3x3d scaleMat; | 
| 99 | – | double eta2ij; | 
| 100 | – | double bigScale, smallScale, offDiagMax; | 
| 101 | – | Mat3x3d hm; | 
| 102 | – | Mat3x3d hmnew; | 
| 95 |  |  | 
| 96 | < |  | 
| 97 | < |  | 
| 98 | < | // Scale the box after all the positions have been moved: | 
| 99 | < |  | 
| 100 | < | // Use a taylor expansion for eta products:  Hmat = Hmat . exp(dt * etaMat) | 
| 101 | < | //  Hmat = Hmat . ( Ident + dt * etaMat  + dt^2 * etaMat*etaMat / 2) | 
| 110 | < |  | 
| 111 | < | bigScale = 1.0; | 
| 112 | < | smallScale = 1.0; | 
| 113 | < | offDiagMax = 0.0; | 
| 114 | < |  | 
| 115 | < | for(i=0; i<3; i++){ | 
| 116 | < | for(j=0; j<3; j++){ | 
| 117 | < |  | 
| 118 | < | // Calculate the matrix Product of the eta array (we only need | 
| 119 | < | // the ij element right now): | 
| 120 | < |  | 
| 121 | < | eta2ij = 0.0; | 
| 122 | < | for(k=0; k<3; k++){ | 
| 123 | < | eta2ij += eta(i, k) * eta(k, j); | 
| 124 | < | } | 
| 125 | < |  | 
| 126 | < | scaleMat(i, j) = 0.0; | 
| 127 | < | // identity matrix (see above): | 
| 128 | < | if (i == j) scaleMat(i, j) = 1.0; | 
| 129 | < | // Taylor expansion for the exponential truncated at second order: | 
| 130 | < | scaleMat(i, j) += dt*eta(i, j)  + 0.5*dt*dt*eta2ij; | 
| 131 | < |  | 
| 132 | < |  | 
| 133 | < | if (i != j) | 
| 134 | < | if (fabs(scaleMat(i, j)) > offDiagMax) | 
| 135 | < | offDiagMax = fabs(scaleMat(i, j)); | 
| 96 | > | for(int i=0; i<3; i++){ | 
| 97 | > | for(int j=0; j<3; j++){ | 
| 98 | > | scaleMat(i, j) = 0.0; | 
| 99 | > | if(i==j) { | 
| 100 | > | scaleMat(i, j) = 1.0; | 
| 101 | > | } | 
| 102 |  | } | 
| 137 | – |  | 
| 138 | – | if (scaleMat(i, i) > bigScale) bigScale = scaleMat(i, i); | 
| 139 | – | if (scaleMat(i, i) < smallScale) smallScale = scaleMat(i, i); | 
| 103 |  | } | 
| 104 | < |  | 
| 105 | < | if ((bigScale > 1.01) || (smallScale < 0.99)) { | 
| 106 | < | sprintf( painCave.errMsg, | 
| 107 | < | "NPAT error: Attempting a Box scaling of more than 1 percent.\n" | 
| 108 | < | " Check your tauBarostat, as it is probably too small!\n\n" | 
| 146 | < | " scaleMat = [%lf\t%lf\t%lf]\n" | 
| 147 | < | "            [%lf\t%lf\t%lf]\n" | 
| 148 | < | "            [%lf\t%lf\t%lf]\n" | 
| 149 | < | "      eta = [%lf\t%lf\t%lf]\n" | 
| 150 | < | "            [%lf\t%lf\t%lf]\n" | 
| 151 | < | "            [%lf\t%lf\t%lf]\n", | 
| 152 | < | scaleMat(0, 0),scaleMat(0, 1),scaleMat(0, 2), | 
| 153 | < | scaleMat(1, 0),scaleMat(1, 1),scaleMat(1, 2), | 
| 154 | < | scaleMat(2, 0),scaleMat(2, 1),scaleMat(2, 2), | 
| 155 | < | eta(0, 0),eta(0, 1),eta(0, 2), | 
| 156 | < | eta(1, 0),eta(1, 1),eta(1, 2), | 
| 157 | < | eta(2, 0),eta(2, 1),eta(2, 2)); | 
| 158 | < | painCave.isFatal = 1; | 
| 159 | < | simError(); | 
| 160 | < | } else if (offDiagMax > 0.01) { | 
| 161 | < | sprintf( painCave.errMsg, | 
| 162 | < | "NPAT error: Attempting an off-diagonal Box scaling of more than 1 percent.\n" | 
| 163 | < | " Check your tauBarostat, as it is probably too small!\n\n" | 
| 164 | < | " scaleMat = [%lf\t%lf\t%lf]\n" | 
| 165 | < | "            [%lf\t%lf\t%lf]\n" | 
| 166 | < | "            [%lf\t%lf\t%lf]\n" | 
| 167 | < | "      eta = [%lf\t%lf\t%lf]\n" | 
| 168 | < | "            [%lf\t%lf\t%lf]\n" | 
| 169 | < | "            [%lf\t%lf\t%lf]\n", | 
| 170 | < | scaleMat(0, 0),scaleMat(0, 1),scaleMat(0, 2), | 
| 171 | < | scaleMat(1, 0),scaleMat(1, 1),scaleMat(1, 2), | 
| 172 | < | scaleMat(2, 0),scaleMat(2, 1),scaleMat(2, 2), | 
| 173 | < | eta(0, 0),eta(0, 1),eta(0, 2), | 
| 174 | < | eta(1, 0),eta(1, 1),eta(1, 2), | 
| 175 | < | eta(2, 0),eta(2, 1),eta(2, 2)); | 
| 176 | < | painCave.isFatal = 1; | 
| 177 | < | simError(); | 
| 178 | < | } else { | 
| 179 | < |  | 
| 180 | < | Mat3x3d hmat = currentSnapshot_->getHmat(); | 
| 181 | < | hmat = hmat *scaleMat; | 
| 182 | < | currentSnapshot_->setHmat(hmat); | 
| 183 | < |  | 
| 184 | < | } | 
| 104 | > |  | 
| 105 | > | scaleMat(2, 2) = exp(dt*eta(2, 2)); | 
| 106 | > | Mat3x3d hmat = currentSnapshot_->getHmat(); | 
| 107 | > | hmat = hmat *scaleMat; | 
| 108 | > | currentSnapshot_->setHmat(hmat); | 
| 109 |  | } | 
| 110 |  |  | 
| 111 |  | bool NPAT::etaConverged() { | 
| 112 |  | int i; | 
| 113 | < | double diffEta, sumEta; | 
| 113 | > | RealType diffEta, sumEta; | 
| 114 |  |  | 
| 115 |  | sumEta = 0; | 
| 116 |  | for(i = 0; i < 3; i++) { | 
| 122 |  | return ( diffEta <= etaTolerance ); | 
| 123 |  | } | 
| 124 |  |  | 
| 125 | < | double NPAT::calcConservedQuantity(){ | 
| 125 | > | RealType NPAT::calcConservedQuantity(){ | 
| 126 |  |  | 
| 127 |  | chi= currentSnapshot_->getChi(); | 
| 128 |  | integralOfChidt = currentSnapshot_->getIntegralOfChiDt(); | 
| 138 |  | // of freedom). | 
| 139 |  | fkBT = info_->getNdf()*OOPSEConstant::kB *targetTemp; | 
| 140 |  |  | 
| 141 | < | double conservedQuantity; | 
| 142 | < | double totalEnergy; | 
| 143 | < | double thermostat_kinetic; | 
| 144 | < | double thermostat_potential; | 
| 145 | < | double barostat_kinetic; | 
| 146 | < | double barostat_potential; | 
| 147 | < | double trEta; | 
| 141 | > | RealType conservedQuantity; | 
| 142 | > | RealType totalEnergy; | 
| 143 | > | RealType thermostat_kinetic; | 
| 144 | > | RealType thermostat_potential; | 
| 145 | > | RealType barostat_kinetic; | 
| 146 | > | RealType barostat_potential; | 
| 147 | > | RealType trEta; | 
| 148 |  |  | 
| 149 |  | totalEnergy = thermo.getTotalE(); | 
| 150 |  |  | 
| 152 |  |  | 
| 153 |  | thermostat_potential = fkBT* integralOfChidt / OOPSEConstant::energyConvert; | 
| 154 |  |  | 
| 155 | < | SquareMatrix<double, 3> tmp = eta.transpose() * eta; | 
| 155 | > | SquareMatrix<RealType, 3> tmp = eta.transpose() * eta; | 
| 156 |  | trEta = tmp.trace(); | 
| 157 |  |  | 
| 158 |  | barostat_kinetic = NkBT * tb2 * trEta /(2.0 * OOPSEConstant::energyConvert); |