File |
Line number |
Procedure |
Code |
./pkg/bling/BLING_VARS.h |
15 |
NO PROCEDURE |
_RL AtmosP(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/bling/BLING_VARS.h |
9 |
NO PROCEDURE |
& AtmospCO2, AtmosP, pH, pCO2, FluxCO2, |
./pkg/bling/bling_airseaflux.F |
209 |
BLING_AIRSEAFLUX |
pCO2sat(i,j) = pCO2sat(i,j)*AtmosP(i,j,bi,bj) |
./pkg/bling/bling_airseaflux.F |
297 |
BLING_AIRSEAFLUX |
& (AtmosP(i,j,bi,bj)*O2sat(i,j) |
./pkg/bling/bling_fields_load.F |
171 |
BLING_FIELDS_LOAD |
AtmosP(i,j,bi,bj) = bWght*atmosp0(i,j,bi,bj) |
./pkg/bling/bling_ini_forcing.F |
80 |
BLING_INI_FORCING |
AtmosP(i,j,bi,bj) = 1. _d 0*maskC(i,j,1,bi,bj) |
./pkg/cfc/CFC.h |
9 |
NO PROCEDURE |
& AtmosP, |
./pkg/cfc/cfc11_surfforcing.F |
92 |
CFC11_SURFFORCING |
Csat(i,j) = SolCFC11(i,j)*AtmosP(i,j,bi,bj) |
./pkg/cfc/cfc12_surfforcing.F |
92 |
CFC12_SURFFORCING |
Csat(i,j) = SolCFC12(i,j)*AtmosP(i,j,bi,bj) |
./pkg/dic/DIC_VARS.h |
12 |
NO PROCEDURE |
& AtmospCO2, AtmosP, pH, pCO2, FluxCO2, |
./pkg/dic/DIC_VARS.h |
15 |
NO PROCEDURE |
_RL AtmosP(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/dic/dic_fields_load.F |
188 |
DIC_FIELDS_LOAD |
AtmosP(i,j,bi,bj) = bWght*atmosp0(i,j,bi,bj) |
./pkg/dic/dic_ini_forcing.F |
80 |
DIC_INI_FORCING |
AtmosP(i,j,bi,bj) = 1. _d 0*maskC(i,j,1,bi,bj) |
./pkg/dic/dic_surfforcing.F |
140 |
DIC_SURFFORCING |
AtmosP(i,j,bi,bj)= 1. _d 0 + pLoad(i,j,bi,bj)/Pa2Atm |
./pkg/dic/dic_surfforcing.F |
195 |
DIC_SURFFORCING |
& AtmosP(i,j,bi,bj)*AtmospCO2(i,j,bi,bj) |
./pkg/dic/o2_surfforcing.F |
111 |
O2_SURFFORCING |
& (AtmosP(i,j,bi,bj)*O2sat(i,j) |