File |
Line number |
Procedure |
Code |
./model/src/convect.F |
70 |
CONVECT |
& *_hFacC(i,j,k-1,bi,bj)*drF(k-1) |
./model/src/convect.F |
72 |
CONVECT |
& *_hFacC(i,j,k,bi,bj)*drF(k) |
./model/src/convect.F |
74 |
CONVECT |
& *_hFacC(i,j,k-1,bi,bj)*drF(k-1) |
./model/src/convect.F |
76 |
CONVECT |
& *_hFacC(i,j,k,bi,bj)*drF(k) |
./model/src/convect.F |
77 |
CONVECT |
dSum(i,j) = _hFacC(i,j,k-1,bi,bj)*drF(k-1) |
./model/src/convect.F |
78 |
CONVECT |
& +_hFacC(i,j,k,bi,bj)*drF(k) |
./model/src/convect.F |
85 |
CONVECT |
IF ( _hFacC(i,j,k,bi,bj) .GT. 0. .AND. |
./pkg/seaice/seaice_init.F |
123 |
SEAICE_INIT |
IF (_hFacC(i,j,1,bi,bj).eq.0.) HEFFM(i,j,bi,bj)=ZERO |