Symbol Description Uses
atm_oc_frac2 7


File Line number Procedure Code
./pkg/atm2d/ATM2D_VARS.h 156 NO PROCEDURE 
     &                    atm_oc_frac1, atm_oc_frac2,
./pkg/atm2d/ATM2D_VARS.h 161 NO PROCEDURE 
       _RL atm_oc_frac2(sNy)  ! fraction of atm+1 lat area covered by ocean lat
./pkg/atm2d/calc_1dto2d.F 51 CALC_1DTO2D 
     &              atm_runoff(atm_oc_ind(j)+1)*atm_oc_frac2(j)
./pkg/atm2d/init_atm2d.F 123 INIT_ATM2D 
           atm_oc_frac2(j)= (end2 - enda2) / (enda3 - enda2)
./pkg/atm2d/init_atm2d.F 127 INIT_ATM2D 
          atm_oc_frac2(j)=0. _d 0
./pkg/atm2d/init_atm2d.F 89 INIT_ATM2D 
      atm_oc_frac2(1)= 0. _d 0   ! assumes ocean(1) fits in atm(1)
./pkg/atm2d/init_atm2d.F 97 INIT_ATM2D 
      atm_oc_frac2(sNy)= 0. _d 0   ! assumes ocean(1) fits in atm(1)