| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1362 |
TRBFLX |
_RL RIB(irun), ZETA(irun), WS(irun) |
|
./pkg/fizhi/fizhi_turb.F |
1712 |
TRBFLX |
ZETA(I) = ZETASAVE(I) |
|
./pkg/fizhi/fizhi_turb.F |
1730 |
TRBFLX |
XXZETA(I) = XX(I)-ZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
1768 |
TRBFLX |
9 CT,RIB,ZETA,WS, |
|
./pkg/fizhi/fizhi_turb.F |
2053 |
TRBFLX |
ZETAIN(I) = ZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
2293 |
TRBFLX |
ZETASAVE(I) = ZETA(I) |
|
./pkg/seaice/SEAICE.h |
86 |
NO PROCEDURE |
& ETA,etaZ,ZETA,zetaZ,PRESS, e11, e22, e12, deltaC, |
|
./pkg/seaice/SEAICE.h |
91 |
NO PROCEDURE |
_RL ZETA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/lsr.F |
210 |
LSR |
ZETA(I,J,bi,bj) = 0.5 _d 0*PRESS0(I,J,bi,bj)/DELT2 |
|
./pkg/seaice/lsr.F |
212 |
LSR |
ZETA(I,J,bi,bj) = MIN(ZMAX(I,J,bi,bj),ZETA(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
213 |
LSR |
ZETA(I,J,bi,bj) = MAX(ZMIN(I,J,bi,bj),ZETA(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
215 |
LSR |
ZETA(I,J,bi,bj) = ZETA(I,J,bi,bj)*HEFFM(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
216 |
LSR |
ETA(I,J,bi,bj) = ECM2*ZETA(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
217 |
LSR |
PRESS(I,J,bi,bj) = 2.0 _d 0*ZETA(I,J,bi,bj)*DELT2 |
|
./pkg/seaice/lsr.F |
704 |
LSR |
etaPlusZeta(I,J,bi,bj) = ETA(I,J,bi,bj)+ZETA(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
705 |
LSR |
zetaMinusEta(I,J,bi,bj) = ZETA(I,J,bi,bj)-ETA(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
714 |
LSR |
& ZETA(I,J-1,bi,bj) + ZETA(I-1,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
715 |
LSR |
& +ZETA(I,J ,bi,bj) + ZETA(I-1,J ,bi,bj)) |
|
./pkg/seaice/seaice_init_varia.F |
278 |
SEAICE_INIT_VARIA |
ZETA(i,j,bi,bj) = 0. _d 0 |
|
./pkg/seaice/seaice_init_varia.F |
676 |
SEAICE_INIT_VARIA |
ZETA(i,j,bi,bj) = HEFF(i,j,bi,bj)*(1.0 _d 11) |
|
./pkg/seaice/seaice_init_varia.F |
677 |
SEAICE_INIT_VARIA |
ETA(i,j,bi,bj) = ZETA(i,j,bi,bj)/SEAICE_eccen**2 |
|
./pkg/seaice/seaice_lsr.F |
356 |
SEAICE_LSR |
etaPlusZeta (I,J,bi,bj) = ETA (I,J,bi,bj)+ZETA(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
357 |
SEAICE_LSR |
zetaMinusEta(I,J,bi,bj) = ZETA(I,J,bi,bj)-ETA (I,J,bi,bj) |
|
./pkg/autodiff/autodiff_restore.F |
475 |
AUTODIFF_RESTORE |
ZETA(I,J,bi,bj) = StoreSEAICE(I,J,bi,bj,9) |
|
./pkg/autodiff/autodiff_store.F |
581 |
AUTODIFF_STORE |
StoreSEAICE(I,J,bi,bj,9) = ZETA(I,J,bi,bj) |