/[MITgcm]/MITgcm/pkg/atm2d/cpl_recv_ocn_ocnconfig.F
ViewVC logotype

Diff of /MITgcm/pkg/atm2d/cpl_recv_ocn_ocnconfig.F

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

revision 1.1 by jscott, Wed Sep 6 15:32:39 2006 UTC revision 1.2 by jmc, Mon Oct 8 23:48:28 2007 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3    
4  #include "ATM2D_OPTIONS.h"  #include "ATM2D_OPTIONS.h"
5  #ifdef ATM2D_MPI_ON  #ifdef ATM2D_MPI_ON
6    
# Line 24  C     == Local variables == Line 27  C     == Local variables ==
27  CEndOfInterface  CEndOfInterface
28    
29  C     Get config from ocean component  C     Get config from ocean component
30        CALL COUPRECV_R8TILES( ocnCompName,        CALL COUPRECV_R8TILES( ocnCompName,
31       I                       ocnMxlDName, Nx_ocn, Ny_ocn,       I                       ocnMxlDName, Nx_ocn, Ny_ocn,
32       O                       OcMxlD_ocn )       O                       OcMxlD_ocn )
33    
34        RETURN        RETURN
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22