Symbol Description Uses
jup1 6


File Line number Procedure Code
./pkg/kpp/kpp_routines.F 603 WSCALE 
      integer iz, izp1, ju, i, jup1
./pkg/kpp/kpp_routines.F 627 WSCALE 
            jup1  = ju + 1
./pkg/kpp/kpp_routines.F 633 WSCALE 
            wam   = fzfrac     * wmt(iz,jup1) + zfrac * wmt(izp1,jup1)
./pkg/kpp/kpp_routines.F 637 WSCALE 
            was   = fzfrac     * wst(iz,jup1) + zfrac * wst(izp1,jup1)