| File |
Line number |
Procedure |
Code |
|
./pkg/monitor/mon_ke.F |
173 |
MON_KE |
abFac1 = 0. _d 0 |
|
./pkg/monitor/mon_ke.F |
179 |
MON_KE |
IF ( myIter.GE.1 ) abFac1 = -( alph_AB + abFac2 ) |
|
./pkg/monitor/mon_ke.F |
181 |
MON_KE |
IF ( myIter.GE.1 ) abFac1 = -( 0.5 _d 0 + abEps ) |
|
./pkg/monitor/mon_ke.F |
195 |
MON_KE |
tmpVal = abFac1*guNm(i,j,k,bi,bj,m1) |
|
./pkg/monitor/mon_ke.F |
198 |
MON_KE |
tmpVal = abFac1*guNm1(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
234 |
MON_KE |
tmpVal = abFac1*gvNm(i,j,k,bi,bj,m1) |
|
./pkg/monitor/mon_ke.F |
237 |
MON_KE |
tmpVal = abFac1*gvNm1(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
37 |
MON_KE |
_RL abFac1, abFac2, R_drK, cosLat |