| 1 | encapsulated package simpleTrain | 
|---|
| 2 | import Modelica; | 
|---|
| 3 | model ReteNew "Modello della rete di alimentazione DC a 3 SSE - ALIM. BILATERA E MONOLATERA" | 
|---|
| 4 | Modelica.Blocks.Interfaces.RealInput Posizione "Posizione del tram durante la marcia (BINARIO PARI) [m]" annotation(Placement(transformation(extent = {{-280,38},{-240,78}}), iconTransformation(extent = {{-280,36},{-240,76}}))); | 
|---|
| 5 | Modelica.Electrical.Analog.Interfaces.PositivePin pin_p annotation(Placement(transformation(extent = {{290,-270},{310,-250}}))); | 
|---|
| 6 | Modelica.Electrical.Analog.Interfaces.Pin pin annotation(Placement(transformation(extent = {{-180,90},{-160,110}}), iconTransformation(extent = {{-180,92},{-160,112}}))); | 
|---|
| 7 | Modelica.Electrical.Analog.Interfaces.Pin pin1 annotation(Placement(transformation(extent = {{52,90},{72,110}}), iconTransformation(extent = {{70,92},{90,112}}))); | 
|---|
| 8 | Modelica.Electrical.Analog.Interfaces.Pin pin2 annotation(Placement(transformation(extent = {{322,90},{342,110}}), iconTransformation(extent = {{320,92},{340,112}}))); | 
|---|
| 9 | parameter Real Posizione_SSE[n] = {580,1744,3141} "Posizione assoluta delle SSE lungo l'intera tratta del convoglio ferroviario [m]"; | 
|---|
| 10 | Real R_spec[2] = {0.000108,0.000143} "Resistenza specifica della linea di alimentazione e binario [Ohm/m](da 0 a 1744 � 0.000108 ohm/m e da 1744 in poi di 0.000143 "; | 
|---|
| 11 | Real R_SSE[2 * n - 1] "Vettore di gestione delle resistenze destra e sinistra tra le varie sottostazioni [Ohm](BINARIO PARI)"; | 
|---|
| 12 | Real R_SSE_1[2 * n - 1] "Vettore di gestione delle resistenze destra e sinistra tra le varie sottostazioni [Ohm](BINARIO DISPARI)"; | 
|---|
| 13 | Real alfa "Variabile utilizzata per il calcolo della resistenza destra e sinistra tra le due sottostazioni attuali [Rxy_s=Rtot*alfa e Rxy_d=Rtot*(1-alfa)](BINARIO PARI)"; | 
|---|
| 14 | Real alfa1 "Variabile utilizzata per il calcolo della resistenza destra e sinistra tra le due sottostazioni attuali [Rxy_s=Rtot*alfa1 e Rxy_d=Rtot*(1-alfa1)](BINARIO DISPARI)"; | 
|---|
| 15 | Real Ltot[n] "Distanza totale tra le coppie di SSE contigue (es.SS1-SSE2 SS2-SSE3 etc...) [m] NOTA: L'INDICE 1 E' USATO PER LA GESTIONE DELLA RESISTENZA PER ALIM. MONOLATERA"; | 
|---|
| 16 | Real Rtot[n] "Resistenza totale tra le coppie di SSE contigue (es.SS1-SSE2 SS2-SSE3 etc...)[Ohm]. NOTA: L'INDICE 1 E' USATO PER LA GESTIONE DELLA RESISTENZA PER ALIM. MONOLATERA"; | 
|---|
| 17 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor annotation(Placement(transformation(extent = {{-70,30},{-50,50}}))); | 
|---|
| 18 | Modelica.Blocks.Sources.RealExpression R_SSE2(y = R_SSE[2]) annotation(Placement(transformation(extent = {{-21,-16},{21,16}}, rotation = 270, origin = {-60,81}))); | 
|---|
| 19 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor1 annotation(Placement(transformation(extent = {{-8,30},{12,50}}))); | 
|---|
| 20 | Modelica.Blocks.Sources.RealExpression R_SSE3(y = R_SSE[3]) annotation(Placement(transformation(extent = {{-20,-13},{20,13}}, rotation = 270, origin = {3,80}))); | 
|---|
| 21 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor2 annotation(Placement(transformation(extent = {{220,30},{240,50}}))); | 
|---|
| 22 | Modelica.Blocks.Sources.RealExpression R_SSE4(y = R_SSE[4]) annotation(Placement(transformation(extent = {{-20,-13},{20,13}}, rotation = 270, origin = {231,80}))); | 
|---|
| 23 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor3 annotation(Placement(transformation(extent = {{280,30},{300,50}}))); | 
|---|
| 24 | Modelica.Blocks.Sources.RealExpression R_SSE5(y = R_SSE[5]) annotation(Placement(transformation(extent = {{-20,-14},{20,14}}, rotation = 270, origin = {290,80}))); | 
|---|
| 25 | Integer z "Indice di tratta (z=1 tratto monolatero, z>1 tratte bilatere (BINARIO PARI)"; | 
|---|
| 26 | Integer z1 "Indice di tratta (z=1 tratto monolatero, z>1 tratte bilatere (BINARIO DISPARI)"; | 
|---|
| 27 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor15 annotation(Placement(transformation(extent = {{-198,30},{-178,50}}))); | 
|---|
| 28 | Modelica.Blocks.Sources.RealExpression R_SSE1(y = R_SSE[1]) annotation(Placement(transformation(extent = {{-21,-14},{21,14}}, rotation = 270, origin = {-214,81}))); | 
|---|
| 29 | Modelica.Blocks.Interfaces.RealInput Posizione1 "Posizione del tram durante la marcia (BINARIO DISPARI) [m]" annotation(Placement(transformation(extent = {{-280,-82},{-240,-42}}), iconTransformation(extent = {{-278,-82},{-238,-42}}))); | 
|---|
| 30 | Modelica.Blocks.Sources.RealExpression R_SSE12(y = R_SSE_1[1]) annotation(Placement(transformation(extent = {{-22,-14},{22,14}}, rotation = 270, origin = {-186,-98}))); | 
|---|
| 31 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor6 annotation(Placement(transformation(extent = {{-70,-150},{-50,-130}}))); | 
|---|
| 32 | Modelica.Blocks.Sources.RealExpression R_SSE13(y = R_SSE_1[2]) annotation(Placement(transformation(extent = {{-21,-16},{21,16}}, rotation = 270, origin = {-60,-99}))); | 
|---|
| 33 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor7 annotation(Placement(transformation(extent = {{-8,-150},{12,-130}}))); | 
|---|
| 34 | Modelica.Blocks.Sources.RealExpression R_SSE14(y = R_SSE_1[3]) annotation(Placement(transformation(extent = {{-20,-13},{20,13}}, rotation = 270, origin = {3,-100}))); | 
|---|
| 35 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor8 annotation(Placement(transformation(extent = {{220,-150},{240,-130}}))); | 
|---|
| 36 | Modelica.Blocks.Sources.RealExpression R_SSE15(y = R_SSE_1[4]) annotation(Placement(transformation(extent = {{-20,-13},{20,13}}, rotation = 270, origin = {231,-100}))); | 
|---|
| 37 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor13 annotation(Placement(transformation(extent = {{280,-150},{300,-130}}))); | 
|---|
| 38 | Modelica.Blocks.Sources.RealExpression R_SSE16(y = R_SSE_1[5]) annotation(Placement(transformation(extent = {{-20,-14},{20,14}}, rotation = 270, origin = {290,-100}))); | 
|---|
| 39 | Modelica.Blocks.Sources.IntegerExpression tratta1(y = z1) annotation(Placement(transformation(extent = {{-11.5,-14.5},{11.5,14.5}}, rotation = 90, origin = {79.5,-196.5}))); | 
|---|
| 40 | Modelica.Electrical.Analog.Basic.VariableResistor variableResistor20 annotation(Placement(transformation(extent = {{-196,-150},{-176,-130}}))); | 
|---|
| 41 | Modelica.Electrical.Analog.Interfaces.PositivePin pin_p1 annotation(Placement(transformation(extent = {{-88,-270},{-68,-250}}), iconTransformation(extent = {{-88,-270},{-68,-250}}))); | 
|---|
| 42 | parameter Integer n = 3 "Numero di Sottostazioni (SSE): Nella pratica si usa come indice per la gestione dei cicli all'interno del codice"; | 
|---|
| 43 | //BINARIO PARI: | 
|---|
| 44 | condNodeZ condNodeZ1 annotation(Placement(transformation(extent = {{-10,-10},{10,10}}, rotation = 90, origin = {-214,30}))); | 
|---|
| 45 | condNodeZ condNodeZ2(index = 2) annotation(Placement(transformation(extent = {{-10,-10},{10,10}}, rotation = 90, origin = {-24,30}))); | 
|---|
| 46 | condNodeZ condNodeZ3(index = 3) annotation(Placement(transformation(extent = {{-10,-10},{10,10}}, rotation = 90, origin = {264,30}))); | 
|---|
| 47 | Modelica.Blocks.Sources.IntegerExpression tratta(y = z) annotation(Placement(transformation(extent = {{-11,-16},{11,16}}, rotation = 90, origin = {-97,-14}))); | 
|---|
| 48 | condNodeZ condNodeZ4(index = 1) annotation(Placement(transformation(extent = {{-10,-10},{10,10}}, rotation = 90, origin = {-218,-150}))); | 
|---|
| 49 | condNodeZ condNodeZ5(index = 2) annotation(Placement(transformation(extent = {{-10,-10},{10,10}}, rotation = 90, origin = {-26,-150}))); | 
|---|
| 50 | condNodeZ condNodeZ6(index = 3) annotation(Placement(transformation(extent = {{-10,-10},{10,10}}, rotation = 90, origin = {262,-150}))); | 
|---|
| 51 | equation | 
|---|
| 52 | //Incremento del contatore di tratta (z): | 
|---|
| 53 | algorithm | 
|---|
| 54 | z:=1; | 
|---|
| 55 | for i in 1:n - 1 loop | 
|---|
| 56 | if Posizione > Posizione_SSE[i] then | 
|---|
| 57 | z:=z + 1; | 
|---|
| 58 | else | 
|---|
| 59 |  | 
|---|
| 60 | end if; | 
|---|
| 61 | end for; | 
|---|
| 62 | equation | 
|---|
| 63 | for i in 1:n loop | 
|---|
| 64 | if i <> 1 then | 
|---|
| 65 | Ltot[i] = Posizione_SSE[i] - Posizione_SSE[i - 1]; | 
|---|
| 66 | else | 
|---|
| 67 | Ltot[i] = Posizione_SSE[i] - 0; | 
|---|
| 68 | end if; | 
|---|
| 69 | if i <= 2 then | 
|---|
| 70 | Rtot[i] = R_spec[1] * Ltot[i]; | 
|---|
| 71 | else | 
|---|
| 72 | Rtot[i] = R_spec[2] * Ltot[i]; | 
|---|
| 73 | end if; | 
|---|
| 74 | if i <> 1 then | 
|---|
| 75 | R_SSE[2 * i - 2] = if z <> i then Rtot[i] else (1 - alfa) * Rtot[i]; | 
|---|
| 76 | R_SSE[2 * i - 1] = if z <> i then 0 else alfa * Rtot[i]; | 
|---|
| 77 | else | 
|---|
| 78 | R_SSE[i] = if z <> i then Rtot[1] else alfa * Rtot[i]; | 
|---|
| 79 | end if; | 
|---|
| 80 |  | 
|---|
| 81 | end for; | 
|---|
| 82 | //Calcolo della distanza totale tra le due SSE (Ltot) contigue necessaria per calcolare la resistenza totale (Rtot) tra le due SSE | 
|---|
| 83 | //Lunghezza tratti bilateri (i>1): | 
|---|
| 84 | //Lunghezza tratto monolatero (i=1): | 
|---|
| 85 | //Gestione della resistenza specifica e calcolo di Rtot nei vari tratti (R_spec vale da 0 a 1744 � 0.000108 ohm/m e da 1744 in poi 0.000143): | 
|---|
| 86 | //Calcolo delle resistenza totale (Rtot) da 0 alla seconda sottostazione (ascissa pari a 1744): | 
|---|
| 87 | //Calcolo della resistenza totale (Rtot) tra due SSE dalla seconda SSE in poi (da 1744 in avanti): | 
|---|
| 88 | //Gestione degli elementi del vettore R_SSE, ossia del vettore delle resistenze longitudinali tra le sottostazioni (SSE): | 
|---|
| 89 | //Gestione degli elementi per i tratti bilateri (z>1): | 
|---|
| 90 | //Gestione per il tratto monolatero (z=1): | 
|---|
| 91 | //Gestione dell'alfa tra le varie sottostazioni e nel caso di velocit� positive e negative: | 
|---|
| 92 | alfa = (Posizione_SSE[z] - Posizione) / Ltot[z]; | 
|---|
| 93 | //BINARIO DISPARI: | 
|---|
| 94 | algorithm | 
|---|
| 95 | //Incremento del contatore di tratta (z): | 
|---|
| 96 | z1:=1; | 
|---|
| 97 | for i in 1:n - 1 loop | 
|---|
| 98 | if Posizione1 > Posizione_SSE[i] then | 
|---|
| 99 | z1:=z1 + 1; | 
|---|
| 100 | else | 
|---|
| 101 |  | 
|---|
| 102 | end if; | 
|---|
| 103 | end for; | 
|---|
| 104 | equation | 
|---|
| 105 | for i in 1:n loop | 
|---|
| 106 | if i <> 1 then | 
|---|
| 107 | R_SSE_1[2 * i - 2] = if z1 <> i then Rtot[i] else (1 - alfa1) * Rtot[i]; | 
|---|
| 108 | R_SSE_1[2 * i - 1] = if z1 <> i then 0 else alfa1 * Rtot[i]; | 
|---|
| 109 | else | 
|---|
| 110 | R_SSE_1[i] = if z1 <> i then Rtot[1] else alfa1 * Rtot[i]; | 
|---|
| 111 | end if; | 
|---|
| 112 |  | 
|---|
| 113 | end for; | 
|---|
| 114 | //Gestione degli elementi del vettore R_SSE, ossia del vettore delle resistenze longitudinali tra le sottostazioni (SSE): | 
|---|
| 115 | //Gestione degli elementi per i tratti bilateri (z1>1): | 
|---|
| 116 | //Gestione per il tratto monolatero (z=1): | 
|---|
| 117 | //Gestione dell'alfa tra le varie sottostazioni e nel caso di velocit� positive e negative: | 
|---|
| 118 | alfa1 = (Posizione_SSE[z1] - Posizione1) / Ltot[z1]; | 
|---|
| 119 | connect(variableResistor.p,pin) annotation(Line(points = {{-70,40},{-170,40},{-170,100}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 120 | connect(R_SSE2.y,variableResistor.R) annotation(Line(points = {{-60,57.9},{-60,54.45},{-60,54.45},{-60,51}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 121 | connect(R_SSE3.y,variableResistor1.R) annotation(Line(points = {{3,58},{3,54},{2,54},{2,51}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 122 | connect(variableResistor2.p,variableResistor1.n) annotation(Line(points = {{220,40},{12,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 123 | connect(R_SSE4.y,variableResistor2.R) annotation(Line(points = {{231,58},{231,54},{230,54},{230,51}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 124 | connect(R_SSE5.y,variableResistor3.R) annotation(Line(points = {{290,58},{290,51}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 125 | connect(pin1,variableResistor1.n) annotation(Line(points = {{62,100},{62,40},{12,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 126 | connect(pin2,variableResistor3.n) annotation(Line(points = {{332,100},{332,40},{300,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 127 | connect(variableResistor15.n,pin) annotation(Line(points = {{-178,40},{-170,40},{-170,100}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 128 | connect(R_SSE1.y,variableResistor15.R) annotation(Line(points = {{-214,57.9},{-214,54},{-188,54},{-188,51}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 129 | connect(R_SSE13.y,variableResistor6.R) annotation(Line(points = {{-60,-122.1},{-60,-125.55},{-60,-125.55},{-60,-129}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 130 | connect(R_SSE14.y,variableResistor7.R) annotation(Line(points = {{3,-122},{3,-126},{2,-126},{2,-129}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 131 | connect(variableResistor8.p,variableResistor7.n) annotation(Line(points = {{220,-140},{12,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 132 | connect(R_SSE15.y,variableResistor8.R) annotation(Line(points = {{231,-122},{231,-126},{230,-126},{230,-129}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 133 | connect(R_SSE16.y,variableResistor13.R) annotation(Line(points = {{290,-122},{290,-129}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 134 | connect(variableResistor15.n,pin) annotation(Line(points = {{-178,40},{-170,40},{-170,100}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 135 | connect(R_SSE12.y,variableResistor20.R) annotation(Line(points = {{-186,-122.2},{-186,-129}}, color = {0,0,127}, smooth = Smooth.None)); | 
|---|
| 136 | connect(variableResistor20.n,variableResistor6.p) annotation(Line(points = {{-176,-140},{-70,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 137 | connect(variableResistor6.p,pin) annotation(Line(points = {{-70,-140},{-136,-140},{-136,40},{-170,40},{-170,100}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 138 | connect(variableResistor7.n,pin1) annotation(Line(points = {{12,-140},{62,-140},{62,100}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 139 | connect(pin2,variableResistor13.n) annotation(Line(points = {{332,100},{332,-140},{300,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 140 | connect(condNodeZ1.n2,variableResistor15.p) annotation(Line(points = {{-208,39.8},{-202,39.8},{-202,40},{-198,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 141 | connect(condNodeZ2.n1,variableResistor.n) annotation(Line(points = {{-30,40},{-41.6,40},{-41.6,40},{-50,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 142 | connect(condNodeZ2.n2,variableResistor1.p) annotation(Line(points = {{-18,39.8},{-13,39.8},{-13,40},{-8,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 143 | connect(condNodeZ3.n1,variableResistor2.n) annotation(Line(points = {{258,40},{250.4,40},{250.4,40},{240,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 144 | connect(condNodeZ3.n2,variableResistor3.p) annotation(Line(points = {{270,39.8},{275,39.8},{275,40},{280,40}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 145 | connect(pin_p,condNodeZ3.p) annotation(Line(points = {{300,-260},{300,-200},{320,-200},{320,10},{264,10},{264,30.2}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 146 | connect(condNodeZ2.p,condNodeZ3.p) annotation(Line(points = {{-24,30.2},{-24,12},{264,12},{264,30.2}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 147 | connect(condNodeZ2.p,condNodeZ1.p) annotation(Line(points = {{-24,30.2},{-24,12},{-214,12},{-214,30.2}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 148 | connect(tratta.y,condNodeZ1.z) annotation(Line(points = {{-97,-1.9},{-164,0},{-228,0},{-228,30.2}}, color = {255,127,0}, smooth = Smooth.None)); | 
|---|
| 149 | connect(tratta.y,condNodeZ2.z) annotation(Line(points = {{-97,-1.9},{-38,-1.9},{-38,30.2}}, color = {255,127,0}, smooth = Smooth.None)); | 
|---|
| 150 | connect(tratta.y,condNodeZ3.z) annotation(Line(points = {{-97,-1.9},{246,-2},{252,-2},{252,30.2},{250,30.2}}, color = {255,127,0}, smooth = Smooth.None)); | 
|---|
| 151 | connect(condNodeZ4.n2,variableResistor20.p) annotation(Line(points = {{-212,-140.2},{-204,-140.2},{-204,-140},{-196,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 152 | connect(variableResistor6.n,condNodeZ5.n1) annotation(Line(points = {{-50,-140},{-40.6,-140},{-40.6,-140},{-32,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 153 | connect(condNodeZ5.n2,variableResistor7.p) annotation(Line(points = {{-20,-140.2},{-14,-140.2},{-14,-140},{-8,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 154 | connect(variableResistor8.n,condNodeZ6.n1) annotation(Line(points = {{240,-140},{248.4,-140},{248.4,-140},{256,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 155 | connect(condNodeZ6.n2,variableResistor13.p) annotation(Line(points = {{268,-140.2},{274,-140.2},{274,-140},{280,-140}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 156 | connect(pin_p1,condNodeZ4.p) annotation(Line(points = {{-78,-260},{-78,-168},{-218,-168},{-218,-149.8}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 157 | connect(pin_p1,condNodeZ5.p) annotation(Line(points = {{-78,-260},{-78,-206},{-26,-206},{-26,-149.8}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 158 | connect(condNodeZ6.p,pin_p1) annotation(Line(points = {{262,-149.8},{262,-168},{-78,-168},{-78,-260}}, color = {0,0,255}, smooth = Smooth.None)); | 
|---|
| 159 | connect(condNodeZ4.z,tratta1.y) annotation(Line(points = {{-232,-149.8},{-230,-149.8},{-230,-183.85},{79.5,-183.85}}, color = {255,127,0}, smooth = Smooth.None)); | 
|---|
| 160 | connect(condNodeZ5.z,tratta1.y) annotation(Line(points = {{-40,-149.8},{-40,-183.85},{79.5,-183.85}}, color = {255,127,0}, smooth = Smooth.None)); | 
|---|
| 161 | connect(condNodeZ6.z,tratta1.y) annotation(Line(points = {{248,-149.8},{248,-183.85},{79.5,-183.85}}, color = {255,127,0}, smooth = Smooth.None)); | 
|---|
| 162 | annotation(Diagram(coordinateSystem(extent = {{-240,-260},{400,100}}, preserveAspectRatio = true), graphics), Icon(coordinateSystem(extent = {{-240,-260},{400,100}}, preserveAspectRatio = true, initialScale = 0.1, grid = {2,2}), graphics = {Rectangle(extent = {{-240,100},{402,-98}}, lineColor = {0,0,0}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid),Text(extent = {{-368,-96},{-198,-116}}, textString = "Dispari", textStyle = {TextStyle.Italic}),Line(points = {{-78,-102},{-78,-262},{-78,-262}}, color = {0,0,255}),Line(points = {{300,-102},{300,-266},{298,-264}}, color = {0,0,255}),Text(extent = {{-360,28},{-226,8}}, textString = "Pari"),Text(origin = {284,-170}, rotation = 90, extent = {{-84,12},{84,-12}}, textString = "Pari"),Text(origin = {-102,-176}, rotation = 90, extent = {{-48,2},{48,-2}}, textString = "Dispari"),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{-212,64},{-192,54}}),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{-130,64},{-110,54}}),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{20,64},{40,54}}),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{120,64},{140,54}}),Rectangle(origin = {-76,0}, lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{360,64},{380,54}}),Line(points = {{320,62},{320,64}}, color = {215,215,215}),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{-210,-34},{-190,-44}}),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{-132,-34},{-112,-44}}),Line(points = {{-40,-38},{-40,-36}}, color = {215,215,215}),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{20,-34},{40,-44}}),Rectangle(lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{120,-34},{140,-44}}),Rectangle(origin = {-76,0}, lineColor = {215,215,215}, fillColor = {255,255,255}, fillPattern = FillPattern.Solid, extent = {{360,-34},{380,-44}}),Line(points = {{320,-38},{320,-36}}, color = {215,215,215}),Line(points = {{-192,60},{-140,60},{-128,60}}, color = {215,215,215}),Line(points = {{-170,92},{-170,-40},{-130,-40},{-130,-40}}, color = {215,215,215}),Line(points = {{-168,-40},{-190,-40},{-190,-40}}, color = {215,215,215}),Line(points = {{-108,60},{20,60}}, color = {215,215,215}),Line(points = {{40,60},{120,60},{120,60}}, color = {215,215,215}),Line(points = {{140,60},{220,60},{248,60}}, color = {215,215,215}),Line(points = {{238,60},{286,60}}, color = {215,215,215}),Line(origin = {0,0}, points = {{304,60},{330,60}}, color = {215,215,215}),Line(points = {{80,100},{80,60},{80,-40}}, color = {215,215,215}),Line(origin = {-90,0}, points = {{420,100},{420,-40},{392,-40},{392,-40}}, color = {215,215,215}),Line(points = {{284,-40},{240,-40},{240,-40}}, color = {215,215,215}),Line(points = {{250,-40},{140,-40},{140,-40}}, color = {215,215,215}),Line(points = {{120,-40},{60,-40},{40,-40}}, color = {215,215,215}),Line(points = {{-120,-40},{-60,-40},{-26,-40}}, color = {215,215,215}),Line(points = {{-40,-40},{20,-40},{20,-40}}, color = {215,215,215})})); | 
|---|
| 163 | end ReteNew; | 
|---|
| 164 | model condNodeZ "Ideal commuting switch" | 
|---|
| 165 | Modelica.Electrical.Analog.Interfaces.PositivePin p annotation(Placement(transformation(extent = {{-60,-10},{-40,10}}, rotation = 0), iconTransformation(extent = {{-9,-10},{11,10}}))); | 
|---|
| 166 | Modelica.Electrical.Analog.Interfaces.NegativePin n1 annotation(Placement(transformation(extent = {{40,20},{60,40}}, rotation = 0))); | 
|---|
| 167 | public | 
|---|
| 168 | Modelica.Electrical.Analog.Interfaces.NegativePin n2 annotation(Placement(transformation(extent = {{39,-40},{59,-20}}, rotation = 0), iconTransformation(extent = {{39,-40},{59,-20}}))); | 
|---|
| 169 | parameter Integer index = 1 "node numerical index"; | 
|---|
| 170 | Modelica.Blocks.Interfaces.IntegerInput z annotation(Placement(transformation(extent = {{-20,-20},{20,20}}, rotation = -90, origin = {17,51}), iconTransformation(extent = {{-20,-20},{20,20}}, rotation = -90, origin = {1,70}))); | 
|---|
| 171 | equation | 
|---|
| 172 | n1.v = n2.v; | 
|---|
| 173 | if z == index then | 
|---|
| 174 | n1.i + n2.i + p.i = 0; | 
|---|
| 175 | p.v = n1.v; | 
|---|
| 176 | else | 
|---|
| 177 | n1.i + n2.i = 0; | 
|---|
| 178 | p.i = 0; | 
|---|
| 179 | end if; | 
|---|
| 180 | //connection active | 
|---|
| 181 | //connection inactive | 
|---|
| 182 | annotation(Documentation(info = "<html> | 
|---|
| 183 | <p>Nodo condizionale.</p> | 
|---|
| 184 | <p>I due nodi n1 e n2 sono sempre connessi fra loro. Se command è true, al nodo è anche connesso p.</p> | 
|---|
| 185 | </html>", revisions = "<html> | 
|---|
| 186 | <ul> | 
|---|
| 187 | <li><i> March 11, 2009   </i> | 
|---|
| 188 | by Christoph Clauss<br> conditional heat port added<br> | 
|---|
| 189 | </li> | 
|---|
| 190 | <li><i> 1998   </i> | 
|---|
| 191 | by Christoph Clauss<br> initially implemented<br> | 
|---|
| 192 | </li> | 
|---|
| 193 | </ul> | 
|---|
| 194 | </html>"), Icon(coordinateSystem(preserveAspectRatio = true, extent = {{-50,-50},{50,50}}, grid = {1,1}), graphics = {Line(visible = useHeatPort, points = {{0,-100},{0,25}}, color = {127,0,0}, smooth = Smooth.None, pattern = LinePattern.Dot),Line(points = {{50,30},{50,-29}}, color = {0,0,255}, smooth = Smooth.None),Line(points = {{0,50},{0,29},{50,0}}, color = {255,128,0}),Line(points = {{4,0},{52,0}}, color = {0,0,255}),Ellipse(extent = {{44,5},{56,-7}}, lineColor = {0,0,255}, fillPattern = FillPattern.Solid, fillColor = {0,0,255})}), Diagram(coordinateSystem(preserveAspectRatio = true, extent = {{-50,-50},{50,50}}, grid = {1,1}), graphics)); | 
|---|
| 195 | end condNodeZ; | 
|---|
| 196 | model aaa | 
|---|
| 197 | annotation(Icon(coordinateSystem(extent = {{-100,-100},{100,100}}, preserveAspectRatio = true, initialScale = 0.1, grid = {2,2})), Diagram(coordinateSystem(extent = {{-100,-100},{100,100}}, preserveAspectRatio = true, initialScale = 0.1, grid = {2,2}))); | 
|---|
| 198 | end aaa; | 
|---|
| 199 | end simpleTrain; | 
|---|
| 200 |  | 
|---|