Symbol Description Uses
ija 8



File Line number Procedure Code
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F 29 ATM_TO_OCN_MAPRUNOFF
      INTEGER n, ijo, ija
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F 40 ATM_TO_OCN_MAPRUNOFF
          ija=ijROatm(n)
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F 42 ATM_TO_OCN_MAPRUNOFF
     &                -fld_atm(ija)*arROmap(n)
./pkg/atm_ocn_coupler/set_runoffmap.F 23 SET_RUNOFFMAP
      INTEGER n, ijo, ija
./pkg/atm_ocn_coupler/set_runoffmap.F 84 SET_RUNOFFMAP
          ija=NINT(tmpfld(1,n))
./pkg/atm_ocn_coupler/set_runoffmap.F 86 SET_RUNOFFMAP
          IF ( ija.LT.1 .OR. ija.GT.Nx_atm*Ny_atm ) THEN
./pkg/atm_ocn_coupler/set_runoffmap.F 90 SET_RUNOFFMAP
          ijROatm(n)=ija