diff --git a/iapws/iapws97.py b/iapws/iapws97.py
index eff5f99..c6b1dba 100644
--- a/iapws/iapws97.py
+++ b/iapws/iapws97.py
@@ -1685,10 +1685,13 @@ def _Region3(rho, T):
     propiedades["alfav"] = (gd - Tr * gdt) / (2 * gd + d * gdd) / T
     propiedades["kt"] = 1 / (2 * d * gd + d ** 2 * gdd) / rho / R / T * 1000
     propiedades["region"] = 3
+
+    propiedades["x"] = 1
     if T < Tc and propiedades["P"] < Pc:
-        propiedades["x"] = 0
-    else:
-        propiedades["x"] = 1
+        t_sat = _TSat_P(propiedades["P"])
+        if T < t_sat:
+            propiedades["x"] = 0
+
     return propiedades