Changeset 530
- Timestamp:
- 08/13/07 08:17:21 (16 months ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
Modelica/branches/maintenance/2.2.1/Modelica/Thermal/FluidHeatFlow.mo
r482 r530 2 2 "Simple components for 1-dimensional incompressible thermo-fluid flow models" 3 3 extends Modelica.Icons.Library2; 4 type TemperatureDifference = Real (5 final quantity="TemperatureDifference",6 final unit="K",7 displayUnit="K");8 4 annotation ( 9 version="1.6. 0 Beta", versionDate="2007-01-23",5 version="1.6.1", versionDate="2007-08-12", 10 6 preferedView="info",Documentation(info="<HTML> 11 7 <p> … … 113 109 <li> v1.60 2007/01/23 Anton Haumer<br> 114 110 new parameter tapT defining Temperature of heatPort </li> 111 <li> v1.6.1 2007/08/12 Anton Haumer<br> 112 improved documentation<br> 113 removed type TemperatureDifference since this is defined in Modelica.SIunits</li> 115 114 </ul> 116 115 </HTML> … … 208 207 fillPattern=1)))); 209 208 210 model SimpleCooling 209 model SimpleCooling "Example: simple cooling circuit" 211 210 extends Modelica.Icons.Example; 212 211 annotation (Documentation(info="<HTML> … … 248 247 experimentSetupOutput); 249 248 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 249 "Cooling medium" 250 250 annotation(choicesAllMatching=true); 251 251 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 252 " ambient temperature";253 output TemperatureDifference dTSource=252 "Ambient temperature"; 253 output Modelica.SIunits.TemperatureDifference dTSource= 254 254 PrescribedHeatFlow1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 255 255 "Source over Ambient"; 256 output TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T256 output Modelica.SIunits.TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T 257 257 "Source over Coolant"; 258 output TemperatureDifference dTCoolant=Pipe1.dT258 output Modelica.SIunits.TemperatureDifference dTCoolant=Pipe1.dT 259 259 "Coolant's temperature increase"; 260 260 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 310 310 end SimpleCooling; 311 311 312 model ParallelCooling 312 model ParallelCooling "Example: coolig circuit with parallel branches" 313 313 extends Modelica.Icons.Example; 314 314 annotation (Documentation(info="<HTML> … … 374 374 experimentSetupOutput); 375 375 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 376 "Cooling medium" 376 377 annotation(choicesAllMatching=true); 377 378 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 378 " ambient temperature";379 output TemperatureDifference dTSource1=379 "Ambient temperature"; 380 output Modelica.SIunits.TemperatureDifference dTSource1= 380 381 PrescribedHeatFlow1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 381 382 "Source1 over Ambient"; 382 output TemperatureDifference dTtoPipe1=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T383 output Modelica.SIunits.TemperatureDifference dTtoPipe1=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T 383 384 "Source1 over Coolant1"; 384 output TemperatureDifference dTCoolant1=Pipe1.dT385 output Modelica.SIunits.TemperatureDifference dTCoolant1=Pipe1.dT 385 386 "Coolant1's temperature increase"; 386 output TemperatureDifference dTSource2=387 output Modelica.SIunits.TemperatureDifference dTSource2= 387 388 PrescribedHeatFlow2.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 388 389 "Source2 over Ambient"; 389 output TemperatureDifference dTtoPipe2=PrescribedHeatFlow2.port.T-Pipe2.heatPort.T390 output Modelica.SIunits.TemperatureDifference dTtoPipe2=PrescribedHeatFlow2.port.T-Pipe2.heatPort.T 390 391 "Source2 over Coolant2"; 391 output TemperatureDifference dTCoolant2=Pipe2.dT392 output Modelica.SIunits.TemperatureDifference dTCoolant2=Pipe2.dT 392 393 "Coolant2's temperature increase"; 393 output TemperatureDifference dTmixedCoolant=Ambient2.T_port-Ambient1.T_port394 output Modelica.SIunits.TemperatureDifference dTmixedCoolant=Ambient2.T_port-Ambient1.T_port 394 395 "mixed Coolant's temperature increase"; 395 396 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 479 480 end ParallelCooling; 480 481 481 model IndirectCooling 482 model IndirectCooling "Example: indirect cooling circuit" 482 483 extends Modelica.Icons.Example; 483 484 annotation (Documentation(info="<HTML> … … 532 533 experimentSetupOutput); 533 534 parameter FluidHeatFlow.Media.Medium outerMedium=FluidHeatFlow.Media.Medium() 535 "Outer medium" 534 536 annotation(choicesAllMatching=true); 535 537 parameter FluidHeatFlow.Media.Medium innerMedium=FluidHeatFlow.Media.Medium() 538 "Inner medium" 536 539 annotation(choicesAllMatching=true); 537 540 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 538 " ambient temperature";539 output TemperatureDifference dTSource=541 "Ambient temperature"; 542 output Modelica.SIunits.TemperatureDifference dTSource= 540 543 PrescribedHeatFlow1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 541 544 "Source over Ambient"; 542 output TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T545 output Modelica.SIunits.TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T 543 546 "Source over inner Coolant"; 544 output TemperatureDifference dTinnerCoolant=Pipe1.dT547 output Modelica.SIunits.TemperatureDifference dTinnerCoolant=Pipe1.dT 545 548 "inner Coolant's temperature increase"; 546 output TemperatureDifference dTCooler=innerPipe.heatPort.T-outerPipe.heatPort.T549 output Modelica.SIunits.TemperatureDifference dTCooler=innerPipe.heatPort.T-outerPipe.heatPort.T 547 550 "Cooler's temperature increase between inner and outer pipes"; 548 output TemperatureDifference dTouterCoolant=outerPipe.dT551 output Modelica.SIunits.TemperatureDifference dTouterCoolant=outerPipe.dT 549 552 "outer Coolant's temperature increase"; 550 553 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 647 650 end IndirectCooling; 648 651 649 model PumpAndValve 652 model PumpAndValve "Example: cooling circuit with pump and valve" 650 653 extends Modelica.Icons.Example; 651 654 annotation (Documentation(info="<HTML> … … 671 674 experimentSetupOutput); 672 675 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 676 "Cooling medium" 673 677 annotation(choicesAllMatching=true); 674 678 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 675 " ambient temperature";676 output TemperatureDifference dTSource=679 "Ambient temperature"; 680 output Modelica.SIunits.TemperatureDifference dTSource= 677 681 PrescribedHeatFlow1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 678 682 "Source over Ambient"; 679 output TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T683 output Modelica.SIunits.TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T 680 684 "Source over Coolant"; 681 output TemperatureDifference dTCoolant=Pipe1.dT685 output Modelica.SIunits.TemperatureDifference dTCoolant=Pipe1.dT 682 686 "Coolant's temperature increase"; 683 687 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 756 760 end PumpAndValve; 757 761 758 model PumpDropOut 762 model PumpDropOut "Example: cooling circuit with drop out of pump" 759 763 extends Modelica.Icons.Example; 760 764 annotation (Documentation(info="<HTML> … … 771 775 experimentSetupOutput); 772 776 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 777 "Cooling medium" 773 778 annotation(choicesAllMatching=true); 774 779 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 775 " ambient temperature";776 output TemperatureDifference dTSource=780 "Ambient temperature"; 781 output Modelica.SIunits.TemperatureDifference dTSource= 777 782 PrescribedHeatFlow1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 778 783 "Source over Ambient"; 779 output TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T784 output Modelica.SIunits.TemperatureDifference dTtoPipe=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T 780 785 "Source over Coolant"; 781 output TemperatureDifference dTCoolant=Pipe1.dT786 output Modelica.SIunits.TemperatureDifference dTCoolant=Pipe1.dT 782 787 "Coolant's temperature increase"; 783 788 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 837 842 838 843 model ParallelPumpDropOut 844 "Example: cooling circuit with parallel branches and drop out of pump" 839 845 extends Modelica.Icons.Example; 840 846 annotation (Documentation(info="<HTML> … … 851 857 experimentSetupOutput); 852 858 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 859 "Cooling medium" 853 860 annotation(choicesAllMatching=true); 854 861 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 855 " ambient temperature";856 output TemperatureDifference dTSource1=862 "Ambient temperature"; 863 output Modelica.SIunits.TemperatureDifference dTSource1= 857 864 PrescribedHeatFlow1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 858 865 "Source1 over Ambient"; 859 output TemperatureDifference dTtoPipe1=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T866 output Modelica.SIunits.TemperatureDifference dTtoPipe1=PrescribedHeatFlow1.port.T-Pipe1.heatPort.T 860 867 "Source1 over Coolant1"; 861 output TemperatureDifference dTCoolant1=Pipe1.dT868 output Modelica.SIunits.TemperatureDifference dTCoolant1=Pipe1.dT 862 869 "Coolant1's temperature increase"; 863 output TemperatureDifference dTSource2=870 output Modelica.SIunits.TemperatureDifference dTSource2= 864 871 PrescribedHeatFlow2.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 865 872 "Source2 over Ambient"; 866 output TemperatureDifference dTtoPipe2=PrescribedHeatFlow2.port.T-Pipe2.heatPort.T873 output Modelica.SIunits.TemperatureDifference dTtoPipe2=PrescribedHeatFlow2.port.T-Pipe2.heatPort.T 867 874 "Source2 over Coolant2"; 868 output TemperatureDifference dTCoolant2=Pipe2.dT875 output Modelica.SIunits.TemperatureDifference dTCoolant2=Pipe2.dT 869 876 "Coolant2's temperature increase"; 870 output TemperatureDifference dTmixedCoolant=Ambient2.T_port-Ambient1.T_port877 output Modelica.SIunits.TemperatureDifference dTmixedCoolant=Ambient2.T_port-Ambient1.T_port 871 878 "mixed Coolant's temperature increase"; 872 879 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 956 963 end ParallelPumpDropOut; 957 964 958 model OneMass 965 model OneMass "Example: ccoling of one hot mass" 959 966 extends Modelica.Icons.Example; 960 967 annotation (Documentation(info="<HTML> … … 971 978 experimentSetupOutput); 972 979 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 980 "Cooling medium" 973 981 annotation(choicesAllMatching=true); 974 982 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 975 " ambient temperature";983 "Ambient temperature"; 976 984 parameter Modelica.SIunits.CelsiusTemperature TMass=40 977 " inital temperature of mass";978 output TemperatureDifference dTMass=985 "Inital temperature of mass"; 986 output Modelica.SIunits.TemperatureDifference dTMass= 979 987 HeatCapacitor1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 980 988 "Mass over Ambient"; 981 output TemperatureDifference dTtoPipe=HeatCapacitor1.port.T-Pipe1.heatPort.T989 output Modelica.SIunits.TemperatureDifference dTtoPipe=HeatCapacitor1.port.T-Pipe1.heatPort.T 982 990 "Mass over Coolant"; 983 output TemperatureDifference dTCoolant=Pipe1.dT991 output Modelica.SIunits.TemperatureDifference dTCoolant=Pipe1.dT 984 992 "Coolant's temperature increase"; 985 993 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 1015 1023 connect(Pipe1.flowPort_b, Ambient2.flowPort) 1016 1024 annotation (points=[20,0; 40,0], style(color=1, rgbcolor={255,0,0})); 1017 connect(ThermalConductor1.port_a, HeatCapacitor1.port) annotation (points=[10,-40; 1025 connect(ThermalConductor1.port_a, HeatCapacitor1.port) annotation (points=[10,-40; 1018 1026 10,-40; 10,-50; 10,-50], style(color=42, rgbcolor={191,0,0})); 1019 1027 connect(Pipe1.heatPort, ThermalConductor1.port_b) … … 1023 1031 end OneMass; 1024 1032 1025 model TwoMass 1033 model TwoMass "Example: cooling of two hot masses" 1026 1034 extends Modelica.Icons.Example; 1027 1035 annotation (Documentation(info="<HTML> … … 1038 1046 experimentSetupOutput); 1039 1047 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 1048 "Cooling medium" 1040 1049 annotation(choicesAllMatching=true); 1041 1050 parameter Modelica.SIunits.CelsiusTemperature TAmb=20 1042 " ambient temperature";1051 "Ambient temperature"; 1043 1052 parameter Modelica.SIunits.CelsiusTemperature TMass1=40 1044 " inital temperature of mass1";1053 "Inital temperature of mass1"; 1045 1054 parameter Modelica.SIunits.CelsiusTemperature TMass2=60 1046 " inital temperature of mass2";1047 output TemperatureDifference dTMass1=1055 "Inital temperature of mass2"; 1056 output Modelica.SIunits.TemperatureDifference dTMass1= 1048 1057 HeatCapacitor1.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 1049 1058 "Mass1 over Ambient"; 1050 output TemperatureDifference dTtoPipe1=HeatCapacitor1.port.T-Pipe1.heatPort.T1059 output Modelica.SIunits.TemperatureDifference dTtoPipe1=HeatCapacitor1.port.T-Pipe1.heatPort.T 1051 1060 "Mass1 over Coolant1"; 1052 output TemperatureDifference dTCoolant1=Pipe1.dT1061 output Modelica.SIunits.TemperatureDifference dTCoolant1=Pipe1.dT 1053 1062 "Coolant1's temperature increase"; 1054 output TemperatureDifference dTMass2=1063 output Modelica.SIunits.TemperatureDifference dTMass2= 1055 1064 HeatCapacitor2.port.T-Modelica.SIunits.Conversions.from_degC(TAmb) 1056 1065 "Mass2 over Ambient"; 1057 output TemperatureDifference dTtoPipe2=HeatCapacitor2.port.T-Pipe2.heatPort.T1066 output Modelica.SIunits.TemperatureDifference dTtoPipe2=HeatCapacitor2.port.T-Pipe2.heatPort.T 1058 1067 "Mass2 over Coolant2"; 1059 output TemperatureDifference dTCoolant2=Pipe2.dT1068 output Modelica.SIunits.TemperatureDifference dTCoolant2=Pipe2.dT 1060 1069 "Coolant2's temperature increase"; 1061 output TemperatureDifference dTmixedCoolant=Ambient2.T_port-Ambient1.T_port1070 output Modelica.SIunits.TemperatureDifference dTmixedCoolant=Ambient2.T_port-Ambient1.T_port 1062 1071 "mixed Coolant's temperature increase"; 1063 1072 FluidHeatFlow.Sources.Ambient Ambient1(T_Ambient=Modelica.SIunits.Conversions.from_degC(TAmb), … … 1115 1124 connect(Pipe3.flowPort_b, Ambient2.flowPort) 1116 1125 annotation (points=[60,0; 80,0], style(color=1, rgbcolor={255,0,0})); 1117 connect(HeatCapacitor2.port, ThermalConductor2.port_a) annotation (points=[10,60; 1126 connect(HeatCapacitor2.port, ThermalConductor2.port_a) annotation (points=[10,60; 1118 1127 10,55.5; 10,50; 10,50], style(color=42, rgbcolor={191,0,0})); 1119 1128 connect(ThermalConductor2.port_b, Pipe2.heatPort) … … 1121 1130 connect(Pipe1.heatPort, ThermalConductor1.port_b) annotation (points=[10,-20; 1122 1131 10,-30], style(color=42, rgbcolor={191,0,0})); 1123 connect(ThermalConductor1.port_a, HeatCapacitor1.port) annotation (points=[10,-50; 1132 connect(ThermalConductor1.port_a, HeatCapacitor1.port) annotation (points=[10,-50; 1124 1133 10,-50; 10,-60; 10,-60], 1125 1134 style(color=42, rgbcolor={191,0,0})); … … 1128 1137 end TwoMass; 1129 1138 1130 package Utilities 1139 package Utilities "Utility models for examples" 1131 1140 extends Modelica.Icons.Library; 1132 1141 annotation (Documentation(info="<html> … … 1172 1181 </HTML>")); 1173 1182 1174 model DoubleRamp 1183 model DoubleRamp "Ramp going up and down" 1175 1184 extends Modelica.Blocks.Interfaces.SO; 1176 parameter Real offset=1 " offset of ramps";1177 parameter Modelica.SIunits.Time startTime=0.2 " startTime of 1st ramp";1185 parameter Real offset=1 "Offset of ramps"; 1186 parameter Modelica.SIunits.Time startTime=0.2 "StartTime of 1st ramp"; 1178 1187 parameter Modelica.SIunits.Time interval=0.2 1179 " interval between end of 1st and beginning of 2nd ramp";1180 parameter Real height_1=-1 "| 1st ramp|Height of ramp";1188 "Interval between end of 1st and beginning of 2nd ramp"; 1189 parameter Real height_1=-1 "|Ramp 1|Height of ramp"; 1181 1190 parameter Modelica.SIunits.Time duration_1(min=Modelica.Constants.small) = 0.2 1182 "| 1st ramp|Duration of ramp";1183 parameter Real height_2=1 "| 2nd ramp|Height of ramp";1191 "|Ramp 1|Duration of ramp"; 1192 parameter Real height_2=1 "|Ramp 2|Height of ramp"; 1184 1193 parameter Modelica.SIunits.Time duration_2(min=Modelica.Constants.small) = 0.2 1185 "| 2nd ramp|Duration of ramp";1194 "|Ramp 2|Duration of ramp"; 1186 1195 annotation ( 1187 1196 Documentation(info="<HTML> … … 1307 1316 fillPattern=1)))); 1308 1317 1309 model IsolatedPipe 1318 model IsolatedPipe "Pipe without heat exchange" 1319 1310 1320 annotation (Documentation(info="<HTML> 1311 1321 <p> … … 1327 1337 extends Interfaces.Partials.SimpleFriction; 1328 1338 parameter Modelica.SIunits.Length h_g=0 1329 " geodetic height (heigth difference from flowPort_a to flowPort_b)";1339 "Geodetic height (heigth difference from flowPort_a to flowPort_b)"; 1330 1340 equation 1331 1341 // coupling with FrictionModel … … 1336 1346 end IsolatedPipe; 1337 1347 1338 model HeatedPipe 1348 model HeatedPipe "Pipe with heat exchange" 1349 1339 1350 annotation (Documentation(info="<HTML> 1340 1351 <p> … … 1368 1379 extends Interfaces.Partials.SimpleFriction; 1369 1380 parameter Modelica.SIunits.Length h_g=0 1370 " geodetic height (heigth difference from flowPort_a to flowPort_b)";1381 "Geodetic height (heigth difference from flowPort_a to flowPort_b)"; 1371 1382 Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a heatPort 1372 1383 annotation (extent=[-10,-110; 10,-90]); … … 1381 1392 end HeatedPipe; 1382 1393 1383 model Valve 1394 model Valve "Simple valve" 1395 1384 1396 annotation (Documentation(info="<HTML> 1385 1397 <p> … … 1417 1429 extends Interfaces.Partials.TwoPort(m=0, final tapT=1); 1418 1430 parameter Boolean LinearCharacteristic=true 1419 "| standard characteristic|type of characteristic"1431 "|Standard characteristic|Type of characteristic" 1420 1432 annotation(choices(choice=true "Linear", choice=false "Exponential")); 1421 1433 parameter Real y1(min=small)=1 1422 "| standard characteristic|max. valve opening";1434 "|Standard characteristic|Max. valve opening"; 1423 1435 parameter Modelica.SIunits.VolumeFlowRate Kv1(min=small)=1 1424 "| standard characteristic|max. flow @ y = y1";1436 "|Standard characteristic|Max. flow @ y = y1"; 1425 1437 parameter Real kv0(min=small,max=1-small)=0.01 1426 "| standard characteristic|leakage flow / max.flow @ y = 0";1438 "|Standard characteristic|Leakage flow / max.flow @ y = 0"; 1427 1439 parameter Modelica.SIunits.Pressure dp0=1 1428 "| standard characteristic|standard pressure drop";1440 "|Standard characteristic|Standard pressure drop"; 1429 1441 parameter Modelica.SIunits.Density rho0 = 10 1430 "| standard characteristic|standard medium's density";1442 "|Standard characteristic|Standard medium's density"; 1431 1443 parameter Real frictionLoss(min=0, max=1) = 0 1432 " part of friction losses fed to medium";1444 "Part of friction losses fed to medium"; 1433 1445 protected 1434 1446 constant Real small = Modelica.Constants.small; 1435 1447 constant Real eps = Modelica.Constants.eps; 1436 Real yLim = max(min(y,y1),0) " limited valve opening";1437 Modelica.SIunits.VolumeFlowRate Kv " standard flow rate";1448 Real yLim = max(min(y,y1),0) "Limited valve opening"; 1449 Modelica.SIunits.VolumeFlowRate Kv "Standard flow rate"; 1438 1450 public 1439 1451 Modelica.Blocks.Interfaces.RealInput y … … 1523 1535 fillPattern=1)))); 1524 1536 1525 connector FlowPort 1537 connector FlowPort "conector flow port" 1538 1526 1539 annotation (Documentation(info="<HTML> 1527 1540 <p> … … 1542 1555 </p> 1543 1556 </HTML>")); 1544 parameter FluidHeatFlow.Media.Medium medium ;1557 parameter FluidHeatFlow.Media.Medium medium "Medium in the connector"; 1545 1558 Modelica.SIunits.Pressure p; 1546 1559 flow Modelica.SIunits.MassFlowRate m_flow; … … 1549 1562 end FlowPort; 1550 1563 1551 connector FlowPort_a 1564 connector FlowPort_a "Filled flow port (used upstream)" 1565 1552 1566 annotation (Documentation(info="<HTML> 1553 1567 <p> … … 1582 1596 end FlowPort_a; 1583 1597 1584 connector FlowPort_b 1598 connector FlowPort_b "Hollow flow port (used downstream)" 1599 1585 1600 annotation (Documentation(info="<HTML> 1586 1601 <p> … … 1608 1623 end FlowPort_b; 1609 1624 1610 package Partials 1625 package Partials "Partial models" 1611 1626 extends Modelica.Icons.Library; 1612 1627 annotation (Documentation(info="<HTML> … … 1669 1684 ")); 1670 1685 1671 partial model SimpleFriction 1686 partial model SimpleFriction "Simple friction model" 1687 1672 1688 annotation (Documentation(info="<HTML> 1673 1689 <p> … … 1719 1735 string="dp ~ V_flow²"))); 1720 1736 parameter Modelica.SIunits.VolumeFlowRate V_flowLaminar(min=Modelica.Constants.small)=0.1 1721 "|SimpleFriction| laminar volume flow";1737 "|SimpleFriction|Laminar volume flow"; 1722 1738 parameter Modelica.SIunits.Pressure dpLaminar=0.1 1723 "|SimpleFriction| laminar pressure drop";1739 "|SimpleFriction|Laminar pressure drop"; 1724 1740 parameter Modelica.SIunits.VolumeFlowRate V_flowNominal=1 1725 "|SimpleFriction| nominal volume flow";1741 "|SimpleFriction|Nominal volume flow"; 1726 1742 parameter Modelica.SIunits.Pressure dpNominal=1 1727 "|SimpleFriction| nominal pressure drop";1743 "|SimpleFriction|Nominal pressure drop"; 1728 1744 parameter Real frictionLoss(min=0, max=1) = 0 1729 "|SimpleFriction| part of friction losses fed to medium";1745 "|SimpleFriction|Part of friction losses fed to medium"; 1730 1746 Modelica.SIunits.Pressure pressureDrop; 1731 1747 Modelica.SIunits.VolumeFlowRate VolumeFlow; … … 1751 1767 end SimpleFriction; 1752 1768 1753 partial model TwoPort 1769 partial model TwoPort "Partial model of two port" 1754 1770 1755 1771 annotation (Documentation(info="<HTML> … … 1764 1780 </HTML>")); 1765 1781 parameter FluidHeatFlow.Media.Medium medium=FluidHeatFlow.Media.Medium() 1782 "Medium in the component" 1766 1783 annotation(choicesAllMatching=true); 1767 parameter Modelica.SIunits.Mass m=1 " mass of medium";1784 parameter Modelica.SIunits.Mass m=1 "Mass of medium"; 1768 1785 parameter Modelica.SIunits.Temperature T0=Modelica.SIunits.Conversions.from_degC(20) 1769 " initial temperature of medium"1786 "Initial temperature of medium" 1770 1787 annotation(Dialog(enable=m>Modelica.Constants.small)); 1771 1788 parameter Real tapT(final min=0, final max=1)=1 1772 " defines temperature of heatPort between inlet and outlet temperature";1789 "Defines temperature of heatPort between inlet and outlet temperature"; 1773 1790 Modelica.SIunits.Pressure dp=flowPort_a.p - flowPort_b.p 1774 " pressure drop a->b";1791 "Pressure drop a->b"; 1775 1792 Modelica.SIunits.VolumeFlowRate V_flow=flowPort_a.m_flow/medium.rho 1776 1793 "Volume flow a->b"; 1777 Modelica.SIunits.HeatFlowRate Q_flow " heat exchange with ambient";1794 Modelica.SIunits.HeatFlowRate Q_flow "Heat exchange with ambient"; 1778 1795 output Modelica.SIunits.Temperature T(start=T0) 1779 " outlet temperature of medium";1796
