include file: TYPCONO 17
*IF DEF,OCEAN                                                              TYPCONO.2      
CL Array containing pre-calculated ocean fields - carried down to          TYPCONO.3      
CL ocean routines as a single array and decomposed to constituent          TYPCONO.4      
CL routines only within the lower ocean routines.This is a special case    TYPCONO.5      
CL in which the array size is also passed down as an argument.             TYPCONO.6      
      INTEGER O_SPCON_LEN                                                  TYPCONO.7      
      REAL O_SPCON(O_SPCON_LEN)                                            TYPCONO.8      
*ENDIF                                                                     TYPCONO.9