| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1360 |
TRBFLX |
_RL XX (irun), YY(irun), CU(irun) |
|
./pkg/fizhi/fizhi_turb.F |
1767 |
TRBFLX |
8 XX,YY,CU, |
|
./pkg/fizhi/fizhi_turb.F |
1885 |
TRBFLX |
DU(I,NLEV) = CU(I)*XX(I)*AHS(I)*RVK |
|
./pkg/fizhi/fizhi_turb.F |
2048 |
TRBFLX |
CUIN(I) = CU(I) |
|
./pkg/seaice/lsr.F |
347 |
LSR |
CU(I,J,bi,bj)= ( - UXX(I ,J) - UXM(I ,J) ) |
|
./pkg/seaice/lsr.F |
365 |
LSR |
CU(I,J,bi,bj) = CU(I,J,bi,bj) * recip_rAz(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
512 |
LSR |
IF (I.EQ.sNx) AA3 = AA3 - CU(I,J,bi,bj)*uIce(I+1,J,bi,bj) |
|
./pkg/seaice/lsr.F |
527 |
LSR |
CUU(I,J)=CU(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
69 |
LSR |
_RL CU (1:sNx,1:sNy,nSx,nSy) |
|
./pkg/seaice/lsr.F |
739 |
LSR |
CU(I,J,bi,bj)=-AA1 |
|
./pkg/seaice/lsr.F |
741 |
LSR |
& - AU(I,J,bi,bj) - CU(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
752 |
LSR |
CU(sNx,J,bi,bj)=ZERO |
|
./pkg/seaice/lsr.F |
753 |
LSR |
CU(1,J,bi,bj)=CU(1,J,bi,bj)/BU(1,J,bi,bj) |
|
./pkg/seaice/lsr.F |
889 |
LSR |
CUU(I)=CU(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1013 |
SEAICE_RESIDUAL |
I AU, BU, CU, AV, BV, CV, uFld, vFld, |
|
./pkg/seaice/seaice_lsr.F |
1051 |
SEAICE_RESIDUAL |
_RL CU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1090 |
SEAICE_RESIDUAL |
& + CU(i,j,bi,bj)*uFld(i+1,j,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1140 |
SEAICE_LSR_CALC_COEFFS |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_lsr.F |
1185 |
SEAICE_LSR_CALC_COEFFS |
_RL CU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1318 |
SEAICE_LSR_CALC_COEFFS |
CU(I,J,bi,bj)= ( - UXX(I ,J) - UXM(I ,J) ) |
|
./pkg/seaice/seaice_lsr.F |
1355 |
SEAICE_LSR_CALC_COEFFS |
CU(I,J,bi,bj) = CU(I,J,bi,bj) * recip_rAw(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1725 |
SEAICE_LSR_TRIDIAGU |
I AU, BU, CU, uRt1, uRt2, rhsU, uTmp, seaiceMaskU, WFAU, |
|
./pkg/seaice/seaice_lsr.F |
1752 |
SEAICE_LSR_TRIDIAGU |
_RL CU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1800 |
SEAICE_LSR_TRIDIAGU |
IF (I.EQ.iMax) AA3 = AA3 - CU(I,J,bi,bj)*uIce(I+1,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1810 |
SEAICE_LSR_TRIDIAGU |
CUU(I,J)=CU(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
493 |
SEAICE_LSR |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_lsr.F |
505 |
SEAICE_LSR |
CU(I,J,bi,bj) = ZERO |
|
./pkg/seaice/seaice_lsr.F |
541 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
573 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce_fd, vIce_fd, |
|
./pkg/seaice/seaice_lsr.F |
626 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
727 |
SEAICE_LSR |
I AU, BU, CU, rhsUx, |
|
./pkg/seaice/seaice_lsr.F |
786 |
SEAICE_LSR |
I AU, BU, CU, uRt1, uRt2, rhsU, uTmp, seaiceMaskU, WFAU, |
|
./pkg/seaice/seaice_lsr.F |
872 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
99 |
SEAICE_LSR |
_RL CU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_preconditioner.F |
186 |
SEAICE_PRECONDITIONER |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_preconditioner.F |
198 |
SEAICE_PRECONDITIONER |
CU(I,J,bi,bj) = ZERO |
|
./pkg/seaice/seaice_preconditioner.F |
269 |
SEAICE_PRECONDITIONER |
I AU, BU, CU, AV, BV, CV, duIce, dvIce, |
|
./pkg/seaice/seaice_preconditioner.F |
334 |
SEAICE_PRECONDITIONER |
I AU, BU, CU, uRt1, uRt2, rhsU, uTmp, seaiceMaskU, WFAU, |
|
./pkg/seaice/seaice_preconditioner.F |
391 |
SEAICE_PRECONDITIONER |
I AU, BU, CU, AV, BV, CV, duIce, dvIce, |
|
./pkg/seaice/seaice_preconditioner.F |
93 |
SEAICE_PRECONDITIONER |
_RL CU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |