Symbol Description Uses
e2_pij 10


File Line number Procedure Code
./pkg/exch2/exch2_get_uv_bounds.F 153 EXCH2_GET_UV_BOUNDS 
        IF ( e2_pij(1) .EQ. -1 ) THEN
./pkg/exch2/exch2_get_uv_bounds.F 156 EXCH2_GET_UV_BOUNDS 
        IF ( e2_pij(3) .EQ. -1 ) THEN
./pkg/exch2/exch2_get_uv_bounds.F 161 EXCH2_GET_UV_BOUNDS 
        IF ( e2_pij(2) .EQ. -1 ) THEN
./pkg/exch2/exch2_get_uv_bounds.F 164 EXCH2_GET_UV_BOUNDS 
        IF ( e2_pij(4) .EQ. -1 ) THEN
./pkg/exch2/exch2_get_uv_bounds.F 169 EXCH2_GET_UV_BOUNDS 
        IF ( e2_pij(1).EQ.-1 .OR. e2_pij(3).EQ.-1 ) tIlo1 = tIlo1+1
./pkg/exch2/exch2_get_uv_bounds.F 170 EXCH2_GET_UV_BOUNDS 
        IF ( e2_pij(2).EQ.-1 .OR. e2_pij(4).EQ.-1 ) tJlo2 = tJlo2+1
./pkg/exch2/exch2_get_uv_bounds.F 65 EXCH2_GET_UV_BOUNDS 
      INTEGER  i, e2_pij(4)
./pkg/exch2/exch2_get_uv_bounds.F 81 EXCH2_GET_UV_BOUNDS 
        e2_pij(i) = exch2_pij(i,soNb,soTile)