get_kineticEnergy_from_vel_dens_incompressible Function

private pure function get_kineticEnergy_from_vel_dens_incompressible(vel, dens) result(scalar)

function pointer to get kineticEnergy from vel and density for any stencil

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rk),	intent(in)			::	vel(:)	velocity
real(kind=rk),	intent(in)			::	dens	density

Return Value real(kind=rk)

kineticEnergy