File |
Line number |
Procedure |
Code |
./pkg/bling/bling_airseaflux.F |
123 |
BLING_AIRSEAFLUX |
surfsi(i,j) = SILICA(i,j,bi,bj) * maskC(i,j,1,bi,bj) |
./pkg/bling/bling_carbonate_init.F |
94 |
BLING_CARBONATE_INIT |
SILICA(i,j,bi,bj)= bWght*silica0(i,j,bi,bj) |
./pkg/bling/bling_fields_load.F |
180 |
BLING_FIELDS_LOAD |
SILICA(i,j,bi,bj) = bWght*silica0(i,j,bi,bj) |
./pkg/bling/bling_ini_forcing.F |
81 |
BLING_INI_FORCING |
SILICA(i,j,bi,bj) = 7.6838 _d -3*maskC(i,j,1,bi,bj) |
./pkg/dic/dic_fields_load.F |
197 |
DIC_FIELDS_LOAD |
SILICA(i,j,bi,bj) = bWght*silica0(i,j,bi,bj) |
./pkg/dic/dic_ini_forcing.F |
81 |
DIC_INI_FORCING |
SILICA(i,j,bi,bj) = 7.6838 _d -3*maskC(i,j,1,bi,bj) |
./pkg/dic/dic_surfforcing.F |
109 |
DIC_SURFFORCING |
surfsi(i,j) = SILICA(i,j,bi,bj) * maskC(i,j,kLev,bi,bj) |
./pkg/dic/dic_surfforcing_init.F |
103 |
DIC_SURFFORCING_INIT |
SILICA(i,j,bi,bj)= bWght*silica0(i,j,bi,bj) |