| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
45 |
NO PROCEDURE |
COMMON/ARRAYCMETRIC/ k1AtC, k1AtZ, k2AtC, k2AtZ |
|
./pkg/seaice/SEAICE.h |
48 |
NO PROCEDURE |
_RS k2AtC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/SEAICE.h |
56 |
NO PROCEDURE |
& k1AtC, k1AtU, k1AtV, k2AtC, k2AtU, k2AtV |
|
./pkg/seaice/SEAICE.h |
60 |
NO PROCEDURE |
_RS k2AtC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/lsr.F |
184 |
LSR |
& + vcLoc(I,J,bi,bj) * k2AtC(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
197 |
LSR |
& - ucLoc(I,J,bi,bj)*k2AtC(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_calc_strainrates.F |
112 |
SEAICE_CALC_STRAINRATES |
e11Loc(i,j,bi,bj) = dudx(i,j) + vave(i,j) * k2AtC(i,j,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
109 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = - _tanPhiAtU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
132 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = _recip_dxF(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
151 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = 0.0 _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
165 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = - _tanPhiAtU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
196 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = _recip_dxF(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
96 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = 0.0 _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1231 |
SEAICE_LSR_CALC_COEFFS |
& * k2AtC(I,J,bi,bj) * 0.5 _d 0 |
|
./pkg/seaice/seaice_lsr.F |
1426 |
SEAICE_LSR_RHSU |
& + etaPlusZeta(I,J,bi,bj) * k2AtC(I,J,bi,bj) |
|
./pkg/seaice/seaice_preconditioner.F |
483 |
SEAICE_PRECOND_RHSU |
& + etaPlusZeta(I,J,bi,bj) * k2AtC(I,J,bi,bj) |