Symbol | Description | Uses |
sclr | 7 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_swrad.F | 791 | SORAD |
_RL sdf(m,n),sclr(m,n),csm(m,n),x |
./pkg/fizhi/fizhi_swrad.F | 923 | SORAD |
sclr(i,j)=1.0 |
./pkg/fizhi/fizhi_swrad.F | 935 | SORAD |
sdf(i,j)=sdf(i,j)+df(i,j,k)*sclr(i,j)*fcld(i,j,k) |
./pkg/fizhi/fizhi_swrad.F | 936 | SORAD |
sclr(i,j)=sclr(i,j)*(1.-fcld(i,j,k)) |
./pkg/fizhi/fizhi_swrad.F | 938 | SORAD |
flx(i,j,k+1)=flx(i,j,k+1)-sdf(i,j)-df(i,j,k+1)*sclr(i,j) |
./pkg/fizhi/fizhi_swrad.F | 948 | SORAD |
x = (-sdf(i,j)-df(i,j,np+1)*sclr(i,j))/x |