Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe

Information

Helical pipe

Laminar flow

Calculation of the mean convective heat transfer coefficient kc for a helical pipe in the laminar flow regime. See more information.

Turbulent flow

Calculation of the mean convective heat transfer coefficient kc of a helical pipe for turbulent flow regime. See more information.

Overall flow

Calculation of the mean convective heat transfer coefficient kc of a helical pipe in a hydrodynamically developed laminar and turbulent flow regime. See more information.

Extends from Modelica.Icons.VariantsPackage (Icon for package containing variants).

Package Content

Name	Description
kc_laminar	Mean heat transfer coefficient of helical pipe | laminar flow regime
kc_laminar_KC	Mean heat transfer coefficient of helical pipe | hydrodynamically developed laminar flow regime
kc_laminar_IN_con	Input record for function kc_laminar and kc_laminar_KC
kc_laminar_IN_var	Input record for function kc_laminar and kc_laminar_KC
kc_overall	Mean heat transfer coefficient of helical pipe | overall flow regime
kc_overall_KC	Mean heat transfer coefficient of helical pipe | overall flow regime
kc_overall_IN_con	Input record for function kc_overall and kc_overall_KC
kc_overall_IN_var	Input record for function kc_overall and kc_overall_KC
kc_turbulent	Mean heat transfer coefficient of helical pipe | hydrodynamically developed turbulent flow regime
kc_turbulent_KC	Mean heat transfer coefficient of helical pipe | hydrodynamically developed turbulent flow regime
kc_turbulent_IN_con	Input record for function kc_turbulent and kc_turbulent_KC
kc_turbulent_IN_var	Input record for function kc_turbulent and kc_turbulent_KC

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar

Information

Calculation of the mean convective heat transfer coefficient kc for a helical pipe in the laminar flow regime. Note that additionally a failure status is observed in this function to check if the intended boundary conditions are fulfilled. See more information .

Extends from Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d (Geometry figure for helical pipe).

Inputs

Type	Name	Default	Description
Constant inputs
kc_laminar_IN_con	IN_con		Input record for function kc_laminar
Variable inputs
kc_laminar_IN_var	IN_var		Input record for function kc_laminar

Outputs

Type	Name	Description
Output
CoefficientOfHeatTransfer	kc	Convective heat transfer coefficient [W/(m2.K)]
PrandtlNumber	Pr	Prandl number [1]
ReynoldsNumber	Re	Reynolds number [1]
NusseltNumber	Nu	Nusselt number [1]
Real	failureStatus	0== boundary conditions fulfilled | 1== failure >> check if still meaningfull results

Modelica definition

function kc_laminar 
  "Mean heat transfer coefficient of helical pipe | laminar flow regime"

  //SOURCE: VDI-Waermeatlas, 9th edition, Springer-Verlag, 2002, section Gc1 - Gc2
  //Notation of equations according to SOURCE

  //icon
  extends Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d;

  //input records
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_IN_con
    IN_con "Input record for function kc_laminar";
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_IN_var
    IN_var "Input record for function kc_laminar";

  //output variables
  output SI.CoefficientOfHeatTransfer kc "Convective heat transfer coefficient";
  output SI.PrandtlNumber Pr "Prandl number";
  output SI.ReynoldsNumber Re "Reynolds number";
  output SI.NusseltNumber Nu "Nusselt number";
  output Real failureStatus 
    "0== boundary conditions fulfilled | 1== failure >> check if still meaningfull results";

protected 
  Real MIN=Modelica.Constants.eps;

  SI.Diameter d_hyd=IN_con.d_hyd "Hydraulic diameter";
  SI.Area A_cross=PI*IN_con.d_hyd^2/4 "Circular cross sectional area";
  SI.Diameter d_s=IN_con.L/(IN_con.n_nt*PI) "Mean coil diameter";
  SI.Diameter d_w=sqrt(max(MIN, (d_s^2 - (IN_con.h/PI)^2))) 
    "Mean helical pipe diameter";
  SI.Diameter d_coil=max(d_w, d_w*(1 + (IN_con.h/(PI*d_w))^2)) 
    "Mean curvature diameter of helical pipe";
  SI.ReynoldsNumber Re_crit=2300*(1 + 8.6*(IN_con.d_hyd/d_coil)^0.45) 
    "Critical Reynolds number";

  SI.Velocity velocity=abs(IN_var.m_flow)/max(MIN, IN_var.rho*A_cross) 
    "Mean velocity";

  //failure status
  Real fstatus[1] "Check of expected boundary conditions";

  //Documentation
algorithm 
  Pr := abs(IN_var.eta*IN_var.cp/max(MIN, IN_var.lambda));
  Re := max(1, abs(IN_var.rho*velocity*IN_con.d_hyd/max(MIN, IN_var.eta)));
  kc := Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_KC(IN_con, IN_var);
  Nu := kc*IN_con.d_hyd/max(MIN, IN_var.lambda);

  //failure status
  fstatus[1] := if Re > Re_crit then 1 else 0;

  failureStatus := 0;
  for i in 1:size(fstatus, 1) loop
    if fstatus[i] == 1 then
      failureStatus := 1;
    end if;
  end for;
end kc_laminar;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_KC

Information

Calculation of the mean convective heat transfer coefficient kc for a helical pipe in the laminar flow regime. See more information .

Extends from Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d (Geometry figure for helical pipe).

Inputs

Type	Name	Default	Description
Constant inputs
kc_laminar_IN_con	IN_con		Input record for function kc_laminar_KC
Variable inputs
kc_laminar_IN_var	IN_var		Input record for function kc_laminar_KC

Outputs

Type	Name	Description
CoefficientOfHeatTransfer	kc	Output for function kc_laminar_KC [W/(m2.K)]

Modelica definition

function kc_laminar_KC 
  "Mean heat transfer coefficient of helical pipe | hydrodynamically developed laminar flow regime"

  //SOURCE: VDI-Waermeatlas, 9th edition, Springer-Verlag, 2002, section Gc1 - Gc2
  //Notation of equations according to SOURCE

  //icon
  extends Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d;

  //input records
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_IN_con
    IN_con "Input record for function kc_laminar_KC";
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_IN_var
    IN_var "Input record for function kc_laminar_KC";

  //output variables
  output SI.CoefficientOfHeatTransfer kc "Output for function kc_laminar_KC";

protected 
  Real MIN=Modelica.Constants.eps;

  SI.Diameter d_hyd=IN_con.d_hyd "Hydraulic diameter";
  SI.Area A_cross=PI*IN_con.d_hyd^2/4 "Circular cross sectional area";
  SI.Diameter d_s=IN_con.L/(IN_con.n_nt*PI) "Mean coil diameter";
  SI.Diameter d_w=sqrt(max(MIN, (d_s^2 - (IN_con.h/PI)^2))) 
    "Mean helical pipe diameter";
  SI.Diameter d_coil=max(d_w, d_w*(1 + (IN_con.h/(PI*d_w))^2)) 
    "Mean curvature diameter of helical pipe";

  SI.Velocity velocity=abs(IN_var.m_flow)/max(MIN, IN_var.rho*A_cross) 
    "Mean velocity";
  SI.ReynoldsNumber Re=max(1, IN_var.rho*velocity*IN_con.d_hyd/max(MIN, IN_var.eta));
  SI.PrandtlNumber Pr=abs(IN_var.eta*IN_var.cp/max(MIN, IN_var.lambda));

  Real m=0.5 + 0.2903*(IN_con.d_hyd/d_coil)^0.194 
    "Exponent for actual Reynolds number";

  //Documentation
algorithm 
  kc := (IN_var.lambda/IN_con.d_hyd)*(3.66 + 0.08*(1 + 0.8*(IN_con.d_hyd/d_coil)
    ^0.9)*Re^(m)*Pr^(1/3));
end kc_laminar_KC;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_IN_con

Information

Extends from Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_con (Input record for function kc_overall and kc_overall_KC).

Parameters

Type	Name	Default	Description
HelicalPipe
Real	n_nt	1	Total number of turns
Diameter	d_hyd	0.1	Hydraulic diameter [m]
Length	h	0.01	Distance between turns [m]
Length	L	1	Total length of helical pipe [m]

Modelica definition

record kc_laminar_IN_con 
  "Input record for function kc_laminar and kc_laminar_KC"

  extends Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_con;

end kc_laminar_IN_con;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_laminar_IN_var

Information

Extends from Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_var (Input record for function kc_overall and kc_overall_KC).

Parameters

Type	Name	Default	Description
Fluid properties
SpecificHeatCapacityAtConstantPressure	cp		Specific heat capacity of fluid at constant pressure [J/(kg.K)]
DynamicViscosity	eta		Dynamic viscosity of fluid [Pa.s]
ThermalConductivity	lambda		Thermal conductivity of fluid [W/(m.K)]
Density	rho		Density of fluid [kg/m3]
Input
MassFlowRate	m_flow		[kg/s]

Modelica definition

record kc_laminar_IN_var 
  "Input record for function kc_laminar and kc_laminar_KC"

  extends Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_var;

end kc_laminar_IN_var;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall

Information

Calculation of the mean convective heat transfer coefficient kc of a helical pipe in a hydrodynamically developed laminar and turbulent flow regime. Note that additionally a failure status is observed in this function to check if the intended boundary conditions are fulfilled. See more information .

Extends from Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d (Geometry figure for helical pipe).

Inputs

Type	Name	Default	Description
Constant inputs
kc_overall_IN_con	IN_con		Input record for function kc_overall
Variable inputs
kc_overall_IN_var	IN_var		Input record for function kc_overall

Outputs

Type	Name	Description
Output
CoefficientOfHeatTransfer	kc	Convective heat transfer coefficient [W/(m2.K)]
PrandtlNumber	Pr	Prandl number [1]
ReynoldsNumber	Re	Reynolds number [1]
NusseltNumber	Nu	Nusselt number [1]
Real	failureStatus	0== boundary conditions fulfilled | 1== failure >> check if still meaningfull results

Modelica definition

function kc_overall 
  "Mean heat transfer coefficient of helical pipe | overall flow regime"

  //SOURCE: VDI-Waermeatlas, 9th edition, Springer-Verlag, 2002, section Gc1 - Gc2
  //Notation of equations according to SOURCE

  //icon
  extends Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d;

  //input records
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_con
    IN_con "Input record for function kc_overall";
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_var
    IN_var "Input record for function kc_overall";

  //output variables
  output SI.CoefficientOfHeatTransfer kc "Convective heat transfer coefficient";
  output SI.PrandtlNumber Pr "Prandl number";
  output SI.ReynoldsNumber Re "Reynolds number";
  output SI.NusseltNumber Nu "Nusselt number";
  output Real failureStatus 
    "0== boundary conditions fulfilled | 1== failure >> check if still meaningfull results";

protected 
  Real MIN=Modelica.Constants.eps;

  SI.Area A_cross=PI*IN_con.d_hyd^2/4 "Cross sectional area";

  SI.Velocity velocity=abs(IN_var.m_flow)/max(MIN, IN_var.rho*A_cross) 
    "Mean velocity";

  //Documentation
algorithm 
  Pr := abs(IN_var.eta*IN_var.cp/max(MIN, IN_var.lambda));
  Re := max(MIN, IN_var.rho*velocity*IN_con.d_hyd/max(MIN, IN_var.eta));
  kc := Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_KC(IN_con, IN_var);
  Nu := kc*IN_con.d_hyd/max(MIN, IN_var.lambda);
end kc_overall;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_KC

Information

Calculation of the mean convective heat transfer coefficient kc of a helical pipe in a hydrodynamically developed laminar and turbulent flow regime. See more information .

Extends from Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d (Geometry figure for helical pipe).

Inputs

Type	Name	Default	Description
Constant inputs
kc_overall_IN_con	IN_con		Input record for function kc_overall_KC
Variable inputs
kc_overall_IN_var	IN_var		Input record for function kc_overall_KC

Outputs

Type	Name	Description
CoefficientOfHeatTransfer	kc	Output for function kc_overall_KC [W/(m2.K)]

Modelica definition

function kc_overall_KC 
  "Mean heat transfer coefficient of helical pipe | overall flow regime"

  //SOURCE: VDI-Waermeatlas, 9th edition, Springer-Verlag, 2002, section Gc1 - Gc2
  //Notation of equations according to SOURCE

  //icon
  extends Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d;

  import SMOOTH = Modelica.Fluid.Dissipation.Utilities.Functions.General.Stepsmoother;

  //input records
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_con
    IN_con "Input record for function kc_overall_KC";
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_var
    IN_var "Input record for function kc_overall_KC";
  //output variables
  output SI.CoefficientOfHeatTransfer kc "Output for function kc_overall_KC";

protected 
  Real MIN=Modelica.Constants.eps;
  Real laminar=2e3 "Maximum Reynolds number for laminar regime";
  Real turbulent=2.2e4 "Minimum Reynolds number for turbulent regime";

  SI.Area A_cross=PI*IN_con.d_hyd^2/4 "Cross sectional area";
  SI.Diameter d_s=max(1e-6, IN_con.L/(IN_con.n_nt*PI)) "Mean coil diameter";
  SI.Diameter d_w=sqrt(max(MIN, abs(d_s^2 - (IN_con.h/PI)^2))) 
    "Mean helical pipe diameter";
  SI.Diameter d_coil=d_w*(1 + (IN_con.h/(PI*d_w))^2) 
    "Mean curvature diameter of helical pipe";
  SI.ReynoldsNumber Re_crit=min(4e3, 2300*(1 + 8.6*(IN_con.d_hyd/d_coil)^0.45)) 
    "Critical Reynolds number";

  SI.Velocity velocity=abs(IN_var.m_flow)/max(MIN, IN_var.rho*A_cross) 
    "Mean velocity";
  SI.ReynoldsNumber Re=max(1e-3, IN_var.rho*velocity*IN_con.d_hyd/max(MIN,
      IN_var.eta));
  SI.PrandtlNumber Pr=abs(IN_var.eta*IN_var.cp/max(MIN, IN_var.lambda));

  //Documentation
algorithm 
  kc := SMOOTH(
          Re_crit,
          turbulent,
          Re)*Dissipation.HeatTransfer.HelicalPipe.kc_laminar_KC(IN_con,
    IN_var) + SMOOTH(
          turbulent,
          Re_crit,
          Re)*Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_KC(IN_con,
    IN_var);
end kc_overall_KC;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_con

Information

Extends from Modelica.Fluid.Dissipation.Utilities.Records.HeatTransfer.HelicalPipe (Input for helical pipe).

Parameters

Type	Name	Default	Description
HelicalPipe
Real	n_nt	1	Total number of turns
Diameter	d_hyd	0.1	Hydraulic diameter [m]
Length	h	0.01	Distance between turns [m]
Length	L	1	Total length of helical pipe [m]

Modelica definition

record kc_overall_IN_con 
  "Input record for function kc_overall and kc_overall_KC"

  //helical pipe variables
  extends Modelica.Fluid.Dissipation.Utilities.Records.HeatTransfer.HelicalPipe;

end kc_overall_IN_con;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_var

Information

Extends from Modelica.Fluid.Dissipation.Utilities.Records.General.FluidProperties (Base record for fluid properties).

Parameters

Type	Name	Default	Description
Fluid properties
SpecificHeatCapacityAtConstantPressure	cp		Specific heat capacity of fluid at constant pressure [J/(kg.K)]
DynamicViscosity	eta		Dynamic viscosity of fluid [Pa.s]
ThermalConductivity	lambda		Thermal conductivity of fluid [W/(m.K)]
Density	rho		Density of fluid [kg/m3]
Input
MassFlowRate	m_flow		[kg/s]

Modelica definition

record kc_overall_IN_var 
  "Input record for function kc_overall and kc_overall_KC"

  //fluid property variables
  extends Modelica.Fluid.Dissipation.Utilities.Records.General.FluidProperties;

  //input variable (mass flow rate)
  SI.MassFlowRate m_flow;

end kc_overall_IN_var;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent

Information

Calculation of the mean convective heat transfer coefficient kc of a helical pipe for turbulent flow regime. Note that additionally a failure status is observed in this function to check if the intended boundary conditions are fulfilled. See more information .

Extends from Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d (Geometry figure for helical pipe).

Inputs

Type	Name	Default	Description
Constant inputs
kc_turbulent_IN_con	IN_con		Input record for function kc_turbulent
Variable inputs
kc_turbulent_IN_var	IN_var		Input record for function kc_turbulent

Outputs

Type	Name	Description
Output
CoefficientOfHeatTransfer	kc	Convective heat transfer coefficient [W/(m2.K)]
PrandtlNumber	Pr	Prandl number [1]
ReynoldsNumber	Re	Reynolds number [1]
NusseltNumber	Nu	Nusselt number [1]
Real	failureStatus	0== boundary conditions fulfilled | 1== failure >> check if still meaningfull results

Modelica definition

function kc_turbulent 
  "Mean heat transfer coefficient of helical pipe | hydrodynamically developed turbulent flow regime"

  //SOURCE: VDI-Waermeatlas, 9th edition, Springer-Verlag, 2002, section Gc1 - Gc2
  //Notation of equations according to SOURCE

  //icon
  extends Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d;

  //input records
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_IN_con
    IN_con "Input record for function  kc_turbulent";
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_IN_var
    IN_var "Input record for function  kc_turbulent";

  //output variables
  output SI.CoefficientOfHeatTransfer kc "Convective heat transfer coefficient";
  output SI.PrandtlNumber Pr "Prandl number";
  output SI.ReynoldsNumber Re "Reynolds number";
  output SI.NusseltNumber Nu "Nusselt number";
  output Real failureStatus 
    "0== boundary conditions fulfilled | 1== failure >> check if still meaningfull results";

protected 
  Real MIN=Modelica.Constants.eps;

  Real turbulent=2.2e4 "Minimum Reynolds number for turbulent regime";

  SI.Area A_cross=PI*IN_con.d_hyd^2/4 "Cross sectional area";

  SI.Velocity velocity=abs(IN_var.m_flow)/max(MIN, IN_var.rho*A_cross) 
    "Mean velocity";

  //failure status
  Real fstatus[1] "Check of expected boundary conditions";

  //Documentation
algorithm 
  Pr := abs(IN_var.eta*IN_var.cp/IN_var.lambda);
  Re := max(1e-3, abs(IN_var.rho*velocity*IN_con.d_hyd/IN_var.eta));
  kc := Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_KC(IN_con, IN_var);
  Nu := kc*IN_con.d_hyd/max(MIN, IN_var.lambda);

  //failure status
  fstatus[1] := if Re < turbulent then 1 else 0;

  failureStatus := 0;
  for i in 1:size(fstatus, 1) loop
    if fstatus[i] == 1 then
      failureStatus := 1;
    end if;
  end for;
end kc_turbulent;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_KC

Information

Calculation of the mean convective heat transfer coefficient kc of a helical pipe for turbulent flow regime. See more information .

Extends from Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d (Geometry figure for helical pipe).

Inputs

Type	Name	Default	Description
Constant inputs
kc_turbulent_IN_con	IN_con		Input record for function kc_turbulent_KC
Variable inputs
kc_turbulent_IN_var	IN_var		Input record for function kc_turbulent_KC

Outputs

Type	Name	Description
CoefficientOfHeatTransfer	kc	Output for function kc_turbulent_KC [W/(m2.K)]

Modelica definition

function kc_turbulent_KC 
  "Mean heat transfer coefficient of helical pipe | hydrodynamically developed turbulent flow regime"

  //SOURCE: VDI-Waermeatlas, 9th edition, Springer-Verlag, 2002, section Gc1 - Gc2
  //Notation of equations according to SOURCE

  //icon
  extends Modelica.Fluid.Dissipation.Utilities.Icons.HeatTransfer.HelicalPipe1_d;

  //input records
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_IN_con
    IN_con "Input record for function kc_turbulent_KC";
  input Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_IN_var
    IN_var "Input record for function kc_turbulent_KC";

  //output variables
  output SI.CoefficientOfHeatTransfer kc "Output for function kc_turbulent_KC";

protected 
  Real MIN=Modelica.Constants.eps;
  Real turbulent=2.2e4 "Minimum Reynolds number for turbulent regime";

  SI.Diameter d_hyd=IN_con.d_hyd "Hydraulic diameter";
  SI.Area A_cross=PI*IN_con.d_hyd^2/4 "Circular cross sectional area";
  SI.Diameter d_s=IN_con.L/(IN_con.n_nt*PI) "Mean coil diameter";
  SI.Diameter d_w=sqrt(max(MIN, (d_s^2 - (IN_con.h/PI)^2))) 
    "Mean helical pipe diameter";
  SI.Diameter d_coil=max(d_w, d_w*(1 + (IN_con.h/(PI*d_w))^2)) 
    "Mean curvature diameter of helical pipe";

  SI.Velocity velocity=abs(IN_var.m_flow)/max(MIN, IN_var.rho*A_cross) 
    "Mean velocity";
  SI.ReynoldsNumber Re=max(1e-3, IN_var.rho*velocity*IN_con.d_hyd/max(MIN,
      IN_var.eta));
  SI.PrandtlNumber Pr=abs(IN_var.eta*IN_var.cp/max(MIN, IN_var.lambda));

  Real zeta_TOT=0.3164*max(turbulent, Re)^(-0.25) + 0.03*sqrt(IN_con.d_hyd/
      d_coil) "Pressure loss coefficient";

  //Documentation
algorithm 
  kc := (IN_var.lambda/IN_con.d_hyd)*(zeta_TOT/8)*Re*Pr/(1 + 12.7*sqrt(zeta_TOT
    /8)*(Pr^(2/3) - 1));
end kc_turbulent_KC;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_IN_con

Information

Extends from Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_con (Input record for function kc_overall and kc_overall_KC).

Parameters

Type	Name	Default	Description
HelicalPipe
Real	n_nt	1	Total number of turns
Diameter	d_hyd	0.1	Hydraulic diameter [m]
Length	h	0.01	Distance between turns [m]
Length	L	1	Total length of helical pipe [m]

Modelica definition

record kc_turbulent_IN_con 
  "Input record for function kc_turbulent and kc_turbulent_KC"

  extends Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_con;

end kc_turbulent_IN_con;

Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_turbulent_IN_var

Information

Extends from Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_var (Input record for function kc_overall and kc_overall_KC).

Parameters

Type	Name	Default	Description
Fluid properties
SpecificHeatCapacityAtConstantPressure	cp		Specific heat capacity of fluid at constant pressure [J/(kg.K)]
DynamicViscosity	eta		Dynamic viscosity of fluid [Pa.s]
ThermalConductivity	lambda		Thermal conductivity of fluid [W/(m.K)]
Density	rho		Density of fluid [kg/m3]
Input
MassFlowRate	m_flow		[kg/s]

Modelica definition

record kc_turbulent_IN_var 
  "Input record for function kc_turbulent and kc_turbulent_KC"

  extends Modelica.Fluid.Dissipation.HeatTransfer.HelicalPipe.kc_overall_IN_var;

end kc_turbulent_IN_var;