/[MITgcm]/MITgcm/pkg/exch2/W2_EXCH2_PARAMS.h
ViewVC logotype

Diff of /MITgcm/pkg/exch2/W2_EXCH2_PARAMS.h

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

revision 1.1 by afe, Fri Jan 9 20:46:09 2004 UTC revision 1.2 by cnh, Wed Mar 17 03:34:03 2004 UTC
# Line 16  C     process and subgrid indicies). Line 16  C     process and subgrid indicies).
16        COMMON /W2_EXCH2_PARAMS_C/ W2_myCommFlag        COMMON /W2_EXCH2_PARAMS_C/ W2_myCommFlag
17    
18        INTEGER e2BufrRecSize        INTEGER e2BufrRecSize
19        PARAMETER ( e2BufrRecSize = ( (sNx+2*OLx)*2+(sNy+2*OLy)*2)*Nr )        PARAMETER (
20         & e2BufrRecSize = ( (sNx+2*OLx)*2*OLy+(sNy+2*OLy)*2*OLx)*Nr
21         &)
22        _RL E2BUFR1_RL( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )        _RL E2BUFR1_RL( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
23        _RL E2BUFR2_RL( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )        _RL E2BUFR2_RL( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
24        _RL E2BUFR1_RS( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )        _RL E2BUFR1_RS( e2BufrRecSize, MAX_NEIGHBOURS, nSx, 2 )
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22