Symbol Description Uses
swh 8



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 2502 FLXCO2
      subroutine FLXCO2(m,n,np,swc,swh,csm,df)
./pkg/fizhi/fizhi_swrad.F 2514 FLXCO2
      _RL  csm(m,n),swc(m,n,np+1),swh(m,n,np+1),cah(22,19)
./pkg/fizhi/fizhi_swrad.F 2541 FLXCO2
          wlog=log10(swh(i,j,k)*csm(i,j))
./pkg/fizhi/fizhi_swrad.F 790 SORAD
      _RL  swh(m,n,np+1),so2(m,n,np+1),df(m,n,np+1)
./pkg/fizhi/fizhi_swrad.F 798 SORAD
         swh(i,j,1)=0.
./pkg/fizhi/fizhi_swrad.F 825 SORAD
          swh(i,j,k+1)=swh(i,j,k)+wh(i,j,k)
./pkg/fizhi/fizhi_swrad.F 904 SORAD
      call FLXCO2(m,n,np,so2,swh,csm,df)