| Symbol | Description | Uses |
| usubcl | 5 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/fizhi_moist.F | 101 | MOISTIO |
_RL usubcl (istrip, ntracerin+2-ptracer) |
| ./pkg/fizhi/fizhi_moist.F | 421 | MOISTIO |
usubcl(i,nt) = ul(i,nsubcl,nt) |
| ./pkg/fizhi/fizhi_moist.F | 561 | MOISTIO |
if( usubcl(i,nt).ne.0.0 ) then |
| ./pkg/fizhi/fizhi_moist.F | 562 | MOISTIO |
cvu(i,L,nt) = ( ul(i,nsubcl,nt)-usubcl(i,nt) ) * |
| ./pkg/fizhi/fizhi_moist.F | 563 | MOISTIO |
. ( saveu(i,L,nt)/usubcl(i,nt) )*sp(i)*tminv |