include file: ARTAOCPL 5
*IF DEF,ATMOS,AND,DEF,OCEAN,AND,DEF,TRANGRID                               ARTAOCPL.2      
CL --------------- (Atmosphere-ocean) coupling arrays  -----------         ARTAOCPL.3      
     &AO_SPCPL(AO_IXCPL( 1)),AO_SPCPL(AO_IXCPL( 2)),                       ARTAOCPL.4      
     &AO_SPCPL(AO_IXCPL( 3)),AO_SPCPL(AO_IXCPL( 4)),                       ARTAOCPL.5      
     &AO_SPCPL(AO_IXCPL( 5)),AO_SPCPL(AO_IXCPL( 6)),                       ARTAOCPL.6      
     &AO_SPCPL(AO_IXCPL( 7)),AO_SPCPL(AO_IXCPL( 8)),                       ARTAOCPL.7      
*ENDIF                                                                     ARTAOCPL.8      
                                                                           ARTAOCPL.9      
                                                                           ARTAOCPL.10