| File |
Line number |
Procedure |
Code |
|
./pkg/mom_fluxform/mom_u_del2u.F |
53 |
MOM_U_DEL2U |
& *_dyF(i,j,bi,bj) |
|
./pkg/mom_fluxform/mom_u_xviscflux.F |
57 |
MOM_U_XVISCFLUX |
& _dyF(i,j,bi,bj)*drF(k)*_hFacC(i,j,k,bi,bj) |
|
./pkg/seaice/advect.F |
178 |
ADVECT |
& DIFF1*MIN( _dxF(I,J,bi,bj), _dyF(I,J,bi,bj)) |
|
./pkg/seaice/advect.F |
190 |
ADVECT |
& -(MIN( _dxF(I,J,bi,bj), _dyF(I,J,bi,bj)))**2/DELTT |
|
./pkg/seaice/seaice_diffusion.F |
98 |
SEAICE_DIFFUSION |
& *MIN( _dxF(I,J,bi,bj), _dyF(I,J,bi,bj)) |
|
./pkg/seaice/seaice_evp.F |
390 |
SEAICE_EVP |
& ( sig11(I ,J ) * _dyF(I ,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
391 |
SEAICE_EVP |
& - sig11(I-1,J ) * _dyF(I-1,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
323 |
SEAICE_LSR |
UXX(I,J,bi,bj) = _dyF(I,J,bi,bj) * etaPlusZeta(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
326 |
SEAICE_LSR |
UXM(I,J,bi,bj) = _dyF(I,J,bi,bj) * zetaMinusEta(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
479 |
SEAICE_LSR |
& ( _dyF(I ,J ,bi,bj)*sig11(I ,J ) |
|
./pkg/seaice/seaice_lsr.F |
480 |
SEAICE_LSR |
& - _dyF(I-1,J ,bi,bj)*sig11(I-1,J ) |
|
./pkg/seaice/seaice_lsr.F |
918 |
SEAICE_LSR |
& ( sig11(I ,J ) * _dyF(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
919 |
SEAICE_LSR |
& - sig11(I-1,J ) * _dyF(I-1,J ,bi,bj) |