Symbol Description Uses
atm_oc_frac1 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 160 NO PROCEDURE
       _RL atm_oc_frac1(sNy)  ! fraction of atm lat area covered by ocean lat
./pkg/atm2d/calc_1dto2d.F 50 CALC_1DTO2D
     &              atm_runoff(atm_oc_ind(j))*atm_oc_frac1(j) +
./pkg/atm2d/init_atm2d.F 122 INIT_ATM2D
           atm_oc_frac1(j)= (enda2-end1) / (enda2 - enda1)
./pkg/atm2d/init_atm2d.F 126 INIT_ATM2D
          atm_oc_frac1(j)= (end2-end1)/ (enda2-enda1)
./pkg/atm2d/init_atm2d.F 86 INIT_ATM2D
      atm_oc_frac1(1)= (sin(yG(1,2,1,1)*deg2rad) -
./pkg/atm2d/init_atm2d.F 92 INIT_ATM2D
      atm_oc_frac1(sNy)= (sin((yG(1,sNy,1,1) +