Migration to OpenModelica 1.25 and FMUs Generation

2026-05-26 09:37:35 +02:00
parent fdf293ece6
commit fe90b840ed
370 changed files with 968105 additions and 743 deletions
--- a/1.25/AIDAModelica/WindProfile.mo
+++ b/1.25/AIDAModelica/WindProfile.mo
@@ -0,0 +1,117 @@
+within AIDAModelica;
+
+model WindProfile
+  parameter Real rho = 1.225
+    "Air density [kg/m3].";
+  parameter Real Cd = 1.0
+    "Equivalent drag coefficient.";
+  parameter Real A = 0.05
+    "Equivalent lateral reference area [m2].";
+  parameter Real eps = 1e-6
+    "Regularization term for wind magnitude.";
+
+  parameter Real Wmean = 8
+    "Mean wind speed [m/s].";
+  parameter Real windDir = 0
+    "Mean wind direction [rad].";
+
+  parameter Real WgustAmpX = 3
+    "Amplitude of smooth gust component along X [m/s].";
+  parameter Real WgustAmpY = 3
+    "Amplitude of smooth gust component along Y [m/s].";
+  parameter Real fg1 = 0.03
+    "Low gust modulation frequency 1 [Hz].";
+  parameter Real fg2 = 0.11
+    "Low gust modulation frequency 2 [Hz].";
+  parameter Real fg3 = 0.04
+    "Low gust modulation frequency 3 [Hz].";
+  parameter Real fg4 = 0.09
+    "Low gust modulation frequency 4 [Hz].";
+
+  parameter Real At1 = 0.6
+    "Turbulence amplitude X1 [m/s].";
+  parameter Real At2 = 0.25
+    "Turbulence amplitude X2 [m/s].";
+  parameter Real Bt1 = 0.6
+    "Turbulence amplitude Y1 [m/s].";
+  parameter Real Bt2 = 0.25
+    "Turbulence amplitude Y2 [m/s].";
+
+  parameter Real f1 = 0.15
+    "Turbulence frequency X1 [Hz].";
+  parameter Real f2 = 0.7
+    "Turbulence frequency X2 [Hz].";
+  parameter Real f3 = 0.21
+    "Turbulence frequency Y1 [Hz].";
+  parameter Real f4 = 0.9
+    "Turbulence frequency Y2 [Hz].";
+
+  parameter Real phi1 = 0
+    "Phase X1 [rad].";
+  parameter Real phi2 = 0.8
+    "Phase X2 [rad].";
+  parameter Real phi3 = 1.3
+    "Phase Y1 [rad].";
+  parameter Real phi4 = 2.1
+    "Phase Y2 [rad].";
+
+  Modelica.Blocks.Interfaces.RealOutput Fx "Aerodynamic X wind force in ground frame [N]" annotation(
+      Placement(transformation(origin = {10, -10}, extent = {{-90, 50}, {-110, 70}}, rotation = 90), iconTransformation(origin = {2, -10}, extent = {{-90, 50}, {-110, 70}}, rotation = 90)));
+  Modelica.Blocks.Interfaces.RealOutput Fy "Aerodynamic Y wind force in ground frame [N]" annotation(
+      Placement(transformation(origin = {98, -10}, extent = {{-90, 20}, {-110, 40}}, rotation = 90), iconTransformation(origin = {96, -10}, extent = {{-90, 20}, {-110, 40}}, rotation = 90)));
+  
+  Modelica.Blocks.Interfaces.RealOutput windVelX
+    "Wind velocity component in X direction [m/s]";
+  Modelica.Blocks.Interfaces.RealOutput windVelY
+    "Wind velocity component in Y direction [m/s]";
+
+protected
+  Real wx_mean;
+  Real wy_mean;
+  Real wx_turb;
+  Real wy_turb;
+  Real wx_gust;
+  Real wy_gust;
+  Real wx;
+  Real wy;
+  Real windSpeed;
+
+equation
+
+  
+  wx_mean = Wmean * cos(windDir);
+  wy_mean = Wmean * sin(windDir);
+
+  wx_turb =
+       At1 * sin(2 * Modelica.Constants.pi * f1 * time + phi1)
+     + At2 * sin(2 * Modelica.Constants.pi * f2 * time + phi2);
+
+  wy_turb =
+       Bt1 * sin(2 * Modelica.Constants.pi * f3 * time + phi3)
+     + Bt2 * sin(2 * Modelica.Constants.pi * f4 * time + phi4);
+
+  wx_gust =
+       WgustAmpX
+     * sin(2 * Modelica.Constants.pi * fg1 * time)
+     * sin(2 * Modelica.Constants.pi * fg2 * time);
+
+  wy_gust =
+       WgustAmpY
+     * sin(2 * Modelica.Constants.pi * fg3 * time)
+     * sin(2 * Modelica.Constants.pi * fg4 * time);
+
+  wx = wx_mean + wx_turb + wx_gust;
+  wy = wy_mean + wy_turb + wy_gust;
+
+  windVelX = wx;
+  windVelY = wy;
+
+  windSpeed = sqrt(wx * wx + wy * wy + eps);
+
+  Fx = 0.5 * rho * Cd * A * windSpeed * wx;
+  Fy = 0.5 * rho * Cd * A * windSpeed * wy;
+  
+annotation(
+    Diagram,
+    Icon(graphics = {Rectangle(extent = {{-100, 100}, {100, -100}})}));
+end WindProfile;