/[MITgcm]/MITgcm/pkg/exch2/w2_eeboot.F
ViewVC logotype

Diff of /MITgcm/pkg/exch2/w2_eeboot.F

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

revision 1.5 by jmc, Fri Jul 22 18:21:55 2005 UTC revision 1.6 by jmc, Sun Jul 24 01:24:56 2005 UTC
# Line 168  C     Fill in values for W2_mpi_myTileLi Line 168  C     Fill in values for W2_mpi_myTileLi
168        ENDDO        ENDDO
169  #endif /* ALLOW_USE_MPI */  #endif /* ALLOW_USE_MPI */
170    
171    C     Set filling value for face-corner halo regions
172          e2FillValue_RL = 0. _d 0
173          e2FillValue_RS = 0. _d 0
174          e2FillValue_R4 = 0.e0
175          e2FillValue_R8 = 0.d0
176    C-    for testing only: put a large value (should not affects the results)
177    c     e2FillValue_RL = 1. _d+20
178    c     e2FillValue_RS = 1. _d+20
179    c     e2FillValue_R4 = 1.e+20
180    c     e2FillValue_R8 = 1.d+20
181    
182  C     Print out the topology communication schedule  C     Print out the topology communication schedule
183        CALL W2_PRINT_COMM_SEQUENCE        CALL W2_PRINT_COMM_SEQUENCE
184  C  C
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22