| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
209 |
TURBIO |
integer types(istrip),igrdstr(istrip) |
|
./pkg/fizhi/fizhi_turb.F |
544 |
TURBIO |
call STRIPITINT (ityp,types,nchptot,nchp,istrip,1,nn) |
|
./pkg/fizhi/fizhi_turb.F |
566 |
TURBIO |
if( types(i).lt.100 ) nland = nland + 1 |
|
./pkg/fizhi/fizhi_turb.F |
567 |
TURBIO |
if( types(i).eq.100 ) nocean = nocean + 1 |
|
./pkg/fizhi/fizhi_turb.F |
568 |
TURBIO |
if( types(i).eq.100 .and. icest(i).gt.0.0 ) nice = nice + 1 |
|
./pkg/fizhi/fizhi_turb.F |
791 |
TURBIO |
I nland, timstp, types, rainls, raincon, newsnow, wspeed, |
|
./pkg/fizhi/fizhi_turb.F |
890 |
TURBIO |
call PSTBITINT(types,qdiaglsm(1,1),istrip,nchp,nchptot,1,nn) |