Symbol Description Uses
ju 12



File Line number Procedure Code
./pkg/kpp/kpp_routines.F 874 WSCALE
      integer iz, izp1, ju, i, jup1
./pkg/kpp/kpp_routines.F 905 WSCALE
            ju    = int( udiff / deltau )
./pkg/kpp/kpp_routines.F 906 WSCALE
            ju    = min( ju, nnj )
./pkg/kpp/kpp_routines.F 907 WSCALE
            ju    = max( ju, 0 )
./pkg/kpp/kpp_routines.F 908 WSCALE
            jup1  = ju + 1
./pkg/kpp/kpp_routines.F 911 WSCALE
            ufrac = udiff / deltau - float(ju)
./pkg/kpp/kpp_routines.F 915 WSCALE
            wbm   = fzfrac     * wmt(iz,ju  ) + zfrac * wmt(izp1,ju  )
./pkg/kpp/kpp_routines.F 919 WSCALE
            wbs   = fzfrac     * wst(iz,ju  ) + zfrac * wst(izp1,ju  )