Symbol Description Uses
zbase depth of bottom of current productive layer 8


File Line number Procedure Code
./pkg/dic/car_flux.F 54 CAR_FLUX 
       _RL zbase
./pkg/dic/car_flux.F 66 CAR_FLUX 
           zbase=-rF(k+1)
./pkg/dic/car_flux.F 72 CAR_FLUX 
             flux_u=caexport(i,j)*exp(-(depth_u-zbase)/zca)
./pkg/dic/car_flux.F 80 CAR_FLUX 
                 flux_l=caexport(i,j)*exp(-(depth_l-zbase)/zca)
./pkg/dic/phos_flux.F 51 PHOS_FLUX 
       _RL  zbase
./pkg/dic/phos_flux.F 69 PHOS_FLUX 
           zbase=-rF(k+1)
./pkg/dic/phos_flux.F 76 PHOS_FLUX 
              flux_u=bexport(i,j)*((depth_u/zbase)**(-Kremin))
./pkg/dic/phos_flux.F 84 PHOS_FLUX 
                   flux_l=bexport(i,j)*((depth_l/zbase)**(-Kremin))