Symbol Description Uses
Pd 13



File Line number Procedure Code
./pkg/opps/opps_calc.F 113 OPPS_CALC
      _RL Pd(Nr,nTracer)
./pkg/opps/opps_calc.F 133 OPPS_CALC
        Pd(k,ktr) = tracerEnv(k,ktr)
./pkg/opps/opps_calc.F 135 OPPS_CALC
       Dd(k)=state1(Pd(k,2),Pd(k,1),i,j,k,bi,bj,myThid)
./pkg/opps/opps_calc.F 175 OPPS_CALC
        D1=state1( Pd(k2,2), Pd(k2,1),i,j,k2+1,bi,bj,myThid)
./pkg/opps/opps_calc.F 225 OPPS_CALC
          Pd(k2+1,ktr)=Pd(k2,ktr) 
./pkg/opps/opps_calc.F 226 OPPS_CALC
     &         - entrainrate*(pmix - Pd(k2,ktr))
./pkg/opps/opps_calc.F 232 OPPS_CALC
         Dd(k2+1)=state1(Pd(k2+1,2),Pd(k2+1,1),i,j,k2+1,bi,bj,myThid)
./pkg/opps/opps_calc.F 352 OPPS_CALC
          Pda(k2,ktr) = Pd(k2,ktr)
./pkg/opps/opps_calc.F 367 OPPS_CALC
         Pda(maxdepth,ktr) = Pd(maxdepth,ktr)