File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_swrad.F |
1013 |
CLDSCALE |
_RL fm,ft,fa,xai,taux |
./pkg/fizhi/fizhi_swrad.F |
1097 |
CLDSCALE |
ft=(log10(taux)-t1)/dt |
./pkg/fizhi/fizhi_swrad.F |
1101 |
CLDSCALE |
it=int(ft+1.5) |
./pkg/fizhi/fizhi_swrad.F |
1113 |
CLDSCALE |
ft=ft-float(it-1) |
./pkg/fizhi/fizhi_swrad.F |
1123 |
CLDSCALE |
xai=xai+(-caib(im,it-1,ia)*(1.-ft)+ |
./pkg/fizhi/fizhi_swrad.F |
1124 |
CLDSCALE |
* caib(im,it+1,ia)*(1.+ft))*ft*.5+caib(im,it,ia)*(1.-ft*ft) |
./pkg/fizhi/fizhi_swrad.F |
1138 |
CLDSCALE |
xai= (-caif(it-1,ia)*(1.-ft)+ |
./pkg/fizhi/fizhi_swrad.F |
1139 |
CLDSCALE |
* caif(it+1,ia)*(1.+ft))*ft*.5+caif(it,ia)*(1.-ft*ft) |
./pkg/bling/BLING_VARS.h |
35 |
NO PROCEDURE |
& ff,ft,st,bt, |
./pkg/bling/BLING_VARS.h |
50 |
NO PROCEDURE |
_RL ft(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/bling/bling_airseaflux.F |
173 |
BLING_AIRSEAFLUX |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |
./pkg/bling/bling_carbon_chem.F |
1020 |
CARBON_COEFFS_PRESSURE_DEP |
ft(i,j,bi,bj) = 0.000067 * scl/18.9984 |
./pkg/bling/bling_carbon_chem.F |
1092 |
CARBON_COEFFS_PRESSURE_DEP |
ft(i,j,bi,bj) = 0.d0 |
./pkg/bling/bling_carbon_chem.F |
700 |
CARBON_COEFFS |
ft(i,j,bi,bj) = 0.000067 _d 0 * scl/18.9984 _d 0 |
./pkg/bling/bling_carbon_chem.F |
719 |
CARBON_COEFFS |
ft(i,j,bi,bj) = 0. _d 0 |
./pkg/bling/bling_carbonate_init.F |
140 |
BLING_CARBONATE_INIT |
ft(i,j,bi,bj)=0. _d 0 |
./pkg/bling/bling_carbonate_init.F |
208 |
BLING_CARBONATE_INIT |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |
./pkg/bling/bling_carbonate_sys.F |
139 |
BLING_CARBONATE_SYS |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |
./pkg/dic/DIC_VARS.h |
27 |
NO PROCEDURE |
& ff,ft,st,bt, Ksp_TP_Calc |
./pkg/dic/DIC_VARS.h |
42 |
NO PROCEDURE |
_RL ft(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/dic/calcite_saturation.F |
117 |
CALCITE_SATURATION |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |
./pkg/dic/carbon_chem.F |
1060 |
CARBON_COEFFS_PRESSURE_DEP |
ft(i,j,bi,bj) = 0.d0 |
./pkg/dic/carbon_chem.F |
704 |
CARBON_COEFFS |
ft(i,j,bi,bj) = 0.000067 _d 0 * scl/18.9984 _d 0 |
./pkg/dic/carbon_chem.F |
723 |
CARBON_COEFFS |
ft(i,j,bi,bj) = 0. _d 0 |
./pkg/dic/carbon_chem.F |
996 |
CARBON_COEFFS_PRESSURE_DEP |
ft(i,j,bi,bj) = 0.000067 * scl/18.9984 |
./pkg/dic/dic_surfforcing.F |
169 |
DIC_SURFFORCING |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |
./pkg/dic/dic_surfforcing_init.F |
147 |
DIC_SURFFORCING_INIT |
ft(i,j,bi,bj)=0. _d 0 |
./pkg/dic/dic_surfforcing_init.F |
239 |
DIC_SURFFORCING_INIT |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |