ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-2.0/src/UseTheForce/DarkSide/eam.F90
(Generate patch)

Comparing trunk/OOPSE-2.0/src/UseTheForce/DarkSide/eam.F90 (file contents):
Revision 2360 by chuckv, Wed Oct 12 18:59:16 2005 UTC vs.
Revision 2361 by gezelter, Wed Oct 12 21:00:50 2005 UTC

# Line 864 | Line 864 | contains
864  
865   #ifdef IS_MPI
866         if (do_pot) then
867 <          pot_Row(EAM_POT,atom1) = pot_Row(EAM_POT,atom1) + phab*0.5
868 <          pot_Col(EAM_POT,atom2) = pot_Col(EAM_POT,atom2) + phab*0.5
867 >          pot_Row(METALLIC_POT,atom1) = pot_Row(METALLIC_POT,atom1) + phab*0.5
868 >          pot_Col(METALLIC_POT,atom2) = pot_Col(METALLIC_POT,atom2) + phab*0.5
869         end if
870  
871         f_Row(1,atom1) = f_Row(1,atom1) + fx

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines