Symbol Description Uses
y_in latitude vector defining input field grid 100


File Line number Procedure Code
./pkg/exf/exf_interp.F 148 EXF_INTERP 
      y_in(1) = lat_0
./pkg/exf/exf_interp.F 151 EXF_INTERP 
       y_in(j+1) = y_in(j) + lat_inc(i)
./pkg/exf/exf_interp.F 153 EXF_INTERP 
      y_in(0) = y_in(1) - lat_inc(1)
./pkg/exf/exf_interp.F 154 EXF_INTERP 
      y_in(-1)= y_in(0) - lat_inc(1)
./pkg/exf/exf_interp.F 170 EXF_INTERP 
       IF ( ABS(y_in(j+1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 171 EXF_INTERP 
         y_in(j) = -yPole
./pkg/exf/exf_interp.F 172 EXF_INTERP 
         y_in(j-1) = -2.*yPole - y_in(j+1)
./pkg/exf/exf_interp.F 179 EXF_INTERP 
       IF ( ABS(y_in(j+1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 180 EXF_INTERP 
         y_in(j) = -yPole
./pkg/exf/exf_interp.F 188 EXF_INTERP 
       IF ( ABS(y_in(j-1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 189 EXF_INTERP 
         y_in(j) = yPole
./pkg/exf/exf_interp.F 190 EXF_INTERP 
         y_in(j+1) = 2.*yPole - y_in(j-1)
./pkg/exf/exf_interp.F 197 EXF_INTERP 
       IF ( ABS(y_in(j-1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 198 EXF_INTERP 
         y_in(j) = yPole
./pkg/exf/exf_interp.F 229 EXF_INTERP 
       IF ( poleSymmetry .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 230 EXF_INTERP 
        IF ( nyIn.GE.3 .AND. ABS(y_in(k)).EQ.yPole )
./pkg/exf/exf_interp.F 264 EXF_INTERP 
        IF ( ABS(y_in(j)).EQ.yPole ) THEN
./pkg/exf/exf_interp.F 296 EXF_INTERP 
        IF ( ABS(y_in(k)).EQ.yPole ) THEN
./pkg/exf/exf_interp.F 299 EXF_INTERP 
         edgeFac = (y_in(j) - y_in(k)) / (y_in(i) - y_in(k))
./pkg/exf/exf_interp.F 300 EXF_INTERP 
         poleFac = (y_in(i) - y_in(j)) / (y_in(i) - y_in(k))
./pkg/exf/exf_interp.F 326 EXF_INTERP 
     &   ' proc=', (prtPole(j),j=-1,1), ', yIn=', (y_in(j),j=-1,1)
./pkg/exf/exf_interp.F 330 EXF_INTERP 
     &   ' proc=', (prtPole(j),j=2,4), ', yIn=',(y_in(j),j=nyIn,nyIn+2)
./pkg/exf/exf_interp.F 357 EXF_INTERP 
     &          yG(i,j,bi,bj) .LT. y_in(0)        .OR.
./pkg/exf/exf_interp.F 358 EXF_INTERP 
     &          yG(i,j,bi,bj) .GE. y_in(nyIn+1) ) THEN
./pkg/exf/exf_interp.F 373 EXF_INTERP 
     &        ' , y_in(0,nyIn+1)=', y_in(0) ,y_in(nyIn+1)
./pkg/exf/exf_interp.F 404 EXF_INTERP 
            IF ( yG(i,j,bi,bj) .LT. y_in(k) ) THEN
./pkg/exf/exf_interp.F 431 EXF_INTERP 
     &        'EXF_INTERP: s_ind=',s_ind(i,j),', lat=',y_in(s_ind(i,j))
./pkg/exf/exf_interp.F 434 EXF_INTERP 
     &        'EXF_INTERP: n_ind=',w_ind(i,j),', lat=',y_in(w_ind(i,j))
./pkg/exf/exf_interp.F 452 EXF_INTERP 
     I                nxIn, nyIn, x_in, y_in,
./pkg/exf/exf_interp.F 88 EXF_INTERP 
      _RL      x_in(-1:nxIn+2), y_in(-1:nyIn+2)
./pkg/exf/exf_interp.F 90 EXF_INTERP 
      _RL      x_in(-1:exf_max_nLon+2), y_in(-1:exf_max_nLat+2)
./pkg/exf/exf_interp_uv.F 102 EXF_INTERP_UV 
      _RL      x_in (-1:exf_max_nLon+2), y_in (-1:exf_max_nLat+2)
./pkg/exf/exf_interp_uv.F 163 EXF_INTERP_UV 
      y_in(1) = lat_0
./pkg/exf/exf_interp_uv.F 166 EXF_INTERP_UV 
       y_in(j+1) = y_in(j) + lat_inc(i)
./pkg/exf/exf_interp_uv.F 168 EXF_INTERP_UV 
      y_in(0) = y_in(1) - lat_inc(1)
./pkg/exf/exf_interp_uv.F 169 EXF_INTERP_UV 
      y_in(-1)= y_in(0) - lat_inc(1)
./pkg/exf/exf_interp_uv.F 180 EXF_INTERP_UV 
      IF ( ABS(y_in(j+1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp_uv.F 181 EXF_INTERP_UV 
         y_in(j) = -yPole
./pkg/exf/exf_interp_uv.F 182 EXF_INTERP_UV 
         y_in(j-1) = -2.*yPole - y_in(j+1)
./pkg/exf/exf_interp_uv.F 189 EXF_INTERP_UV 
      IF ( ABS(y_in(j+1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp_uv.F 190 EXF_INTERP_UV 
         y_in(j) = -yPole
./pkg/exf/exf_interp_uv.F 197 EXF_INTERP_UV 
      IF ( ABS(y_in(j-1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp_uv.F 198 EXF_INTERP_UV 
         y_in(j) = yPole
./pkg/exf/exf_interp_uv.F 199 EXF_INTERP_UV 
         y_in(j+1) = 2.*yPole - y_in(j-1)
./pkg/exf/exf_interp_uv.F 206 EXF_INTERP_UV 
      IF ( ABS(y_in(j-1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp_uv.F 207 EXF_INTERP_UV 
         y_in(j) = yPole
./pkg/exf/exf_interp_uv.F 244 EXF_INTERP_UV 
       IF ( poleSymmetry .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp_uv.F 245 EXF_INTERP_UV 
        IF ( nyIn.GE.3 .AND. ABS(y_in(k)).EQ.yPole )
./pkg/exf/exf_interp_uv.F 276 EXF_INTERP_UV 
        IF ( ABS(y_in(j)).EQ.yPole ) THEN
./pkg/exf/exf_interp_uv.F 277 EXF_INTERP_UV 
          pSign = SIGN( oneRL, y_in(j) )
./pkg/exf/exf_interp_uv.F 318 EXF_INTERP_UV 
        IF ( ABS(y_in(k)).EQ.yPole ) THEN
./pkg/exf/exf_interp_uv.F 321 EXF_INTERP_UV 
         edgeFac = (y_in(j) - y_in(k)) / (y_in(i) - y_in(k))
./pkg/exf/exf_interp_uv.F 322 EXF_INTERP_UV 
         poleFac = (y_in(i) - y_in(j)) / (y_in(i) - y_in(k))
./pkg/exf/exf_interp_uv.F 348 EXF_INTERP_UV 
     &   ' proc=', (prtPole(j),j=-1,1), ', yIn=', (y_in(j),j=-1,1)
./pkg/exf/exf_interp_uv.F 352 EXF_INTERP_UV 
     &   ' proc=', (prtPole(j),j=2,4), ', yIn=',(y_in(j),j=nyIn,nyIn+2)
./pkg/exf/exf_interp_uv.F 383 EXF_INTERP_UV 
     &          yG(i,j,bi,bj) .LT. y_in(0)        .OR.
./pkg/exf/exf_interp_uv.F 384 EXF_INTERP_UV 
     &          yG(i,j,bi,bj) .GE. y_in(nyIn+1) ) THEN
./pkg/exf/exf_interp_uv.F 399 EXF_INTERP_UV 
     &        ' , y_in(0,nyIn+1)=', y_in(0) ,y_in(nyIn+1)
./pkg/exf/exf_interp_uv.F 430 EXF_INTERP_UV 
            IF ( yG(i,j,bi,bj) .LT. y_in(k) ) THEN
./pkg/exf/exf_interp_uv.F 457 EXF_INTERP_UV 
     &      'EXF_INTERP_UV: s_ind=',s_ind(i,j),', lat=',y_in(s_ind(i,j))
./pkg/exf/exf_interp_uv.F 460 EXF_INTERP_UV 
     &      'EXF_INTERP_UV: n_ind=',w_ind(i,j),', lat=',y_in(w_ind(i,j))
./pkg/exf/exf_interp_uv.F 478 EXF_INTERP_UV 
     I                nxIn, nyIn, x_in, y_in,
./pkg/exf/exf_interp_uv.F 486 EXF_INTERP_UV 
     I                nxIn, nyIn, x_in, y_in,
./pkg/exf/exf_interp_uv.F 99 EXF_INTERP_UV 
      _RL      x_in (-1:nxIn+2), y_in (-1:nyIn+2)
./pkg/exf/exf_interpolate.F 105 EXF_INTERPOLATE 
      _RL           x_in(-1:nxIn+2), y_in(-1:nyIn+2)
./pkg/exf/exf_interpolate.F 144 EXF_INTERPOLATE 
            py_ind(l+1) = y_in(s_ind(i,j)+l)
./pkg/exf/exf_interpolate.F 179 EXF_INTERPOLATE 
            py_ind(l+2) = y_in(s_ind(i,j)+l)
./pkg/exf/exf_interpolate.F 64 EXF_INTERPOLATE 
     I                nxIn, nyIn, x_in, y_in,