Symbol Description Uses
usta 8



File Line number Procedure Code
./pkg/kpp/kpp_init_fixed.F 141 KPP_INIT_FIXED
            usta = deltau*j + umin
./pkg/kpp/kpp_init_fixed.F 142 KPP_INIT_FIXED
            zeta = zehat / max(phepsi,usta**3)
./pkg/kpp/kpp_init_fixed.F 144 KPP_INIT_FIXED
               wmt(i,j) = vonk*usta/(1. + conc1*zeta)
./pkg/kpp/kpp_init_fixed.F 148 KPP_INIT_FIXED
                  wmt(i,j) = vonk*usta*(1. - conc2*zeta)**p25
./pkg/kpp/kpp_init_fixed.F 150 KPP_INIT_FIXED
                  wmt(i,j) = vonk*(conam*usta**3 - concm*zehat)**p33
./pkg/kpp/kpp_init_fixed.F 153 KPP_INIT_FIXED
                  wst(i,j) = vonk*usta*SQRT(1. _d 0 - conc3*zeta)
./pkg/kpp/kpp_init_fixed.F 155 KPP_INIT_FIXED
                  wst(i,j) = vonk*(conas*usta**3 - concs*zehat)**p33
./pkg/kpp/kpp_init_fixed.F 42 KPP_INIT_FIXED
      _RL usta