Merge pull request #2430 from su2code/feature_tke_supersonicŵ

[WIP] Turbulent kinetic energy based on inlet condition for supersonic inlet

Author: pcarruscag

SU2_CFD/src/solvers/CEulerSolver.cpp

@@ -7356,7 +7356,12 @@ void CEulerSolver::BC_Supersonic_Inlet(CGeometry *geometry, CSolver **solver_con
 
     const su2double Velocity2 = GeometryToolbox::SquaredNorm(int(MAXNDIM), Velocity);
     su2double Energy = Pressure / (Density * Gamma_Minus_One) + 0.5 * Velocity2;
-    if (tkeNeeded) Energy += GetTke_Inf();
+    if (tkeNeeded) {
+      const su2double* Turb_Properties = config->GetInlet_TurbVal(Marker_Tag);
+      const su2double Intensity = Turb_Properties[0];
+      const su2double Tke = 3.0 / 2.0 * (Velocity2 * pow(Intensity, 2));
+      Energy += Tke;
+    }
 
     /*--- Primitive variables, using the derived quantities. ---*/