Symbol Description Uses
recip_P0g 52


File Line number Procedure Code
./verification/fizhi-gridalt-hs/code/do_fizhi.F 173 DO_FIZHI 
         recip_P0g= 1. _d 0 / pephy(i,j,Nrphys+1,bi,bj)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 176 DO_FIZHI 
     &                   *recip_P0g )
./verification/fizhi-gridalt-hs/code/do_fizhi.F 192 DO_FIZHI 
     &       (termP*recip_P0g-sigma_b)/(1. _d 0-sigma_b) )
./verification/fizhi-gridalt-hs/code/do_fizhi.F 194 DO_FIZHI 
         if(termP*recip_P0g.gt.0.04)then
./verification/hs94.128x64x5/code/external_forcing.F 117 EXTERNAL_FORCING_V 
      _RL recip_P0g, termP, kV, kF, sigma_b
./verification/hs94.128x64x5/code/external_forcing.F 127 EXTERNAL_FORCING_V 
         recip_P0g=MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.128x64x5/code/external_forcing.F 128 EXTERNAL_FORCING_V 
         termP=0.5 _d 0*( MIN(rF(kLev)*recip_P0g,1. _d 0)
./verification/hs94.128x64x5/code/external_forcing.F 129 EXTERNAL_FORCING_V 
     &                   +rF(kLev+1)*recip_P0g )
./verification/hs94.128x64x5/code/external_forcing.F 49 EXTERNAL_FORCING_U 
      _RL recip_P0g, termP, kV, kF, sigma_b
./verification/hs94.128x64x5/code/external_forcing.F 59 EXTERNAL_FORCING_U 
         recip_P0g=MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.128x64x5/code/external_forcing.F 60 EXTERNAL_FORCING_U 
         termP=0.5 _d 0*( MIN(rF(kLev)*recip_P0g,1. _d 0)
./verification/hs94.128x64x5/code/external_forcing.F 61 EXTERNAL_FORCING_U 
     &                   +rF(kLev+1)*recip_P0g )
./verification/hs94.1x64x5/code/apply_forcing.F 155 APPLY_FORCING_V 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.1x64x5/code/apply_forcing.F 168 APPLY_FORCING_V 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.1x64x5/code/apply_forcing.F 169 APPLY_FORCING_V 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.1x64x5/code/apply_forcing.F 170 APPLY_FORCING_V 
     &                      +rF(k+1)*recip_P0g )
./verification/hs94.1x64x5/code/apply_forcing.F 62 APPLY_FORCING_U 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.1x64x5/code/apply_forcing.F 75 APPLY_FORCING_U 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.1x64x5/code/apply_forcing.F 76 APPLY_FORCING_U 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.1x64x5/code/apply_forcing.F 77 APPLY_FORCING_U 
     &                      +rF(k+1)*recip_P0g )
./verification/hs94.1x64x5/code_ad/apply_forcing.F 155 APPLY_FORCING_V 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.1x64x5/code_ad/apply_forcing.F 168 APPLY_FORCING_V 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.1x64x5/code_ad/apply_forcing.F 169 APPLY_FORCING_V 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.1x64x5/code_ad/apply_forcing.F 170 APPLY_FORCING_V 
     &                      +rF(k+1)*recip_P0g )
./verification/hs94.1x64x5/code_ad/apply_forcing.F 62 APPLY_FORCING_U 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.1x64x5/code_ad/apply_forcing.F 75 APPLY_FORCING_U 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.1x64x5/code_ad/apply_forcing.F 76 APPLY_FORCING_U 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.1x64x5/code_ad/apply_forcing.F 77 APPLY_FORCING_U 
     &                      +rF(k+1)*recip_P0g )
./verification/hs94.1x64x5/code_oad/apply_forcing.F 155 APPLY_FORCING_V 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.1x64x5/code_oad/apply_forcing.F 168 APPLY_FORCING_V 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.1x64x5/code_oad/apply_forcing.F 169 APPLY_FORCING_V 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.1x64x5/code_oad/apply_forcing.F 170 APPLY_FORCING_V 
     &                      +rF(k+1)*recip_P0g )
./verification/hs94.1x64x5/code_oad/apply_forcing.F 62 APPLY_FORCING_U 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.1x64x5/code_oad/apply_forcing.F 75 APPLY_FORCING_U 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.1x64x5/code_oad/apply_forcing.F 76 APPLY_FORCING_U 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.1x64x5/code_oad/apply_forcing.F 77 APPLY_FORCING_U 
     &                      +rF(k+1)*recip_P0g )
./verification/hs94.cs-32x32x5/code/apply_forcing.F 155 APPLY_FORCING_V 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.cs-32x32x5/code/apply_forcing.F 168 APPLY_FORCING_V 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/hs94.cs-32x32x5/code/apply_forcing.F 169 APPLY_FORCING_V 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.cs-32x32x5/code/apply_forcing.F 170 APPLY_FORCING_V 
     &                      +rF(k+1)*recip_P0g )
./verification/hs94.cs-32x32x5/code/apply_forcing.F 62 APPLY_FORCING_U 
      _RL recip_P0g, termP, rFullDepth
./verification/hs94.cs-32x32x5/code/apply_forcing.F 75 APPLY_FORCING_U 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/hs94.cs-32x32x5/code/apply_forcing.F 76 APPLY_FORCING_U 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/hs94.cs-32x32x5/code/apply_forcing.F 77 APPLY_FORCING_U 
     &                      +rF(k+1)*recip_P0g )
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 155 APPLY_FORCING_V 
      _RL recip_P0g, termP, rFullDepth
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 168 APPLY_FORCING_V 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i,j-1,bi,bj))
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 169 APPLY_FORCING_V 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 170 APPLY_FORCING_V 
     &                      +rF(k+1)*recip_P0g )
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 62 APPLY_FORCING_U 
      _RL recip_P0g, termP, rFullDepth
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 75 APPLY_FORCING_U 
          recip_P0g = MAX(recip_Rcol(i,j,bi,bj),recip_Rcol(i-1,j,bi,bj))
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 76 APPLY_FORCING_U 
          termP = 0.5 _d 0*( MIN( rF(k)*recip_P0g, oneRL )
./verification/tutorial_held_suarez_cs/code/apply_forcing.F 77 APPLY_FORCING_U 
     &                      +rF(k+1)*recip_P0g )