| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1144 |
TURBIO |
call DIAG_VEGTILE_FILL (qa,igrd,chfrstr,istrip,nchp,nn, |
|
./pkg/fizhi/fizhi_turb.F |
212 |
TURBIO |
_RL tc(istrip),td(istrip),qa(istrip) |
|
./pkg/fizhi/fizhi_turb.F |
4512 |
SEAICE |
. pke, seaic, tc, qa ) |
|
./pkg/fizhi/fizhi_turb.F |
4519 |
SEAICE |
_RL pke(nocean), tc(nocean), qa(nocean) |
|
./pkg/fizhi/fizhi_turb.F |
4540 |
SEAICE |
qa(i) = qa(i) + (faceps*qa(i)/(tc(i)*tc(i)))*deltg |
|
./pkg/fizhi/fizhi_turb.F |
524 |
TURBIO |
call STRIPIT (qground,qa,nchptot,nchp,istrip,1,nn) |
|
./pkg/fizhi/fizhi_turb.F |
554 |
TURBIO |
sh(i,nlay+1) = qa(i) |
|
./pkg/fizhi/fizhi_turb.F |
582 |
TURBIO |
sh(i,nlay+1) = qa(i) |
|
./pkg/fizhi/fizhi_turb.F |
648 |
TURBIO |
saveqa(i) = qa(i) |
|
./pkg/fizhi/fizhi_turb.F |
769 |
TURBIO |
U tc, td, qa, swet1, swet2, swet3, capacity, snowdepth, |
|
./pkg/fizhi/fizhi_turb.F |
784 |
TURBIO |
. tc(nland+1), qa(nland+1) ) |
|
./pkg/fizhi/fizhi_turb.F |
869 |
TURBIO |
call PSTBMPIT(qa,qdiaglsm(1,8),istrip,nchp,nchptot,1,nn) |
|
./pkg/fizhi/fizhi_turb.F |
904 |
TURBIO |
call PASTIT (qa,qground,istrip,nchp,nchptot,1,nn) |
|
./pkg/fizhi/fizhi_turb.F |
925 |
TURBIO |
sh(i,nlay+1) = qa(i) |
|
./pkg/fizhi/fizhi_turb.F |
929 |
TURBIO |
sh(i,L) = sh(i,L) + dshdshg(i,L)*(qa(i)-saveqa(i)) |