481 B
481 B
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