| File |
Line number |
Procedure |
Code |
|
./pkg/bling/BLING_LOAD.h |
10 |
NO PROCEDURE |
& atmosp0, atmosp1, silica0, silica1, |
|
./pkg/bling/BLING_LOAD.h |
20 |
NO PROCEDURE |
_RS silica0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/bling/bling_carbonate_init.F |
57 |
BLING_CARBONATE_INIT |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
74 |
BLING_CARBONATE_INIT |
CALL READ_REC_XY_RS( BLING_silicaFile,silica0,intime0, |
|
./pkg/bling/bling_carbonate_init.F |
86 |
BLING_CARBONATE_INIT |
_EXCH_XY_RS(silica0, myThid ) |
|
./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 |
117 |
BLING_FIELDS_LOAD |
CALL READ_REC_XY_RS( BLING_silicaFile,silica0,intime0, |
|
./pkg/bling/bling_fields_load.F |
140 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(silica0, myThid ) |
|
./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 |
53 |
BLING_INI_FORCING |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/dic/DIC_LOAD.h |
11 |
NO PROCEDURE |
& atmosp1, silica0, silica1 |
|
./pkg/dic/DIC_LOAD.h |
29 |
NO PROCEDURE |
_RS silica0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/dic/dic_fields_load.F |
104 |
DIC_FIELDS_LOAD |
CALL READ_REC_XY_RS( DIC_silicaFile,silica0,intime0, |
|
./pkg/dic/dic_fields_load.F |
144 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(silica0, myThid ) |
|
./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 |
48 |
DIC_INI_FORCING |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
103 |
DIC_SURFFORCING_INIT |
SILICA(i,j,bi,bj)= bWght*silica0(i,j,bi,bj) |
|
./pkg/dic/dic_surfforcing_init.F |
65 |
DIC_SURFFORCING_INIT |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
82 |
DIC_SURFFORCING_INIT |
CALL READ_REC_XY_RS( DIC_silicaFile,silica0,intime0, |
|
./pkg/dic/dic_surfforcing_init.F |
95 |
DIC_SURFFORCING_INIT |
_EXCH_XY_RS(silica0, myThid ) |