Symbol Description Uses
dum 15



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/ini_salt.F 109 INI_SALT
     .               dum,.false.)
./verification/fizhi-cs-aqualev10/code/ini_salt.F 52 INI_SALT
       _RL getcon, kappa, dum, pinmb
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1589 TRBFLX
      _RL getcon,dum,errf
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1844 TRBFLX
       call QSAT ( tl(i,nlev),pl(i,nlev),shsat(i,nlev),dum,.false. )
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1940 TRBFLX
       call QSAT ( tl(i,LL),pl(i,LL),shsat(i,LL),dum,.false. )
./pkg/fizhi/fizhi_moist.F 2330 RNEVP
      _RL fracwat,fracice, tice,rh,fact,dum
./pkg/fizhi/fizhi_moist.F 2475 RNEVP
           call QSAT( tl(i,L),pl(i,L),rh,dum,.false.)
./pkg/fizhi/fizhi_moist.F 2553 SRCLOUDS
      _RL rhcrit,rh,dum
./pkg/fizhi/fizhi_moist.F 2575 SRCLOUDS
      call QSAT ( temp,pl(i,L),qs(i,L),dum,.false. )
./pkg/fizhi/fizhi_moist.F 47 MOISTIO
      _RL       fracqq, dum
./pkg/fizhi/fizhi_moist.F 518 MOISTIO
        dum = dp(i,L)/(ple(i,lm+1)-ple(i,nsubcl))
./pkg/fizhi/fizhi_moist.F 519 MOISTIO
        cldmas(i,L) = cldmas(i,L-1) - dum*cldmas(i,nsubcl-1)
./pkg/fizhi/fizhi_turb.F 1549 TRBFLX
      _RL getcon,dum,errf
./pkg/fizhi/fizhi_turb.F 1804 TRBFLX
       call QSAT ( tl(i,nlev),pl(i,nlev),shsat(i,nlev),dum,.false. )
./pkg/fizhi/fizhi_turb.F 1900 TRBFLX
       call QSAT ( tl(i,LL),pl(i,LL),shsat(i,LL),dum,.false. )