Symbol Description Uses
y 1rst order moment of tracer distribution, in x,y,z direction 45


File Line number Procedure Code
./pkg/streamice/streamice_init_fixed.F 304 STREAMICE_INIT_FIXED 
          y = yC(i,j,bi,bj)
./pkg/streamice/streamice_init_fixed.F 311 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_noflow_WEST) .AND.
./pkg/streamice/streamice_init_fixed.F 312 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_noflow_WEST)) THEN
./pkg/streamice/streamice_init_fixed.F 315 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_noStress_WEST) .AND.
./pkg/streamice/streamice_init_fixed.F 316 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_noStress_WEST)) THEN
./pkg/streamice/streamice_init_fixed.F 319 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_FluxBdry_WEST) .AND.
./pkg/streamice/streamice_init_fixed.F 320 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_FluxBdry_WEST)) THEN
./pkg/streamice/streamice_init_fixed.F 324 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_Dirich_WEST) .AND.
./pkg/streamice/streamice_init_fixed.F 325 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_Dirich_WEST)) THEN
./pkg/streamice/streamice_init_fixed.F 329 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_CFBC_WEST) .AND.
./pkg/streamice/streamice_init_fixed.F 330 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_CFBC_WEST)) THEN
./pkg/streamice/streamice_init_fixed.F 337 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_noflow_EAST) .AND.
./pkg/streamice/streamice_init_fixed.F 338 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_noflow_EAST)) THEN
./pkg/streamice/streamice_init_fixed.F 341 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_noStress_EAST) .AND.
./pkg/streamice/streamice_init_fixed.F 342 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_noStress_EAST)) THEN
./pkg/streamice/streamice_init_fixed.F 345 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_FluxBdry_EAST) .AND.
./pkg/streamice/streamice_init_fixed.F 346 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_FluxBdry_EAST)) THEN
./pkg/streamice/streamice_init_fixed.F 350 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_Dirich_EAST) .AND.
./pkg/streamice/streamice_init_fixed.F 351 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_Dirich_EAST)) THEN
./pkg/streamice/streamice_init_fixed.F 355 STREAMICE_INIT_FIXED 
           IF ((y .gt. min_y_CFBC_EAST) .AND.
./pkg/streamice/streamice_init_fixed.F 356 STREAMICE_INIT_FIXED 
     &         (y .le. max_y_CFBC_EAST)) THEN
./pkg/streamice/streamice_init_fixed.F 37 STREAMICE_INIT_FIXED 
      _RL x, y
./pkg/streamice/streamice_init_varia.F 41 STREAMICE_INIT_VARIA 
      _RL slope_pos, c1, x, y, lenx, leny
./pkg/streamice/streamice_init_varia.F 435 STREAMICE_INIT_VARIA 
           y = yC(i,j,bi,bj)
./pkg/streamice/streamice_init_varia.F 439 STREAMICE_INIT_VARIA 
     &           sin(2*streamice_ky_b_init*PI*y/leny)))
./pkg/streamice/streamice_init_varia.F 453 STREAMICE_INIT_VARIA 
           y = yC(i,j,bi,bj)
./pkg/cheapaml/cheapaml_coare3_flux.F 289 CHEAPAML_COARE3_FLUX 
      _RL x,y,psik,psic,f,c
./pkg/cheapaml/cheapaml_coare3_flux.F 295 CHEAPAML_COARE3_FLUX 
       y = (1. - 10.15 _d 0*zL)**.3333 _d 0     !Convective
./pkg/cheapaml/cheapaml_coare3_flux.F 296 CHEAPAML_COARE3_FLUX 
       psic = 1.5*LOG((1.+y+y*y)/3.)
./pkg/cheapaml/cheapaml_coare3_flux.F 297 CHEAPAML_COARE3_FLUX 
     &      - SQRT(3. _d 0)*ATAN( (1.+2.*y)/SQRT(3. _d 0) )
./pkg/cheapaml/cheapaml_coare3_flux.F 327 CHEAPAML_COARE3_FLUX 
      _RL x,y,psik,psic,f,c
./pkg/cheapaml/cheapaml_coare3_flux.F 333 CHEAPAML_COARE3_FLUX 
       y = (1. - 34.15 _d 0*zL)**.3333 _d 0     !Convective
./pkg/cheapaml/cheapaml_coare3_flux.F 334 CHEAPAML_COARE3_FLUX 
       psic = 1.5*LOG((1.+y+y*y)/3.)
./pkg/cheapaml/cheapaml_coare3_flux.F 335 CHEAPAML_COARE3_FLUX 
     &      - SQRT(3. _d 0)*ATAN( (1.+2.*y)/SQRT(3. _d 0) )
./pkg/ebm/ebm_wind_perturb.F 106 EBM_WIND_PERTURB 
         y(j) = j
./pkg/ebm/ebm_wind_perturb.F 107 EBM_WIND_PERTURB 
         ya(j) = y(j) - MOD(y(j),6.0)
./pkg/ebm/ebm_wind_perturb.F 117 EBM_WIND_PERTURB 
     &        ((y(j)-ya(j))*temp2(i,INT(ya2(j)))+
./pkg/ebm/ebm_wind_perturb.F 118 EBM_WIND_PERTURB 
     &        (6.0-y(j)+ya(j))*temp2(i,INT(ya(j)))))
./pkg/ebm/ebm_wind_perturb.F 39 EBM_WIND_PERTURB 
      _RS y(1-OLy:sNy+OLy), x(1-OLx:sNx+OLx)
./pkg/ebm/ebm_wind_perturb.F 56 EBM_WIND_PERTURB 
         y(j) = 0.0