| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_evp.F |
128 |
SEAICE_EVP |
vIceC(I,J,bi,bj) = vIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
176 |
SEAICE_EVP |
I uIceC, vIceC, |
|
./pkg/seaice/seaice_evp.F |
433 |
SEAICE_EVP |
& +(vIceC(I,J ,bi,bj)-vVel(I,J ,kSrf,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
434 |
SEAICE_EVP |
& + vIceC(I,J+1,bi,bj)-vVel(I,J+1,kSrf,bi,bj))**2) |
|
./pkg/seaice/seaice_evp.F |
463 |
SEAICE_EVP |
& (vVel(I ,J ,kSrf,bi,bj)-vIceC(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
464 |
SEAICE_EVP |
& +vVel(I ,J+1,kSrf,bi,bj)-vIceC(I ,J+1,bi,bj)) |
|
./pkg/seaice/seaice_evp.F |
466 |
SEAICE_EVP |
& (vVel(I-1,J ,kSrf,bi,bj)-vIceC(I-1,J ,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
467 |
SEAICE_EVP |
& +vVel(I-1,J+1,kSrf,bi,bj)-vIceC(I-1,J+1,bi,bj)) |
|
./pkg/seaice/seaice_evp.F |
483 |
SEAICE_EVP |
& * 0.5 _d 0*( vIceC(I ,J,bi,bj)+vIceC(I ,J+1,bi,bj) ) |
|
./pkg/seaice/seaice_evp.F |
485 |
SEAICE_EVP |
& * 0.5 _d 0*( vIceC(I-1,J,bi,bj)+vIceC(I-1,J+1,bi,bj) ) |
|
./pkg/seaice/seaice_evp.F |
508 |
SEAICE_EVP |
vIceC(I,J,bi,bj) = seaiceMaskV(I,J,bi,bj) * |
|
./pkg/seaice/seaice_evp.F |
510 |
SEAICE_EVP |
& * vIceC(I,J,bi,bj) |
|
./pkg/seaice/seaice_evp.F |
526 |
SEAICE_EVP |
CALL EXCH_UV_XY_RL(uIceC,vIceC,.TRUE.,myThid) |
|
./pkg/seaice/seaice_evp.F |
538 |
SEAICE_EVP |
vIce(I,J,bi,bj)=vIceC(I,J,bi,bj)* _maskS(I,J,kSrf,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1038 |
SEAICE_LSR |
I uIceC, vIceC, |
|
./pkg/seaice/seaice_lsr.F |
1055 |
SEAICE_LSR |
& +(vIceC(I,J ,bi,bj)-vVel(I,J ,1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1056 |
SEAICE_LSR |
& +vIceC(I,J+1,bi,bj)-vVel(I,J+1,1,bi,bj))**2) |
|
./pkg/seaice/seaice_lsr.F |
1085 |
SEAICE_LSR |
& 0.5 _d 0 * (vVel(I ,J ,1,bi,bj)-vIceC(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1086 |
SEAICE_LSR |
& +vVel(I ,J+1,1,bi,bj)-vIceC(I ,J+1,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
1088 |
SEAICE_LSR |
& 0.5 _d 0 * (vVel(I-1,J ,1,bi,bj)-vIceC(I-1,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1089 |
SEAICE_LSR |
& +vVel(I-1,J+1,1,bi,bj)-vIceC(I-1,J+1,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
1250 |
SEAICE_LSR |
dVdy(I,J) = ( vIceC(I,J+1,bi,bj) - vIceC(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
1256 |
SEAICE_LSR |
dVdx(I,J) = ( vIceC(I,J,bi,bj) - vIceC(I-1,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
1269 |
SEAICE_LSR |
& + ( vIceC(I,J,bi,bj) + vIceC(I-1,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
1280 |
SEAICE_LSR |
& *0.5 _d 0*( vIceC( i ,j,bi,bj)+vIceC( i ,j+1,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
1282 |
SEAICE_LSR |
& *0.5 _d 0*( vIceC(i-1,j,bi,bj)+vIceC(i-1,j+1,bi,bj) ) ) |
|
./pkg/seaice/seaice_lsr.F |
1297 |
SEAICE_LSR |
& * 0.5 _d 0 * (vIceC(I ,J,bi,bj)+vIceC(I ,J+1,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
1299 |
SEAICE_LSR |
& * 0.5 _d 0 * (vIceC(I-1,J,bi,bj)+vIceC(I-1,J+1,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
156 |
SEAICE_LSR |
vIceC(I,J,bi,bj)=vIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
176 |
SEAICE_LSR |
vIceC(I,J,bi,bj)=vIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
207 |
SEAICE_LSR |
I uIceC, vIceC, |
|
./pkg/seaice/seaice_lsr.F |
224 |
SEAICE_LSR |
& +(vIceC(I,J ,bi,bj)-vVel(I,J ,kSrf,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
225 |
SEAICE_LSR |
& +vIceC(I,J+1,bi,bj)-vVel(I,J+1,kSrf,bi,bj))**2) |
|
./pkg/seaice/seaice_lsr.F |
254 |
SEAICE_LSR |
& (vVel(I ,J ,kSrf,bi,bj)-vIceC(I ,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
255 |
SEAICE_LSR |
& +vVel(I ,J+1,kSrf,bi,bj)-vIceC(I ,J+1,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
257 |
SEAICE_LSR |
& (vVel(I-1,J ,kSrf,bi,bj)-vIceC(I-1,J ,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
258 |
SEAICE_LSR |
& +vVel(I-1,J+1,kSrf,bi,bj)-vIceC(I-1,J+1,bi,bj)) |
|
./pkg/seaice/seaice_lsr.F |
440 |
SEAICE_LSR |
& * ( vIceC(I,J+1,bi,bj) - vIceC(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
443 |
SEAICE_LSR |
& * 0.5 _d 0 * ( vIceC(I,J+1,bi,bj) + vIceC(I,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
452 |
SEAICE_LSR |
& ( vIceC(I,J,bi,bj) - vIceC(I-1,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
455 |
SEAICE_LSR |
& * 0.5 _d 0 * ( vIceC(I,J,bi,bj) + vIceC(I-1,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
464 |
SEAICE_LSR |
& * ( vIceC(I,J,bi,bj) + vIceC(I-1,J,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
474 |
SEAICE_LSR |
& *0.5 _d 0*( vIceC( i ,j,bi,bj)+vIceC( i ,j+1,bi,bj) ) |
|
./pkg/seaice/seaice_lsr.F |
476 |
SEAICE_LSR |
& *0.5 _d 0*( vIceC(i-1,j,bi,bj)+vIceC(i-1,j+1,bi,bj) ) ) |
|
./pkg/seaice/seaice_lsr.F |
979 |
SEAICE_LSR |
vIceC(I,J,bi,bj)=vIce(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
999 |
SEAICE_LSR |
vIceC(I,J,bi,bj)=vIce(I,J,bi,bj) |