Symbol Description Uses
ocnArea 16


File Line number Procedure Code
./pkg/atm2d/ATM2D_VARS.h 111 NO PROCEDURE 
     &                    ocnArea, cco2flux
./pkg/atm2d/ATM2D_VARS.h 117 NO PROCEDURE 
       _RL ocnArea(jm0)  ! ocean area of latitude strip on atm grid (m2)
./pkg/atm2d/calc_zonal_means.F 119 CALC_ZONAL_MEANS 
        IF (ocnArea(j_atm).GT.1. _d -32) THEN
./pkg/atm2d/calc_zonal_means.F 122 CALC_ZONAL_MEANS 
     &      cfice(j_atm)= cfice(j_atm)/ocnArea(j_atm)
./pkg/atm2d/calc_zonal_means.F 124 CALC_ZONAL_MEANS 
            ctice(j_atm)= ctice(j_atm)/ocnArea(j_atm)/cfice(j_atm)
./pkg/atm2d/calc_zonal_means.F 125 CALC_ZONAL_MEANS 
            csAlb(j_atm)= csAlb(j_atm)/ocnArea(j_atm)/cfice(j_atm)
./pkg/atm2d/calc_zonal_means.F 126 CALC_ZONAL_MEANS 
            csAlbNIR(j_atm)= csAlbNIR(j_atm)/ocnArea(j_atm)/cfice(j_atm)
./pkg/atm2d/calc_zonal_means.F 130 CALC_ZONAL_MEANS 
     &        ctocn(j_atm)= ctocn(j_atm)/ocnArea(j_atm)
./pkg/atm2d/init_atm2d.F 153 INIT_ATM2D 
        ocnArea(j_atm)=0. _d 0
./pkg/atm2d/init_atm2d.F 159 INIT_ATM2D 
            ocnArea(atm_oc_ind(j))=ocnArea(atm_oc_ind(j)) +
./pkg/atm2d/init_atm2d.F 162 INIT_ATM2D 
              ocnArea(atm_oc_ind(j)+1)=ocnArea(atm_oc_ind(j)+1) +
./pkg/atm2d/init_atm2d.F 170 INIT_ATM2D 
        cflan(j_atm)=1. _d 0 - ocnArea(j_atm) /
./pkg/atm2d/init_atm2d.F 177 INIT_ATM2D 
      cflan(2)= 1. _d 0 - ocnArea(2) /
./pkg/atm2d/init_atm2d.F 182 INIT_ATM2D 
      cflan(jm0-1)= 1.d0 - ocnArea(jm0-1) /