Symbol Description Uses
PTRACERS_EvPrRn tracer concentration in Rain, Evap & RunOff 39


File Line number Procedure Code
./pkg/longstep/longstep_forcing_surf.F 110 LONGSTEP_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./pkg/longstep/longstep_forcing_surf.F 121 LONGSTEP_FORCING_SURF 
     &          *( pTracer(i,j,ks,bi,bj,iTrc) - PTRACERS_EvPrRn(iTrc) )
./pkg/longstep/longstep_forcing_surf.F 134 LONGSTEP_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./pkg/longstep/longstep_forcing_surf.F 145 LONGSTEP_FORCING_SURF 
     &            *( PTRACERS_ref(ks,iTrc) - PTRACERS_EvPrRn(iTrc) )
./pkg/longstep/longstep_forcing_surf.F 82 LONGSTEP_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./pkg/longstep/longstep_forcing_surf.F 88 LONGSTEP_FORCING_SURF 
     &          *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) )
./pkg/ptracers/PTRACERS_PARAMS.h 37 NO PROCEDURE 
      _RL PTRACERS_EvPrRn(PTRACERS_num)
./pkg/ptracers/PTRACERS_PARAMS.h 50 NO PROCEDURE 
     &     PTRACERS_EvPrRn,
./pkg/ptracers/ptracers_check.F 142 PTRACERS_CHECK 
        CALL WRITE_0D_RL( PTRACERS_EvPrRn(iTracer), INDEX_NONE,
./pkg/ptracers/ptracers_forcing_surf.F 128 PTRACERS_FORCING_SURF 
     &        PTRACERS_EvPrRn(iTrc).NE.UNSET_RL ) THEN
./pkg/ptracers/ptracers_forcing_surf.F 134 PTRACERS_FORCING_SURF 
     &          *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) )
./pkg/ptracers/ptracers_forcing_surf.F 157 PTRACERS_FORCING_SURF 
     &        PTRACERS_EvPrRn(iTrc).NE.UNSET_RL ) THEN
./pkg/ptracers/ptracers_forcing_surf.F 165 PTRACERS_FORCING_SURF 
     &          *( pTracer(i,j,ks,bi,bj,iTrc) - PTRACERS_EvPrRn(iTrc) )
./pkg/ptracers/ptracers_forcing_surf.F 179 PTRACERS_FORCING_SURF 
     &        PTRACERS_EvPrRn(iTrc).NE.UNSET_RL ) THEN
./pkg/ptracers/ptracers_forcing_surf.F 187 PTRACERS_FORCING_SURF 
     &            *( PTRACERS_ref(ks,iTrc) - PTRACERS_EvPrRn(iTrc) )
./pkg/ptracers/ptracers_readparms.F 122 PTRACERS_READPARMS 
        PTRACERS_EvPrRn(iTracer)=UNSET_RL
./pkg/ptracers/ptracers_readparms.F 65 PTRACERS_READPARMS 
     &     PTRACERS_EvPrRn,
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 131 PTRACERS_FORCING_SURF 
     &        PTRACERS_EvPrRn(iTrc).NE.UNSET_RL ) THEN
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 137 PTRACERS_FORCING_SURF 
     &          *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) )
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 160 PTRACERS_FORCING_SURF 
     &        PTRACERS_EvPrRn(iTrc).NE.UNSET_RL ) THEN
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 168 PTRACERS_FORCING_SURF 
     &          *( pTracer(i,j,ks,bi,bj,iTrc) - PTRACERS_EvPrRn(iTrc) )
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 182 PTRACERS_FORCING_SURF 
     &        PTRACERS_EvPrRn(iTrc).NE.UNSET_RL ) THEN
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 190 PTRACERS_FORCING_SURF 
     &            *( PTRACERS_ref(ks,iTrc) - PTRACERS_EvPrRn(iTrc) )
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 125 PTRACERS_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 131 PTRACERS_FORCING_SURF 
     &          *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) )
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 153 PTRACERS_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 161 PTRACERS_FORCING_SURF 
     &          *( pTracer(i,j,ks,bi,bj,iTrc) - PTRACERS_EvPrRn(iTrc) )
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 174 PTRACERS_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 182 PTRACERS_FORCING_SURF 
     &            *( PTRACERS_ref(ks,iTrc) - PTRACERS_EvPrRn(iTrc) )
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 125 PTRACERS_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 131 PTRACERS_FORCING_SURF 
     &          *( PTRACERS_EvPrRn(iTrc) - pTracer(i,j,ks,bi,bj,iTrc) )
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 153 PTRACERS_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 161 PTRACERS_FORCING_SURF 
     &          *( pTracer(i,j,ks,bi,bj,iTrc) - PTRACERS_EvPrRn(iTrc) )
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 174 PTRACERS_FORCING_SURF 
         IF (PTRACERS_EvPrRn(iTrc).NE.UNSET_RL) THEN
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 182 PTRACERS_FORCING_SURF 
     &            *( PTRACERS_ref(ks,iTrc) - PTRACERS_EvPrRn(iTrc) )
./pkg/dic/dic_readparms.F 316 DIC_READPARMS 
      IF ( PTRACERS_EvPrRn(1).NE.UNSET_RL .OR.
./pkg/dic/dic_readparms.F 317 DIC_READPARMS 
     &     PTRACERS_EvPrRn(2).NE.UNSET_RL ) THEN
./pkg/dic/dic_readparms.F 321 DIC_READPARMS 
        IF ( PTRACERS_EvPrRn(1).NE.UNSET_RL ) THEN
./pkg/dic/dic_readparms.F 326 DIC_READPARMS 
        IF ( PTRACERS_EvPrRn(2).NE.UNSET_RL ) THEN