Symbol Description Uses
DOPfraction fraction of new production going to DOP 13



File Line number Procedure Code
./pkg/dic/DIC_VARS.h 128 NO PROCEDURE
     &     Kpo4, DOPfraction, zcrit, KRemin,
./pkg/dic/DIC_VARS.h 166 NO PROCEDURE
      _RL DOPfraction
./pkg/dic/car_flux_omega_top.F 162 CAR_FLUX_OMEGA_TOP
     &                  +bioac(i,j,k)*(1.0-DOPfraction)*
./pkg/dic/car_flux_omega_top.F 169 CAR_FLUX_OMEGA_TOP
     &                  +bioac(i,j,k)*(1.0-DOPfraction)*
./pkg/dic/car_flux_omega_top.F 89 CAR_FLUX_OMEGA_TOP
     &           (1.0-DOPfraction)*drF(k)*hFacC(i,j,k,bi,bj)
./pkg/dic/dic_biotic_forcing.F 230 DIC_BIOTIC_FORCING
     &                    (1. _d 0-DOPfraction)
./pkg/dic/dic_biotic_forcing.F 285 DIC_BIOTIC_FORCING
           GDOP(i,j,k)=+BIOac(i,j,k)*DOPfraction - RDOP(i,j,k)
./pkg/dic/dic_readparms.F 110 DIC_READPARMS
       DOPfraction = 0.67 _d 0
./pkg/dic/dic_readparms.F 220 DIC_READPARMS
       CALL WRITE_0D_RL( DOPfraction, INDEX_NONE,'DOPfraction =',
./pkg/dic/dic_readparms.F 88 DIC_READPARMS
     & DOPfraction, KDOPRemin, KRemin, zcrit,
./pkg/dic/phos_flux.F 71 PHOS_FLUX
           pflux(i,j,k)=pflux(i,j,k)+BIOac(i,j,k)*(1. _d 0-DOPfraction) 
./pkg/dic/phos_flux.F 73 PHOS_FLUX
           pflux(i,j,k)=pflux(i,j,k)+BIOac(i,j,k)*(1. _d 0-DOPfraction)
./pkg/dic/phos_flux.F 76 PHOS_FLUX
           bexport(i,j)=BIOac(i,j,k)*(1. _d 0-DOPfraction)