Correction of paths of classes

Media/SimpleMoistAir/test_T_phX.mo

 within TAeZoSysPro_testsuite.Media.SimpleMoistAir;
 
 model test_T_phX
+  package Medium = TAeZoSysPro.Media.Air.MoistAir ;
   parameter Modelica.SIunits.Pressure p = 101325;
   parameter Modelica.SIunits.MassFraction X[2] = {0.03,0.97};
   Modelica.SIunits.SpecificEnthalpy h;
@@ -16,11 +17,11 @@ Modelica.SIunits.Pressure p_sat;
 
 equation
   T_sat = Modelica.Media.Water.IF97_Utilities.BaseIF97.Basic.tsat(1000);
-  p_sat = saturationPressure(T_sat) ;
-  X_steam = massFraction_pTphi(p = p, T = T, phi = 1);
+  p_sat = Medium.saturationPressure(T_sat) ;
+  X_steam = Medium.massFraction_pTphi(p = p, T = T, phi = 1);
   T = 298.15/*ramp.y*/;
-  h = X[Air]*dryair.cp*(T-273.15) + min(X_steam, X[Water])*(steam.cp*(T-273.15) + steam.h_lv) + max(X[Water] - X_steam,0.0)*water.cp*(T-273.15);
-  T_guess = T_phX(p=p, h=h, X=X);
+  h = X[Medium.Air]*Medium.dryair.cp*(T-273.15) + min(X_steam, X[Medium.Water])*(Medium.steam.cp*(T-273.15) + Medium.steam.h_lv) + max(X[Medium.Water] - X_steam,0.0)*Medium.water.cp*(T-273.15);
+  T_guess = Medium.T_phX(p=p, h=h, X=X);
 
   annotation (
     Icon(coordinateSystem(preserveAspectRatio=false)),

Media/SimpleMoistAir/test_d_phX.mo

 within TAeZoSysPro_testsuite.Media.SimpleMoistAir;
 
 model test_d_phX
+  package Medium = TAeZoSysPro.Media.Air.MoistAir ;
   parameter Modelica.SIunits.Density d = 1.2;
   parameter Modelica.SIunits.Temperature T = 303.15;
   parameter Modelica.SIunits.MassFraction X[2] = {0.03,0.97};
 
-  ThermodynamicState state;
+  Medium.ThermodynamicState state;
   Modelica.SIunits.Pressure p;
   Modelica.SIunits.SpecificEnthalpy h;
   Modelica.SIunits.Density d_guess;
-  Modelica.SIunits.Temperature T_guess ;
+
 equation
- state = setState_dTX(d=d, T=T, X=X);
- p = pressure(state);
- h = specificEnthalpy(state);
- (d_guess, T_guess) = d_phX(p=p, h=h, X=X)
+ state = Medium.setState_dTX(d=d, T=T, X=X);
+ p = Medium.pressure(state);
+ h = Medium.specificEnthalpy(state);
+ d_guess = Medium.d_phX(p=p, h=h, X=X)
   annotation (Icon(coordinateSystem(preserveAspectRatio=false)), Diagram(
         coordinateSystem(preserveAspectRatio=false)));
 end test_d_phX;

Media/SimpleMoistAir/test_pressure.mo

 within TAeZoSysPro_testsuite.Media.SimpleMoistAir;
 
 model test_pressure
-
+  package Medium = TAeZoSysPro.Media.Air.MoistAir ;
   parameter Modelica.SIunits.Pressure p = 101325;
   parameter Modelica.SIunits.Temperature T = 303.15;
   parameter Modelica.SIunits.MassFraction X[2] = {0.03,0.97};
-  ThermodynamicState state;
+  Medium.ThermodynamicState state;
   Modelica.SIunits.SpecificEnthalpy h;
   Modelica.SIunits.Pressure p_guess;
   Modelica.SIunits.Temperature T_guess;  
   Modelica.SIunits.MassFraction X_steam(start = X[1]), X_steam_guess;
 
 equation
-  X_steam = massFraction_pTphi(p = p, T = T, phi = 1);
-  X_steam_guess = Xsaturation(state) ;
-  h = X[Air]*dryair.cp*(T-273.15) + min(X_steam, X[Water])*(steam.cp*(T-273.15) + steam.h_lv) + max(X[Water] - X_steam,0.0)*water.cp*(T-273.15);
-  state =  setState_phX(p=p, h=h, X=X);
-  T_guess = T_phX(p=p, h=h, X=X) ;
-  p_guess = pressure(state);
+  X_steam = Medium.massFraction_pTphi(p = p, T = T, phi = 1);
+  X_steam_guess = Medium.Xsaturation(state) ;
+  h = X[Medium.Air]*Medium.dryair.cp*(T-273.15) + min(X_steam, X[Medium.Water])*(Medium.steam.cp*(T-273.15) + Medium.steam.h_lv) + max(X[Medium.Water] - X_steam,0.0)*Medium.water.cp*(T-273.15);
+  state =  Medium.setState_phX(p=p, h=h, X=X);
+  T_guess = Medium.T_phX(p=p, h=h, X=X) ;
+  p_guess = Medium.pressure(state);
 
   annotation (Icon(coordinateSystem(preserveAspectRatio=false)), Diagram(
         coordinateSystem(preserveAspectRatio=false)));