File |
Line number |
Procedure |
Code |
./pkg/bling/BLING_VARS.h |
34 |
NO PROCEDURE |
& ak1p,ak2p,ak3p,aksi, fugf, |
./pkg/bling/BLING_VARS.h |
49 |
NO PROCEDURE |
_RL fugf(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/bling/bling_airseaflux.F |
171 |
BLING_AIRSEAFLUX |
I ak0(i,j,bi,bj), fugf(i,j,bi,bj), |
./pkg/bling/bling_airseaflux.F |
221 |
BLING_AIRSEAFLUX |
& pCO2(i,j,bi,bj)*fugf(i,j,bi,bj) |
./pkg/bling/bling_carbon_chem.F |
1077 |
CARBON_COEFFS_PRESSURE_DEP |
fugf(i,j,bi,bj)=0.d0 |
./pkg/bling/bling_carbon_chem.F |
605 |
CARBON_COEFFS |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * |
./pkg/bling/bling_carbon_chem.F |
609 |
CARBON_COEFFS |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT) |
./pkg/bling/bling_carbon_chem.F |
704 |
CARBON_COEFFS |
fugf(i,j,bi,bj)=0. _d 0 |
./pkg/bling/bling_carbon_chem.F |
902 |
CARBON_COEFFS_PRESSURE_DEP |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * |
./pkg/bling/bling_carbon_chem.F |
906 |
CARBON_COEFFS_PRESSURE_DEP |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT) |
./pkg/bling/bling_carbonate_init.F |
138 |
BLING_CARBONATE_INIT |
fugf(i,j,bi,bj)=0. _d 0 |
./pkg/bling/bling_carbonate_init.F |
206 |
BLING_CARBONATE_INIT |
I ak0(i,j,bi,bj), fugf(i,j,bi,bj), |
./pkg/bling/bling_carbonate_sys.F |
138 |
BLING_CARBONATE_SYS |
I ak0(i,j,bi,bj), fugf(i,j,bi,bj), ff(i,j,bi,bj), |
./pkg/dic/DIC_VARS.h |
26 |
NO PROCEDURE |
& ak1p,ak2p,ak3p,aksi, fugf, |
./pkg/dic/DIC_VARS.h |
41 |
NO PROCEDURE |
_RL fugf(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/dic/calcite_saturation.F |
116 |
CALCITE_SATURATION |
I ak0(i,j,bi,bj), fugf(i,j,bi,bj), ff(i,j,bi,bj), |
./pkg/dic/carbon_chem.F |
615 |
CARBON_COEFFS |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT) |
./pkg/dic/carbon_chem.F |
708 |
CARBON_COEFFS |
fugf(i,j,bi,bj)=0. _d 0 |
./pkg/dic/dic_surfforcing.F |
167 |
DIC_SURFFORCING |
I ak0(i,j,bi,bj), fugf(i,j,bi,bj), |
./pkg/dic/dic_surfforcing.F |
218 |
DIC_SURFFORCING |
& pCO2(i,j,bi,bj)*fugf(i,j,bi,bj) |
./pkg/dic/dic_surfforcing_init.F |
145 |
DIC_SURFFORCING_INIT |
fugf(i,j,bi,bj)=0. _d 0 |
./pkg/dic/dic_surfforcing_init.F |
237 |
DIC_SURFFORCING_INIT |
I ak0(i,j,bi,bj), fugf(i,j,bi,bj), |