| File |
Line number |
Procedure |
Code |
|
./model/src/update_etah.F |
57 |
UPDATE_ETAH |
etaHnm1(i,j,bi,bj) = etaH(i,j,bi,bj) |
|
./model/inc/SURFACE.h |
45 |
NO PROCEDURE |
COMMON /EXACT_ETA_LOCAL/ etaHnm1, dEtaHdt, PmEpR |
|
./model/inc/SURFACE.h |
46 |
NO PROCEDURE |
_RL etaHnm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
|
./model/src/ini_psurf.F |
91 |
INI_PSURF |
etaHnm1(i,j,bi,bj) = etaN(i,j,bi,bj) |
|
./model/src/checkpoint.F |
565 |
WRITE_CHECKPOINT_NOW |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL', 1,etaHnm1,nj*Nr+3, |
|
./model/src/checkpoint.F |
618 |
WRITE_CHECKPOINT_NOW |
CALL MNC_CW_RL_W('D',fn,0,0,'EtaH', etaHnm1, myThid) |