Symbol Description Uses
ibj1 9



File Line number Procedure Code
./pkg/atm2d/calc_1dto2d.F 35 CALC_1DTO2D
      INTEGER ib,ibj1,ibj2  ! runoff band variables
./pkg/atm2d/calc_1dto2d.F 43 CALC_1DTO2D
        ibj1=1
./pkg/atm2d/calc_1dto2d.F 44 CALC_1DTO2D
        IF (ib.GT.1) ibj1= rband(ib-1)+1
./pkg/atm2d/calc_1dto2d.F 48 CALC_1DTO2D
        DO j=ibj1,ibj2
./pkg/atm2d/init_atm2d.F 265 INIT_ATM2D
        ibj1=1
./pkg/atm2d/init_atm2d.F 266 INIT_ATM2D
        if (ib.GT.1) ibj1=  rband(ib-1)+1
./pkg/atm2d/init_atm2d.F 270 INIT_ATM2D
        DO j=ibj1,ibj2
./pkg/atm2d/init_atm2d.F 275 INIT_ATM2D
        DO j=ibj1,ibj2
./pkg/atm2d/init_atm2d.F 48 INIT_ATM2D
      INTEGER ib, ibj1, ibj2  ! runoff band loop counters