Symbol Description Uses
vpsig 16



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 4209 LINADJ
        if(vpsig(i).gt.0.)VPSIGB2(I) =
./pkg/fizhi/fizhi_turb.F 4210 LINADJ
     1        0.5 * ( vpsig(i)*vpsig(i) + b2uhs ) / vpsig(i)