File |
Line number |
Procedure |
Code |
./pkg/dic/dic_biotic_forcing.F |
162 |
DIC_BIOTIC_FORCING |
bio(i,j,k)=-bioac(i,j,k)+pflux(i,j,k) |
./pkg/dic/dic_biotic_forcing.F |
166 |
DIC_BIOTIC_FORCING |
GPO4(i,j,k)=bio(i,j,k) |
./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 |
170 |
DIC_BIOTIC_FORCING |
GDIC(i,j,k)=car(i,j,k)+R_CP*bio(i,j,k) |
./pkg/dic/dic_biotic_forcing.F |
172 |
DIC_BIOTIC_FORCING |
GO2(i,j,k)=R_OP*bio(i,j,k) |
./pkg/dic/dic_biotic_forcing.F |
177 |
DIC_BIOTIC_FORCING |
GFE(i,j,k)=R_FeP*bio(i,j,k) |