Symbol Description Uses
fupdif 6



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2201 CLDFLX
      _RL  fdndir(m,n),fdndif(m,n),fupdif
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2456 CLDFLX
         fupdif= (xx+tta(i,j,k-1,ih,im)*rxa(i,j,k,im,is))*denm
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2457 CLDFLX
         flxdn(i,j,k)=fdndir(i,j)+fdndif(i,j)-fupdif
./pkg/fizhi/fizhi_swrad.F 2200 CLDFLX
      _RL  fdndir(m,n),fdndif(m,n),fupdif
./pkg/fizhi/fizhi_swrad.F 2455 CLDFLX
         fupdif= (xx+tta(i,j,k-1,ih,im)*rxa(i,j,k,im,is))*denm
./pkg/fizhi/fizhi_swrad.F 2456 CLDFLX
         flxdn(i,j,k)=fdndir(i,j)+fdndif(i,j)-fupdif