| File |
Line number |
Procedure |
Code |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
540 |
OPTHK |
subroutine OPTHK ( tl,pl,ple,lz,cf,cfm,lwi,im,jm,lm,tau ) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
581 |
OPTHK |
integer lwi(im,jm) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
618 |
OPTHK |
if( lwi(i,j).le.10 ) then |
|
./pkg/fizhi/fizhi_swrad.F |
539 |
OPTHK |
subroutine OPTHK ( tl,pl,ple,lz,cf,cfm,lwi,im,jm,lm,tau ) |
|
./pkg/fizhi/fizhi_swrad.F |
580 |
OPTHK |
integer lwi(im,jm) |
|
./pkg/fizhi/fizhi_swrad.F |
617 |
OPTHK |
if( lwi(i,j).le.10 ) then |
|
./pkg/fizhi/fizhi_lwrad.F |
142 |
LWRIO |
call STRIPITINT (landtype,lwi,im*jm,im*jm,istrip,1,nn) |
|
./pkg/fizhi/fizhi_lwrad.F |
175 |
LWRIO |
call OPTHK ( tzl,pl,ple,cldlz,clro,clmo,lwi,istrip,1,lm,tauc ) |
|
./pkg/fizhi/fizhi_lwrad.F |
67 |
LWRIO |
integer lwi(istrip) |