| File |
Line number |
Procedure |
Code |
|
./pkg/dic/dic_biotic_forcing.F |
169 |
DIC_BIOTIC_FORCING |
GALK(i,j,k)=+2.d0*car(i,j,k)-R_NP*bio(i,j,k) |
|
./pkg/dic/dic_biotic_forcing.F |
181 |
DIC_BIOTIC_FORCING |
GALK(i,j,1)=GALK(i,j,1)+SURA(i,j) |
|
./pkg/dic/dic_biotic_forcing.F |
201 |
DIC_BIOTIC_FORCING |
& PTR_ALK(i,j,k)+GALK(i,j,k)*dTtracerLev(k) |
|
./pkg/dic/dic_biotic_forcing.F |
75 |
DIC_BIOTIC_FORCING |
_RL GALK(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/dic/dic_biotic_forcing.F |
98 |
DIC_BIOTIC_FORCING |
GALK(i,j,k)=0.d0 |
|
./pkg/dic/alk_surfforcing.F |
39 |
ALK_SURFFORCING |
_RL GALK(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/alk_surfforcing.F |
59 |
ALK_SURFFORCING |
GALK(i,j)=gsm_ALK*surfaceForcingS(i,j,bi,bj)* |
|
./pkg/dic/alk_surfforcing.F |
66 |
ALK_SURFFORCING |
GALK(i,j)=0. _d 0 |
|
./pkg/dic/alk_surfforcing.F |
8 |
ALK_SURFFORCING |
SUBROUTINE ALK_SURFFORCING( PTR_ALK , GALK, |