Searched refs:v_a_dot_v_a (Results 1 – 1 of 1) sorted by relevance
622 real(kind=kreal) :: v_a_dot_v_a local695 v_a_dot_v_a = vx*vx+vy*vy+vz*vz771 if( v_a_dot_v_a .LT. 1.0D-15 ) then777 t3 = mu*d*d/( rho*v_a_dot_v_a )