include file: TYPSPPTO 3
*IF DEF,OCEAN                                                              TYPSPPTO.2      
CL     super array of  pointers              (ocean)                       TYPSPPTO.3      
      REAL O_SPPTR(O_SPPTR_LEN)                                            TYPSPPTO.4      
*ENDIF                                                                     TYPSPPTO.5