| # | Line 78 | Line 78 | module eam | |
|---|---|---|
| 78 | end type EAMTypeList | |
| 79 | ||
| 80 | ||
| 81 | < | type (eamTypeList) :: EAMList |
| 81 | > | type (eamTypeList), save :: EAMList |
| 82 | ||
| 83 | !! standard eam stuff | |
| 84 | ||
| # | Line 832 | Line 832 | contains | |
| 832 | #endif | |
| 833 | ||
| 834 | if (molMembershipList(id1) .ne. molMembershipList(id2)) then | |
| 835 | – | |
| 835 | ||
| 837 | – | |
| 838 | – | |
| 836 | tau_Temp(1) = tau_Temp(1) - d(1) * fx | |
| 837 | tau_Temp(2) = tau_Temp(2) - d(1) * fy | |
| 838 | tau_Temp(3) = tau_Temp(3) - d(1) * fz | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |