Symbol | Description | Uses |
tstrip | 6 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_swrad.F | 495 | SWRIO |
tstrip(i) = 1.0 - flux(i,lm+1)/ |
./pkg/fizhi/fizhi_swrad.F | 497 | SWRIO |
if( tstrip(i).lt.0.0 ) tstrip(i) = undef |
./pkg/fizhi/fizhi_swrad.F | 499 | SWRIO |
tstrip(i) = undef |
./pkg/fizhi/fizhi_swrad.F | 502 | SWRIO |
call PASTE ( tstrip,albedo,istrip,im*jm,1,nn ) |
./pkg/fizhi/fizhi_swrad.F | 91 | SWRIO |
_RL tstrip (istrip) |