| File |
Line number |
Procedure |
Code |
|
./model/inc/SURFACE.h |
44 |
NO PROCEDURE |
COMMON /EXACT_ETA_LOCAL/ etaHnm1, dEtaHdt, PmEpR |
|
./model/inc/SURFACE.h |
45 |
NO PROCEDURE |
_RL etaHnm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
|
./model/src/ini_psurf.F |
89 |
INI_PSURF |
etaHnm1(i,j,bi,bj) = etaN(i,j,bi,bj) |
|
./model/src/update_etah.F |
57 |
UPDATE_ETAH |
etaHnm1(i,j,bi,bj) = etaH(i,j,bi,bj) |
|
./model/src/write_pickup.F |
291 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, etaHnm1, nj, myIter, myThid ) |
|
./model/src/write_pickup.F |
352 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'EtaH', etaHnm1, myThid) |