Addition of a test for the specific heat calculation of the Moist Air media

Media/SimpleMoistAir/package.order

@@ -2,3 +2,4 @@ test_enthalpyOfVaporization
 test_T_phX
 test_d_phX
 test_pressure
+test_cp

Media/SimpleMoistAir/test_cp.mo

+within TAeZoSysPro_testsuite.Media.SimpleMoistAir;
+
+model test_cp
+  package Medium = TAeZoSysPro.Media.Air.MoistAir ;
+  parameter Modelica.SIunits.Pressure p = 101325 ;
+  parameter Modelica.SIunits.Temperature T = 303.15 ;
+  Modelica.SIunits.Pressure p_sat ;
+  Medium.ThermodynamicState state ;
+  Modelica.SIunits.SpecificHeatCapacityAtConstantPressure cp ;
+
+equation
+  p_sat = Medium.saturationPressure(T);
+  state = TAeZoSysPro.Media.Air.MoistAir.setState_pTX(p = p, T = T, X={0.01, 0.99});
+  cp = Medium.specificHeatCapacityCp(state) ;
+
+end test_cp;