| File |
Line number |
Procedure |
Code |
|
./pkg/ggl90/ggl90_calc.F |
103 |
GGL90_CALC |
_RL c(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/ggl90/ggl90_calc.F |
477 |
GGL90_CALC |
c(i,j,1) = 0. _d 0 |
|
./pkg/ggl90/ggl90_calc.F |
487 |
GGL90_CALC |
c(i,j,k) = -deltaTggl90 |
|
./pkg/ggl90/ggl90_calc.F |
499 |
GGL90_CALC |
b(i,j,k) = 1. _d 0 - c(i,j,k) - a(i,j,k) |
|
./pkg/ggl90/ggl90_calc.F |
528 |
GGL90_CALC |
& - GGL90TKEbottom*c(i,j,kBottom) |
|
./pkg/ggl90/ggl90_calc.F |
529 |
GGL90_CALC |
c(i,j,kBottom) = 0. _d 0 |
|
./pkg/ggl90/ggl90_calc.F |
535 |
GGL90_CALC |
I a, b, c, |
|
./pkg/ptracers/PTRACERS_MOD.h |
25 |
NO PROCEDURE |
PtrISt(g)som_P(a,b,c,d,e,f) |
|
./pkg/smooth/smooth_impldiff.F |
104 |
SMOOTH_IMPLDIFF |
c(i,j,Nr) = 0. _d 0 |
|
./pkg/smooth/smooth_impldiff.F |
112 |
SMOOTH_IMPLDIFF |
b(i,j,k) = 1. _d 0 - c(i,j,k) - a(i,j,k) |
|
./pkg/smooth/smooth_impldiff.F |
148 |
SMOOTH_IMPLDIFF |
gam(i,j,k) = c(i,j,k-1)*bet(i,j,k-1) |
|
./pkg/smooth/smooth_impldiff.F |
56 |
SMOOTH_IMPLDIFF |
_RL c(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/smooth/smooth_impldiff.F |
94 |
SMOOTH_IMPLDIFF |
c(i,j,k) = -deltaTX*recip_hFac(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/smooth/smooth_impldiff.F |
98 |
SMOOTH_IMPLDIFF |
IF (recip_hFac(i,j,k+1,bi,bj).EQ.0.) c(i,j,k)=0. |
|
./model/src/impldiff.F |
156 |
IMPLDIFF |
c(i,j,k) = -deltaTX(k)*recip_hFac(i,j,k,bi,bj)*recip_drF(k) |
|
./model/src/impldiff.F |
160 |
IMPLDIFF |
IF (recip_hFac(i,j,k+1,bi,bj).EQ.0.) c(i,j,k)=0. |
|
./model/src/impldiff.F |
171 |
IMPLDIFF |
c(i,j,Nr) = 0. _d 0 |
|
./model/src/impldiff.F |
184 |
IMPLDIFF |
b(i,j,k) = 1. _d 0 - c(i,j,k) - a(i,j,k) |
|
./model/src/impldiff.F |
235 |
IMPLDIFF |
gam(i,j,k) = c(i,j,k-1)*bet(i,j,k-1) |
|
./model/src/impldiff.F |
66 |
IMPLDIFF |
_RL c(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/dic/carbon_chem.F |
178 |
CALC_PCO2 |
c = 1.0 + stlocal/kslocal |
|
./pkg/dic/carbon_chem.F |
196 |
CALC_PCO2 |
& x/c - |
|
./pkg/dic/carbon_chem.F |
197 |
CALC_PCO2 |
& stlocal/(1.0 + kslocal/x/c) - |
|
./pkg/dic/carbon_chem.F |
213 |
CALC_PCO2 |
& 1.0/c + |
|
./pkg/dic/carbon_chem.F |
214 |
CALC_PCO2 |
& stlocal*(1.0 + kslocal/x/c)**(-2.0)*(kslocal/c/x2) + |
|
./pkg/dic/carbon_chem.F |
250 |
CALC_PCO2 |
c = 1.0 + stlocal/kslocal |
|
./pkg/dic/carbon_chem.F |
265 |
CALC_PCO2 |
& x/c - |
|
./pkg/dic/carbon_chem.F |
266 |
CALC_PCO2 |
& stlocal/(1.0 + kslocal/x/c) - |
|
./pkg/dic/carbon_chem.F |
91 |
CALC_PCO2 |
_RL c |