| File |
Line number |
Procedure |
Code |
|
./pkg/dic/dic_surfforcing.F |
143 |
DIC_SURFFORCING |
Kwexch(i,j) = |
|
./pkg/dic/dic_surfforcing.F |
157 |
DIC_SURFFORCING |
& maskC(i,j,kLev,bi,bj)*Kwexch(i,j)*( |
|
./pkg/dic/dic_surfforcing.F |
56 |
DIC_SURFFORCING |
_RL Kwexch(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/o2_surfforcing.F |
118 |
O2_SURFFORCING |
FluxO2(i,j) = maskC(i,j,k,bi,bj)*Kwexch(i,j)* |
|
./pkg/dic/o2_surfforcing.F |
56 |
O2_SURFFORCING |
_RL Kwexch(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/dic/o2_surfforcing.F |
88 |
O2_SURFFORCING |
Kwexch(i,j) = |
|
./pkg/cfc/cfc12_surfforcing.F |
40 |
CFC12_SURFFORCING |
_RL Kwexch(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/cfc/cfc12_surfforcing.F |
75 |
CFC12_SURFFORCING |
Kwexch(i,j) = (1.0 - fice(i,j,bi,bj))*pisvel(i,j,bi,bj) |
|
./pkg/cfc/cfc12_surfforcing.F |
78 |
CFC12_SURFFORCING |
& Kwexch(i,j)*(Csat(i,j) - PTR_CFC12(i,j,1)) |
|
./pkg/cfc/cfc11_surfforcing.F |
40 |
CFC11_SURFFORCING |
_RL Kwexch(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/cfc/cfc11_surfforcing.F |
75 |
CFC11_SURFFORCING |
Kwexch(i,j) = (1.0 - fice(i,j,bi,bj))*pisvel(i,j,bi,bj) |
|
./pkg/cfc/cfc11_surfforcing.F |
78 |
CFC11_SURFFORCING |
& Kwexch(i,j)*(Csat(i,j) - PTR_CFC11(i,j,1)) |