within ;
model TestInterpolatedCO2
  package CO2 = ExternalMedia.Media.CoolPropMedium (
    mediumName = "CarbonDioxide",
    substanceNames = {"CO2"},
    ThermoStates = Modelica.Media.Interfaces.Choices.IndependentVariables.ph,
    SpecificEnthalpy(start=2e5));
  package CO2_TTSE = ExternalMedia.Media.CoolPropMedium (
    mediumName = "CarbonDioxide",
    substanceNames = {"CO2|enable_TTSE=1"},
    ThermoStates = Modelica.Media.Interfaces.Choices.IndependentVariables.ph,
    SpecificEnthalpy(start=2e5));
  package CO2_BICUBIC = ExternalMedia.Media.CoolPropMedium (
    mediumName = "CarbonDioxide",
    substanceNames = {"CO2|enable_BICUBIC=1"},
    ThermoStates = Modelica.Media.Interfaces.Choices.IndependentVariables.ph,
    SpecificEnthalpy(start=2e5));

    CO2.ThermodynamicState state = CO2.setState_pT(90e5, 290+40*time);
    CO2_TTSE.ThermodynamicState state_TTSE = CO2_TTSE.setState_pT(90e5, 290+40*time);
    CO2_BICUBIC.ThermodynamicState state_BICUBIC = CO2_BICUBIC.setState_pT(90e5, 290+40*time);
     annotation (uses(ExternalMedia(version="3.3.1"), Modelica(version="3.2.3")));
end TestInterpolatedCO2;