Symbol Description Uses
swh 16



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2495 FLXCO2
      subroutine FLXCO2(m,n,np,swc,swh,csm,df)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2507 FLXCO2
      _RL  csm(m,n),swc(m,n,np+1),swh(m,n,np+1),cah(22,19)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2534 FLXCO2
          wlog=log10(swh(i,j,k)*csm(i,j))
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 783 SORAD
      _RL  swh(m,n,np+1),so2(m,n,np+1),df(m,n,np+1)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 791 SORAD
         swh(i,j,1)=0. 
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 818 SORAD
          swh(i,j,k+1)=swh(i,j,k)+wh(i,j,k)
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 897 SORAD
      call FLXCO2(m,n,np,so2,swh,csm,df)
./pkg/fizhi/fizhi_swrad.F 2494 FLXCO2
      subroutine FLXCO2(m,n,np,swc,swh,csm,df)
./pkg/fizhi/fizhi_swrad.F 2506 FLXCO2
      _RL  csm(m,n),swc(m,n,np+1),swh(m,n,np+1),cah(22,19)
./pkg/fizhi/fizhi_swrad.F 2533 FLXCO2
          wlog=log10(swh(i,j,k)*csm(i,j))
./pkg/fizhi/fizhi_swrad.F 782 SORAD
      _RL  swh(m,n,np+1),so2(m,n,np+1),df(m,n,np+1)
./pkg/fizhi/fizhi_swrad.F 790 SORAD
         swh(i,j,1)=0. 
./pkg/fizhi/fizhi_swrad.F 817 SORAD
          swh(i,j,k+1)=swh(i,j,k)+wh(i,j,k)
./pkg/fizhi/fizhi_swrad.F 896 SORAD
      call FLXCO2(m,n,np,so2,swh,csm,df)