/[MITgcm]/MITgcm/eesupp/src/global_sum.F
ViewVC logotype

Diff of /MITgcm/eesupp/src/global_sum.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.11 by jmc, Mon Dec 15 02:02:38 2003 UTC revision 1.12 by edhill, Sat Mar 27 03:51:51 2004 UTC
# Line 18  C     !INTERFACE: Line 18  C     !INTERFACE:
18        IMPLICIT NONE        IMPLICIT NONE
19  C     !DESCRIPTION:  C     !DESCRIPTION:
20  C     *==========================================================*  C     *==========================================================*
21  C     | SUBROUTINE GLOBAL_SUM_R4                                    C     | SUBROUTINE GLOBAL\_SUM\_R4                                  
22  C     | o Handle sum for real*4 data.                              C     | o Handle sum for real*4 data.                            
23  C     *==========================================================*  C     *==========================================================*
24  C     | Perform sum an array of one value per thread and then      C     | Perform sum an array of one value per thread and then    
# Line 106  C     !INTERFACE: Line 106  C     !INTERFACE:
106        IMPLICIT NONE        IMPLICIT NONE
107  C     !DESCRIPTION:  C     !DESCRIPTION:
108  C     *==========================================================*  C     *==========================================================*
109  C     | SUBROUTINE GLOBAL_SUM_R8                                    C     | SUBROUTINE GLOBAL\_SUM\_R8                                
110  C     | o Handle sum for real*8 data.                              C     | o Handle sum for real*8 data.                            
111  C     *==========================================================*  C     *==========================================================*
112  C     | Perform sum an array of one value per thread and then      C     | Perform sum an array of one value per thread and then    
# Line 202  C     !INTERFACE: Line 202  C     !INTERFACE:
202        IMPLICIT NONE        IMPLICIT NONE
203  C     !DESCRIPTION:  C     !DESCRIPTION:
204  C     *==========================================================*  C     *==========================================================*
205  C     | SUBROUTINE GLOBAL_SUM_INT                                  C     | SUBROUTINE GLOBAL\_SUM\_INT                                
206  C     | o Handle sum for integer data.                              C     | o Handle sum for integer data.                            
207  C     *==========================================================*  C     *==========================================================*
208  C     | Perform sum an array of one value per thread and then      C     | Perform sum an array of one value per thread and then    

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

  ViewVC Help
Powered by ViewVC 1.1.22