| 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/dic/DIC_VARS.h |
27 |
NO PROCEDURE |
& ff,ft,st,bt, Ksp_TP_Calc |
|
./pkg/dic/DIC_VARS.h |
40 |
NO PROCEDURE |
_RL ft(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/dic/calcite_saturation.F |
116 |
CALCITE_SATURATION |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |
|
./pkg/dic/carbon_chem.F |
1102 |
CARBON_COEFFS_PRESSURE_DEP |
ft(i,j,bi,bj) = 0.000067 * scl/18.9984 |
|
./pkg/dic/carbon_chem.F |
1166 |
CARBON_COEFFS_PRESSURE_DEP |
ft(i,j,bi,bj) = 0.d0 |
|
./pkg/dic/carbon_chem.F |
812 |
CARBON_COEFFS |
ft(i,j,bi,bj) = 0.000067 _d 0 * scl/18.9984 _d 0 |
|
./pkg/dic/carbon_chem.F |
829 |
CARBON_COEFFS |
ft(i,j,bi,bj) = 0. _d 0 |
|
./pkg/dic/dic_surfforcing.F |
143 |
DIC_SURFFORCING |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |
|
./pkg/dic/dic_surfforcing_init.F |
154 |
DIC_SURFFORCING_INIT |
ft(i,j,bi,bj)=0. _d 0 |
|
./pkg/dic/dic_surfforcing_init.F |
224 |
DIC_SURFFORCING_INIT |
I bt(i,j,bi,bj),st(i,j,bi,bj),ft(i,j,bi,bj), |