(* @PATH := '\/Functions_Collection' *) (* @SYMFILEFLAGS := '0' *) FUNCTION FeedForward : REAL (* If Function returns -1 means Error *) VAR_INPUT i_Flow : REAL ; (* Liquid Flow in l/min *) i_KFF : REAL ; (* Adjusting parameter *) i_Delta_P : REAL ; (* Delta Pressure: Friction Losses Across the Valve *) END_VAR VAR END_VAR (* @END_DECLARATION := '0' *) IF i_Delta_P >0 THEN FeedForward := LIMIT(0, i_Flow * i_KFF / SQRT(i_Delta_P), 100) ; ELSE FeedForward := -1 ; END_IF END_FUNCTION