diff --git a/@BearImp/calcFilm.m b/@BearImp/calcFilm.m index cdb25db26685a8c86e85a37ceb4d09ab4ec1c2a1..34ea05dab3f9d7860ded652290f47581374f3f80 100644 --- a/@BearImp/calcFilm.m +++ b/@BearImp/calcFilm.m @@ -70,14 +70,14 @@ H.G = H.alpha_p.*E_red_tmp; H.W = Q_temp./(E_red_tmp .* R_x_temp.^2); switch method - case {'Hamrock/Dowson','Dowson_withoutThermCorr'} + case {'Hamrock/Dowson','Hamrock/Dowson_withoutThermCorr'} k_tmp = [G.k_i;G.k_a]; H.H_0 = 2.69 * H.G.^0.53 .* H.U.^0.67 .* H.W.^-0.067 .* (1-0.61*exp(-0.73.*k_tmp)); H.H_min = 3.63 * H.G.^0.49 .* H.U.^0.68 .* H.W.^-0.073 .* (1- exp(-0.68.*k_tmp)); H.h_0raw = H.H_0 .*R_x_temp; % without correction factors H.h_min = H.H_min.*R_x_temp; + H.L = T.eta_0 .* T.alpha_etaT .* H.u.^2 ./ (4*S.lambda); if strcmp(method,'Hamrock/Dowson') - H.L = T.eta_0 .* T.alpha_etaT .* H.u.^2 ./ (4*S.lambda); H.C_korr = 3.94 ./ (3.94 + H.L.^0.62); else H.C_korr = 1; @@ -134,7 +134,7 @@ switch isPreCalc % Bereichs liegt M = H.W.*(2.*H.U).^(-3/4); switch method - case 'Hamrock/Dowson' + case {'Hamrock/Dowson','Hamrock/Dowson_withoutThermCorr'} rangeLoadParM = [25,500]; % Quelle: Non-Dimensional Groups, Marian 2020, Fig7 rangeViscParL = [5,15];