Symbol Description Uses
ufrac 6


File Line number Procedure Code
./pkg/kpp/kpp_routines.F 875 WSCALE 
      _RL udiff, zdiff, zfrac, ufrac, fzfrac, wam
./pkg/kpp/kpp_routines.F 911 WSCALE 
            ufrac = udiff / deltau - float(ju)
./pkg/kpp/kpp_routines.F 916 WSCALE 
            wm(i) = (1.-ufrac) * wbm          + ufrac * wam
./pkg/kpp/kpp_routines.F 920 WSCALE 
            ws(i) = (1.-ufrac) * wbs          + ufrac * was