Hose

model Hose
    import HydraulicsByFluidon.Media.Base.FluidInterface;
    import SI = Modelica.SIunits;
    import HydraulicsByFluidon.Tools.Pipes;
    import HydraulicsByFluidon.Types.TFluidPort;

    parameter SI.Length diameter = 0.032 "Inner diameter";
    parameter SI.Length length = 1 "Hose length";
    parameter SI.Length deltaH = 0 "Height difference between the ports B and A";
    parameter Modelica.SIunits.DimensionlessRatio relRoughness = 1e-6 "Inner surface relative roughness";
    parameter Modelica.SIunits.BulkModulus bulkModulus = 1e+9 "Bulk modulus of hose";
    parameter Boolean flowInitialisation = true "Initialization of flow rate";
    parameter SI.Frequency fMax = 10 "Highest frequency to be covered";
    parameter SI.Velocity cMin = 1000 "Lowest speed of sound to be expected";
    parameter Boolean forwardFluidProperties = true "Forward fluid properties between ports";
    parameter TFluidPort propertyPort = TFluidPort.portA "Property determining port if forwardFluidProperties = false";
    HydraulicsByFluidon.Interfaces.FluidPort fluidPortA(p(nominal = 100000)) "Hydraulic port A";
    HydraulicsByFluidon.Interfaces.FluidPort fluidPortB(p(nominal = 100000)) "Hydraulic port B";
equation
    /* Implementation is Protected */
end Hose;