```pascal
FUNCTION "CO2InjPressure" : Real
{ S7_Optimized_Access := 'FALSE' }
AUTHOR : 'Author'
FAMILY : 'Function'
NAME : 'Name'
VERSION : 1.0
   VAR_INPUT 
      i_Temp : Real;
      i_Dens : Real;
   END_VAR


BEGIN
	
	
	    (* classic code: #CO2InjPressure := 5191.739 * #i_Dens * #i_Dens + 231.0227 * #i_Dens + 0.146326 * #i_Temp ;*)
	    #CO2InjPressure := REAL#5191.739 * #i_Dens * #i_Dens + REAL#231.0227 * #i_Dens + REAL#0.146326 * #i_Temp ;
	    
	
END_FUNCTION


```