include file: ARGAOCPL 5
*IF DEF,ATMOS,AND,DEF,OCEAN,AND,DEF,TRANGRID                               ARGAOCPL.2      
C Constant arrays needed for Atmosphere-Ocean coupling                     ARGAOCPL.3      
     & XUO,XTO,YUO,YTO,XTA,XUA,YTA,YUA,                                    ARGAOCPL.4      
*ENDIF                                                                     ARGAOCPL.5