| File |
Line number |
Procedure |
Code |
|
./pkg/dic/calcite_saturation.F |
127 |
CALCITE_SATURATION |
omegaC(i,j,k,bi,bj) = calcium * carbonate / |
|
./pkg/dic/calcite_saturation.F |
155 |
CALCITE_SATURATION |
omegaC(i,j,k,bi,bj) = 0.0d0 |
|
./pkg/dic/DIC_BIOTIC.h |
13 |
NO PROCEDURE |
& alpha, rain_ratio, InputFe, omegaC, pHlast, |
|
./pkg/dic/DIC_BIOTIC.h |
42 |
NO PROCEDURE |
_RL omegaC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) |
|
./pkg/dic/car_flux_omega_top.F |
101 |
CAR_FLUX_OMEGA_TOP |
if (omegaC(i,j,ko,bi,bj) .gt. 1.0) then |
|
./pkg/dic/car_flux_omega_top.F |
119 |
CAR_FLUX_OMEGA_TOP |
KierRate = 7.177* ((1.0-omegaC(i,j,ko,bi,bj))**4.54) |
|
./pkg/dic/car_flux_omega_top.F |
157 |
CAR_FLUX_OMEGA_TOP |
if (iflx.eq.1.and.omegaC(i,j,k,bi,bj) .gt. 1.d0) then |