diff --git a/Source/read.f90 b/Source/read.f90
index 8d2114ca073..7b42b419d6b 100644
--- a/Source/read.f90
+++ b/Source/read.f90
@@ -6606,7 +6606,7 @@ SUBROUTINE READ_PROP
    ELSE
       ! Type-K CP(20 C)=0.4515 kJ/kg, CP(1200 C)=0.6010 kJ/kg
       DO J = 0,I_MAX_TEMP
-         PY%SPECIFIC_HEAT(J) = 451.5_EB+0.001_EB*(REAL(MAX(20,MIN(1200,J)),EB)-20._EB)*(601.0_EB-451.5_EB)
+         PY%SPECIFIC_HEAT(J) = 451.5_EB+0.001_EB*(REAL(MAX(293,MIN(1493,J)),EB)-293._EB)*(601.0_EB-451.5_EB)
       ENDDO
    ENDIF
    PY%SPECIFIC_HEAT = PY%SPECIFIC_HEAT/TIME_SHRINK_FACTOR