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

Comparing trunk/OOPSE-3.0/src/UseTheForce/DarkSide/suttonchen.F90 (file contents):
Revision 2429 by chuckv, Mon Nov 14 21:29:36 2005 UTC vs.
Revision 2430 by chuckv, Mon Nov 14 22:20:35 2005 UTC

# Line 524 | Line 524 | contains
524         pot = pot + u
525      enddo
526  
527 <    #ifdef IS_MPI
527 > #ifdef IS_MPI
528      !! communicate f(rho) and derivatives back into row and column arrays
529      call gather(frho,frho_row,plan_atom_row, sc_err)
530      if (sc_err /=  0) then

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines