Symbol Description Uses
y_in latitude vector defining input field grid 77


File Line number Procedure Code
./pkg/exf/exf_interp.F 120 EXF_INTERP 
      y_in(1) = lat_0
./pkg/exf/exf_interp.F 123 EXF_INTERP 
       y_in(j+1) = y_in(j) + lat_inc(i)
./pkg/exf/exf_interp.F 125 EXF_INTERP 
      y_in(0) = y_in(1) - lat_inc(1)
./pkg/exf/exf_interp.F 126 EXF_INTERP 
      y_in(-1)= y_in(0) - lat_inc(1)
./pkg/exf/exf_interp.F 142 EXF_INTERP 
       IF ( ABS(y_in(j+1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 143 EXF_INTERP 
         y_in(j) = -yPole
./pkg/exf/exf_interp.F 144 EXF_INTERP 
         y_in(j-1) = -2.*yPole - y_in(1)
./pkg/exf/exf_interp.F 151 EXF_INTERP 
       IF ( ABS(y_in(j+1)).GT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 152 EXF_INTERP 
         y_in(j) = -yPole
./pkg/exf/exf_interp.F 160 EXF_INTERP 
       IF ( ABS(y_in(j-1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 161 EXF_INTERP 
         y_in(j) = yPole
./pkg/exf/exf_interp.F 162 EXF_INTERP 
         y_in(j+1) = 2.*yPole - y_in(j-1)
./pkg/exf/exf_interp.F 169 EXF_INTERP 
       IF ( ABS(y_in(j-1)).LT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 170 EXF_INTERP 
         y_in(j) = yPole
./pkg/exf/exf_interp.F 201 EXF_INTERP 
       IF ( poleSymmetry .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp.F 234 EXF_INTERP 
        IF ( ABS(y_in(j)).EQ.yPole ) THEN
./pkg/exf/exf_interp.F 274 EXF_INTERP 
     &   ' proc=', (prtPole(j),j=-1,1), ', yIn=', (y_in(j),j=-1,1)
./pkg/exf/exf_interp.F 278 EXF_INTERP 
     &   ' proc=', (prtPole(j),j=2,4), ', yIn=',(y_in(j),j=nyIn,nyIn+2)
./pkg/exf/exf_interp.F 305 EXF_INTERP 
     &          yG(i,j,bi,bj) .LT. y_in(0)        .OR.
./pkg/exf/exf_interp.F 306 EXF_INTERP 
     &          yG(i,j,bi,bj) .GE. y_in(nyIn+1) ) THEN
./pkg/exf/exf_interp.F 321 EXF_INTERP 
     &        ' , y_in(0,nyIn+1)=', y_in(0) ,y_in(nyIn+1)
./pkg/exf/exf_interp.F 352 EXF_INTERP 
            IF ( yG(i,j,bi,bj) .LT. y_in(k) ) THEN
./pkg/exf/exf_interp.F 379 EXF_INTERP 
     &        'EXF_INTERP: s_ind=',s_ind(i,j),', lat=',y_in(s_ind(i,j))
./pkg/exf/exf_interp.F 382 EXF_INTERP 
     &        'EXF_INTERP: n_ind=',w_ind(i,j),', lat=',y_in(w_ind(i,j))
./pkg/exf/exf_interp.F 400 EXF_INTERP 
     I                nxIn, nyIn, x_in, y_in,
./pkg/exf/exf_interp.F 77 EXF_INTERP 
      _RL      x_in(-1:nxIn+2), y_in(-1:nyIn+2)
./pkg/exf/exf_interp_uv.F 132 EXF_INTERP_UV 
      y_in(1) = lat_0
./pkg/exf/exf_interp_uv.F 135 EXF_INTERP_UV 
       y_in(j+1) = y_in(j) + lat_inc(i)
./pkg/exf/exf_interp_uv.F 137 EXF_INTERP_UV 
      y_in(0) = y_in(1) - lat_inc(1)
./pkg/exf/exf_interp_uv.F 138 EXF_INTERP_UV 
      y_in(-1)= y_in(0) - lat_inc(1)
./pkg/exf/exf_interp_uv.F 149 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 150 EXF_INTERP_UV 
         y_in(j) = -yPole
./pkg/exf/exf_interp_uv.F 151 EXF_INTERP_UV 
         y_in(j-1) = -2.*yPole - y_in(1)
./pkg/exf/exf_interp_uv.F 158 EXF_INTERP_UV 
      IF ( ABS(y_in(j+1)).GT.yPole .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp_uv.F 159 EXF_INTERP_UV 
         y_in(j) = -yPole
./pkg/exf/exf_interp_uv.F 166 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 167 EXF_INTERP_UV 
         y_in(j) = yPole
./pkg/exf/exf_interp_uv.F 168 EXF_INTERP_UV 
         y_in(j+1) = 2.*yPole - y_in(j-1)
./pkg/exf/exf_interp_uv.F 175 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 176 EXF_INTERP_UV 
         y_in(j) = yPole
./pkg/exf/exf_interp_uv.F 213 EXF_INTERP_UV 
       IF ( poleSymmetry .AND. ABS(y_in(j)).GT.yPole ) THEN
./pkg/exf/exf_interp_uv.F 243 EXF_INTERP_UV 
        IF ( ABS(y_in(j)).EQ.yPole ) THEN
./pkg/exf/exf_interp_uv.F 292 EXF_INTERP_UV 
     &   ' proc=', (prtPole(j),j=-1,1), ', yIn=', (y_in(j),j=-1,1)
./pkg/exf/exf_interp_uv.F 296 EXF_INTERP_UV 
     &   ' proc=', (prtPole(j),j=2,4), ', yIn=',(y_in(j),j=nyIn,nyIn+2)
./pkg/exf/exf_interp_uv.F 322 EXF_INTERP_UV 
     &          yG(i,j,bi,bj) .LT. y_in(0)        .OR.
./pkg/exf/exf_interp_uv.F 323 EXF_INTERP_UV 
     &          yG(i,j,bi,bj) .GE. y_in(nyIn+1) ) THEN
./pkg/exf/exf_interp_uv.F 338 EXF_INTERP_UV 
     &        ' , y_in(0,nyIn+1)=', y_in(0) ,y_in(nyIn+1)
./pkg/exf/exf_interp_uv.F 369 EXF_INTERP_UV 
            IF ( yG(i,j,bi,bj) .LT. y_in(k) ) THEN
./pkg/exf/exf_interp_uv.F 396 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 399 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 417 EXF_INTERP_UV 
     I                nxIn, nyIn, x_in, y_in,
./pkg/exf/exf_interp_uv.F 425 EXF_INTERP_UV 
     I                nxIn, nyIn, x_in, y_in,
./pkg/exf/exf_interp_uv.F 85 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,