Symbol Description Uses
scal 5



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 789 SORAD
      _RL  dp(m,n,np),wh(m,n,np),oh(m,n,np),scal(m,n,np)
./pkg/fizhi/fizhi_swrad.F 819 SORAD
          scal(i,j,k)=dp(i,j,k)*(.5*(pl(i,j,k)+pl(i,j,k+1))/300.)**.8
./pkg/fizhi/fizhi_swrad.F 823 SORAD
          wh(i,j,k)=1.02*wa(i,j,k)*scal(i,j,k)*
./pkg/fizhi/fizhi_swrad.F 873 SORAD
          so2(i,j,k+1)=so2(i,j,k)+165.22*scal(i,j,k)
./pkg/fizhi/fizhi_swrad.F 896 SORAD
         so2(i,j,k+1)=so2(i,j,k)+co2*789.*scal(i,j,k)