This function calculates the specific entropy of R1234yf from the state record (e.g., use setState_phX function for input). The specific entropy is modelled by the fundamental equation of state of Richter et al (2011).