# | Line 1152 | Line 1152 | contains | |
---|---|---|
1152 | vpair = vpair + pot_temp | |
1153 | if (do_pot) then | |
1154 | #ifdef IS_MPI | |
1155 | < | pot_row(SHAPES_POT,atom1) = pot_row(SHAPES_POT,atom1) + 0.5d0*pot_temp*sw |
1156 | < | pot_col(SHAPES_POT,atom2) = pot_col(SHAPES_POT,atom2) + 0.5d0*pot_temp*sw |
1155 | > | pot_row(SHAPE_POT,atom1) = pot_row(SHAPE_POT,atom1) + 0.5d0*pot_temp*sw |
1156 | > | pot_col(SHAPE_POT,atom2) = pot_col(SHAPE_POT,atom2) + 0.5d0*pot_temp*sw |
1157 | #else | |
1158 | pot = pot + pot_temp*sw | |
1159 | #endif |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |