File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE.h |
123 |
NO PROCEDURE |
& seaiceMassC, seaiceMassU, seaiceMassV |
./pkg/seaice/SEAICE.h |
124 |
NO PROCEDURE |
_RL seaiceMassC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_calc_lhs.F |
156 |
SEAICE_CALC_LHS |
& seaiceMassC(I ,J,bi,bj) * _fCori(I ,J,bi,bj) |
./pkg/seaice/seaice_calc_lhs.F |
158 |
SEAICE_CALC_LHS |
& + seaiceMassC(I-1,J,bi,bj) * _fCori(I-1,J,bi,bj) |
./pkg/seaice/seaice_calc_lhs.F |
163 |
SEAICE_CALC_LHS |
& seaiceMassC(I,J ,bi,bj) * _fCori(I,J ,bi,bj) |
./pkg/seaice/seaice_calc_lhs.F |
165 |
SEAICE_CALC_LHS |
& + seaiceMassC(I,J-1,bi,bj) * _fCori(I,J-1,bi,bj) |
./pkg/seaice/seaice_dynsolver.F |
116 |
SEAICE_DYNSOLVER |
seaiceMassC(I,J,bi,bj)=SEAICE_rhoIce*HEFF(i,j,bi,bj) |
./pkg/seaice/seaice_dynsolver.F |
126 |
SEAICE_DYNSOLVER |
seaiceMassC(I,J,bi,bj)=seaiceMassC(I,J,bi,bj) |
./pkg/seaice/seaice_evp.F |
437 |
SEAICE_EVP |
& * EVPcFac / MAX(seaiceMassC(I,J,bi,bj), 1.D-04) |
./pkg/seaice/seaice_evp.F |
806 |
SEAICE_EVP |
& seaiceMassC(I ,J,bi,bj) * _fCori(I ,J,bi,bj) |
./pkg/seaice/seaice_evp.F |
808 |
SEAICE_EVP |
& + seaiceMassC(I-1,J,bi,bj) * _fCori(I-1,J,bi,bj) |
./pkg/seaice/seaice_evp.F |
812 |
SEAICE_EVP |
& seaiceMassC(I,J ,bi,bj) * _fCori(I,J ,bi,bj) |
./pkg/seaice/seaice_evp.F |
814 |
SEAICE_EVP |
& + seaiceMassC(I,J-1,bi,bj) * _fCori(I,J-1,bi,bj) |
./pkg/seaice/seaice_init_varia.F |
282 |
SEAICE_INIT_VARIA |
seaiceMassC(i,j,bi,bj)=0. _d 0 |
./pkg/seaice/seaice_init_varia.F |
430 |
SEAICE_INIT_VARIA |
seaiceMassC(i,j,bi,bj)=1000.0 _d 0 |
./pkg/seaice/seaice_lsr.F |
408 |
SEAICE_LSR |
& ( seaiceMassC(I ,J,bi,bj) * _fCori(I ,J,bi,bj) |
./pkg/seaice/seaice_lsr.F |
410 |
SEAICE_LSR |
& + seaiceMassC(I-1,J,bi,bj) * _fCori(I-1,J,bi,bj) |
./pkg/seaice/seaice_lsr.F |
413 |
SEAICE_LSR |
& ( seaiceMassC(I,J ,bi,bj) * _fCori(I,J ,bi,bj) |
./pkg/seaice/seaice_lsr.F |
415 |
SEAICE_LSR |
& + seaiceMassC(I,J-1,bi,bj) * _fCori(I,J-1,bi,bj) |
./pkg/seaice/seaice_preconditioner.F |
525 |
SEAICE_PRECOND_RHSU |
& ( seaiceMassC(I ,J,bi,bj) * _fCori(I ,J,bi,bj) |
./pkg/seaice/seaice_preconditioner.F |
527 |
SEAICE_PRECOND_RHSU |
& + seaiceMassC(I-1,J,bi,bj) * _fCori(I-1,J,bi,bj) |
./pkg/seaice/seaice_preconditioner.F |
630 |
SEAICE_PRECOND_RHSV |
& ( seaiceMassC(I,J ,bi,bj) * _fCori(I,J ,bi,bj) |
./pkg/seaice/seaice_preconditioner.F |
632 |
SEAICE_PRECOND_RHSV |
& + seaiceMassC(I,J-1,bi,bj) * _fCori(I,J-1,bi,bj) |