File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_evp.F |
157 |
SEAICE_EVP |
_RL resTile(nSx,nSy) |
./pkg/seaice/seaice_evp.F |
683 |
SEAICE_EVP |
resTile(bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_evp.F |
704 |
SEAICE_EVP |
resTile(bi,bj) = resTile(bi,bj) + AREA(i,j,bi,bj) * |
./pkg/seaice/seaice_evp.F |
714 |
SEAICE_EVP |
resTile(bi,bj) = resTile(bi,bj) |
./pkg/seaice/seaice_evp.F |
724 |
SEAICE_EVP |
CALL GLOBAL_SUM_TILE_RL( resTile, resloc, myThid ) |
./pkg/seaice/seaice_evp.F |
923 |
SEAICE_EVP |
resTile(bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_evp.F |
938 |
SEAICE_EVP |
resTile(bi,bj) = resTile(bi,bj) + AREA(i,j,bi,bj) * |
./pkg/seaice/seaice_evp.F |
946 |
SEAICE_EVP |
resTile(bi,bj) = resTile(bi,bj) |
./pkg/seaice/seaice_evp.F |
955 |
SEAICE_EVP |
CALL GLOBAL_SUM_TILE_RL( resTile, resloc, myThid ) |