/[MITgcm]/MITgcm_contrib/jscott/pkg_atm2d/receive_component_configs.F
ViewVC logotype

Diff of /MITgcm_contrib/jscott/pkg_atm2d/receive_component_configs.F

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

revision 1.2 by jscott, Tue Aug 22 20:21:39 2006 UTC revision 1.3 by jscott, Tue May 1 19:38:47 2007 UTC
# Line 13  C     \================================= Line 13  C     \=================================
13  C     Data on ocean grid  C     Data on ocean grid
14  #include "OCNSIZE.h"  #include "OCNSIZE.h"
15  #include "OCNVARS.h"  #include "OCNVARS.h"
 C     Data on atmos grid  
 Cjrs#include "ATMSIZE.h"  
 Cjrs#include "ATMVARS.h"  
16    
17  C     Receive ocean config (OCNCONFIG) from ocean  C     Receive ocean config (OCNCONFIG) from ocean
18  C     component (OCN).  C     component (OCN).
19        CALL CPL_RECV_OCN_OCNCONFIG        CALL CPL_RECV_OCN_OCNCONFIG
20    
 C     Receive atmos config (ATCONFIG) from atmos.  
 C     component (ATM).  
 Cjrs      CALL CPL_RECV_ATM_ATMCONFIG  
   
21        RETURN        RETURN
22        END        END
23    
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22