include file: ARGOCTOP 5
*IF DEF,OCEAN                                                              ARGOCTOP.2      
C ========================== COMDECK ARGOCTOP ==========================   ARGOCTOP.3      
CLL  4.5  14/08/97  Removed the start addresses to the boundary            OSI1F405.41     
CLL                 arrays (TBOUND_N,...) C.G. Jones                       OSI1F405.42     
C                                                                          ARGOCTOP.4      
C ========= Start addresses for items in COMDECK ARGOCFLW ==============   ARGOCTOP.5      
C                                                                          ARGOCTOP.6      
     & O_SPCON(jocp_kar), O_SPCON(jocp_isz), O_SPCON(jocp_iez)             ORL1F404.57     
     &,O_SPCON(jocp_ise),O_SPCON(jocp_iee),O_SPCON(jocp_isu)               ORH1F405.44     
     &,O_SPCON(jocp_ieu),O_SPCON(jocp_lse),O_SPCON(jocp_lsu)               ORH1F405.45     
     &, O_SPCON(jocp_iseg), O_SPCON(jocp_istf), O_SPCON(jocp_ietf)         ORH0F404.117    
     &, O_SPCON(jocp_isuf), O_SPCON(jocp_ieuf), O_SPCON(jocp_iszf)         ORH0F404.118    
     &, O_SPCON(jocp_iezf),O_SPCON(jocp_spsin),O_SPCON(jocp_spcos)         ORH7F404.87     
C                                                                          ARGOCTOP.18     
C ======= End of start adresses for items in COMDECK ARGOCFLW ==========   ARGOCTOP.19     
C                                                                          ARGOCTOP.20     
C ========= Start addresses for items in COMDECK ARGOCONE ==============   ARGOCTOP.21     
C                                                                          ARGOCTOP.22     
     &, O_SPCON(jocp_dxt), O_SPCON(jocp_dxtr), O_SPCON(jocp_dxt2r)         ORH0F404.119    
     &, O_SPCON(jocp_dxu), O_SPCON(jocp_dxur), O_SPCON(jocp_dxu2r)         ORH0F404.120    
     &, O_SPCON(jocp_dxu4r), O_SPCON(jocp_dxt4r), O_SPCON(jocp_dyt)        ORH0F404.121    
     &, O_SPCON(jocp_dytr), O_SPCON(jocp_dyt2r), O_SPCON(jocp_dyu)         ORH0F404.122    
     &, O_SPCON(jocp_dyur), O_SPCON(jocp_dyu2r), O_SPCON(jocp_dyu2rj)      ORH0F404.123    
     &, O_SPCON(jocp_dyu4r), O_SPCON(jocp_dyt4r), O_SPCON(jocp_cs)         ORH0F404.124    
     &, O_SPCON(jocp_csr), O_SPCON(jocp_csrj), O_SPCON(jocp_cst)           ORH0F404.125    
     &, O_SPCON(jocp_cstr), O_SPCON(jocp_phi), O_SPCON(jocp_phit)          ORH0F404.126    
     &, O_SPCON(jocp_sine), O_SPCON(jocp_tng), O_SPCON(jocp_c2dz)          ORH0F404.127    
     &, O_SPCON(jocp_dz), O_SPCON(jocp_dz2r), O_SPCON(jocp_eeh)            ORH0F404.128    
     &, O_SPCON(jocp_eem), O_SPCON(jocp_ffh), O_SPCON(jocp_ffm)            ORH0F404.129    
     &, O_SPCON(jocp_zdz), O_SPCON(jocp_dzz), O_SPCON(jocp_dzz2r)          ORH0F404.130    
     &, O_SPCON(jocp_zdzz), O_SPCON(jocp_sol_pen), O_SPCON(jocp_dttsa)     ORH0F404.131    
     &, O_SPCON(jocp_rz), O_SPCON(jocp_c2rz), O_SPCON(jocp_rzz)            ORH0F404.132    
     &, O_SPCON(jocp_rzz2r), O_SPCON(jocp_delpsl), O_SPCON(jocp_decay)     ORH0F404.133    
     &, O_SPCON(jocp_ahi), O_SPCON(jocp_amt), O_SPCON(jocp_amu)            ORH0F404.134    
     &, O_SPCON(jocp_kappabsi), O_SPCON(jocp_cosine)                       ORH3F403.227    
     &, O_SPCON(jocp_rlambda), O_SPCON(jocp_eddydiff)                      ORH3F403.228    
     &, O_SPCON(jocp_amx), O_SPCON(jocp_bbu), O_SPCON(jocp_ccu)            ORL1F404.61     
     &, O_SPCON(jocp_ddu), O_SPCON(jocp_ggu), O_SPCON(jocp_hhu)            ORL1F404.62     
     &, O_SPCON(jocp_athkdf), O_SPCON(jocp_kri)                            ORL1F404.63     
     &, O_SPCON(JOCP_MAXLARGELEVELS),O_SPCON(JOCP_NOLEVSINLAYER)           OOM1F405.419    
     &, O_SPCON(jocp_csrjp),O_SPCON(jocp_dyu2rjp)                          OOM3F405.30     
     &, O_SPCON(jocp_cstjp),O_SPCON(jocp_dytrjp)                           OOM3F405.31     
     &, O_SPCON(jocp_csjm),O_SPCON(jocp_dyurjm)                            OOM3F405.32     
C                                                                          ARGOCTOP.48     
C ======= End of start addresses for items in COMDECK ARGOCONE =========   ARGOCTOP.49     
C                                                                          ARGOCTOP.50     
C =========== Start addresses for items in COMDECK ARGOCFLD ============   ARGOCTOP.51     
C                                                                          ARGOCTOP.52     
     &, O_SPCON(jocp_hr), O_SPCON(jocp_hrj), O_SPCON(jocp_fkmp)            ORH0F404.135    
     &, O_SPCON(jocp_fkmq_global), O_SPCON(jocp_fkmq)                      ORH3F403.230    
     &, O_SPCON(jocp_coriolis), O_SPCON(jocp_em)                           ORH3F403.231    
     &, O_SPCON(jocp_hrjp),O_SPCON(jocp_pjp),O_SPCON(jocp_pbjp)            OOM3F405.33     
     &, O_SPCON(jocp_fkmqjp)                                               OOM3F405.34     
C                                                                          ARGOCTOP.61     
C ======== End of start addresses for items in COMDECK ARGOCFLD ========   ARGOCTOP.62     
C                                                                          ARGOCTOP.63     
C ======== Start addresses for items in COMDECK ARGOCFIL ===========       ARGOCTOP.64     
C                                                                          ARGOCTOP.65     
     &,O_SPCON(jocp_icbase),O_SPCON(jocp_idbase),O_SPCON(jocp_ind)         ORH1F405.38     
     &,O_SPCON(jocp_cossav),O_SPCON(jocp_denmsv),O_SPCON(jocp_cosnpi)      ORH1F405.39     
     &,O_SPCON(JP_MCU),O_SPCON(JP_MCT),O_SPCON(JP_MCF),O_SPCON(JP_MPU)     ORH1F405.40     
     &,O_SPCON(JP_MPT),O_SPCON(JP_MPF),O_SPCON(JP_MKU),O_SPCON(JP_MKT)     ORH1F405.41     
     &,O_SPCON(JP_MSU),O_SPCON(JP_MST),O_SPCON(JP_MSF),O_SPCON(JP_MRF)     ORH1F405.42     
     &,O_SPCON(JP_SCU),O_SPCON(JP_SCT),O_SPCON(JP_SCF)                     ORH1F405.43     
C                                                                          ARGOCTOP.73     
C ========= End of start addresses for COMDECK ARGOCFIL ============       ARGOCTOP.74     
C                                                                          ARGOCTOP.75     
C ======== Start addresses for items in COMDECK ARGOCMEA ===========       ARGOCTOP.76     
C                                                                          ARGOCTOP.77     
     &, O_SPCON(jocp_isht), O_SPCON(jocp_ieht)                             ORH3F403.237    
C                                                                          ARGOCTOP.80     
C ====== End of start addresses for items in COMDEK ARGOCMEA =======       ARGOCTOP.81     
C                                                                          ARGOCTOP.82     
C ========= Start addresses for items in COMDECK ARGOCAC ===========       ARGOCTOP.87     
C                                                                          ARGOCTOP.88     
     &, O_SPCON(jocp_o_lon_m), O_SPCON(jocp_o_lat_m)                       ORH3F403.238    
     &, O_SPCON(jocp_o_dep_levs_m),                                        ARGOCTOP.91     
C                                                                          ARGOCTOP.92     
C ===== End of start addresses for items in COMDECK ARGOCAC =======        ARGOCTOP.93     
C                                                                          NT080993.2      
C ======== Start addresses for items in COMDECK ARGOCBIO                   NT080993.3      
C                                                                          NT080993.4      
     &  O_SPCON(jocp_daylen), O_SPCON(jocp_dlco),                          ORH3F403.239    
C                                                                          NT080993.7      
C = End of start addresses for items in COMDECK ARGOCBIO                   NT080993.8      
*ENDIF OCEAN                                                               ARGOCTOP.94