| Symbol | Description | Uses |
| nthini | 4 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/fizhi_gwdrag.F | 101 | GWDRAG |
do nthini = 1,Lm+1 |
| ./pkg/fizhi/fizhi_gwdrag.F | 102 | GWDRAG |
if( pz(i,j)-ple(i,j,Lm+2-nthini).gt.25. ) then |
| ./pkg/fizhi/fizhi_gwdrag.F | 103 | GWDRAG |
nthin(i,j) = nthini |
| ./pkg/fizhi/fizhi_gwdrag.F | 67 | GWDRAG |
integer nthini, nbasei |