File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
167 |
TURBIO |
integer nland |
./pkg/fizhi/fizhi_turb.F |
512 |
TURBIO |
nland = 0 |
./pkg/fizhi/fizhi_turb.F |
515 |
TURBIO |
if( types(i).lt.100 ) nland = nland + 1 |
./pkg/fizhi/fizhi_turb.F |
737 |
TURBIO |
if(nland.gt.0)then |
./pkg/fizhi/fizhi_turb.F |
740 |
TURBIO |
I nland, timstp, types, rainls, raincon, newsnow, wspeed, |
./pkg/fizhi/fizhi_turb.F |
756 |
TURBIO |
& eturb(nland+1), dedtc(nland+1), |
./pkg/fizhi/fizhi_turb.F |
757 |
TURBIO |
& hsturb(nland+1), dhsdtc(nland+1), |
./pkg/fizhi/fizhi_turb.F |
758 |
TURBIO |
& qicestr(nland+1), dqicestr(nland+1), |
./pkg/fizhi/fizhi_turb.F |
759 |
TURBIO |
& swnet(nland+1), lwstrip(nland+1), blwrad(nland+1), |
./pkg/fizhi/fizhi_turb.F |
760 |
TURBIO |
& pke(nland+1,nlay+1), icest(nland+1), |
./pkg/fizhi/fizhi_turb.F |
761 |
TURBIO |
& tc(nland+1), qa(nland+1) ) |