| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lwrad.F |
1078 |
IRRAD |
* reff(i,j,k,1)**aib(3,ib)) |
|
./pkg/fizhi/fizhi_lwrad.F |
1080 |
IRRAD |
* +awb(4,ib)*reff(i,j,k,2))*reff(i,j,k,2))*reff(i,j,k,2)) |
|
./pkg/fizhi/fizhi_lwrad.F |
1100 |
IRRAD |
reff1=min(reff(i,j,k,1),130. _d 0) |
|
./pkg/fizhi/fizhi_lwrad.F |
1101 |
IRRAD |
reff2=min(reff(i,j,k,2),20.0 _d 0) |
|
./pkg/fizhi/fizhi_lwrad.F |
204 |
LWRIO |
reff(i,L,n) = 0. |
|
./pkg/fizhi/fizhi_lwrad.F |
215 |
LWRIO |
. cldwater,cwc,tauc,reff,clro,mid_level,low_level, |
|
./pkg/fizhi/fizhi_lwrad.F |
348 |
IRRAD |
* cldwater,cwc,taucl,reff,fcld,ict,icb, |
|
./pkg/fizhi/fizhi_lwrad.F |
572 |
IRRAD |
_RL cwc(m,ndim,np,3),taucl(m,ndim,np,3),reff(m,ndim,np,3), |
|
./pkg/fizhi/fizhi_lwrad.F |
63 |
LWRIO |
_RL reff(istrip,lm,3) |
|
./pkg/fizhi/fizhi_swrad.F |
1159 |
SOLIR |
subroutine SOLIR (m,n,ndim,np,wh,taucld,tauclb,tauclf,reff, |
|
./pkg/fizhi/fizhi_swrad.F |
1234 |
SOLIR |
_RL taucld(m,ndim,np,2),reff(m,ndim,np,2),fcld(m,ndim,np) |
|
./pkg/fizhi/fizhi_swrad.F |
1356 |
SOLIR |
reff1=min(reff(i,j,k,1),130. _d 0) |
|
./pkg/fizhi/fizhi_swrad.F |
1357 |
SOLIR |
reff2=min(reff(i,j,k,2),20.0 _d 0) |
|
./pkg/fizhi/fizhi_swrad.F |
1569 |
SOLUV |
subroutine SOLUV (m,n,ndim,np,oh,dp,taucld,tauclb,tauclf,reff, |
|
./pkg/fizhi/fizhi_swrad.F |
1656 |
SOLUV |
_RL taucld(m,ndim,np,2),reff(m,ndim,np,2),fcld(m,ndim,np) |
|
./pkg/fizhi/fizhi_swrad.F |
1747 |
SOLUV |
reff1=min(reff(i,j,k,1),130. _d 0) |
|
./pkg/fizhi/fizhi_swrad.F |
1748 |
SOLUV |
reff2=min(reff(i,j,k,2),20.0 _d 0) |
|
./pkg/fizhi/fizhi_swrad.F |
456 |
SWRIO |
reff(i,L,1) = reffi |
|
./pkg/fizhi/fizhi_swrad.F |
457 |
SWRIO |
reff(i,L,2) = reffw |
|
./pkg/fizhi/fizhi_swrad.F |
462 |
SWRIO |
. tauc,reff,clro,mid_level,low_level,taua, |
|
./pkg/fizhi/fizhi_swrad.F |
666 |
SORAD |
* taucld,reff,fcld,ict,icb, |
|
./pkg/fizhi/fizhi_swrad.F |
773 |
SORAD |
_RL taucld(m,ndim,np,2),reff(m,ndim,np,2) |
|
./pkg/fizhi/fizhi_swrad.F |
859 |
SORAD |
call SOLIR (m,n,ndim,np,wh,taucld,tauclb,tauclf,reff,ict,icb |
|
./pkg/fizhi/fizhi_swrad.F |
864 |
SORAD |
call SOLUV (m,n,ndim,np,oh,dp,taucld,tauclb,tauclf,reff,ict,icb |
|
./pkg/fizhi/fizhi_swrad.F |
88 |
SWRIO |
_RL reff (istrip,lm,2) |