ParamManagerScripts/backend/script_groups/TwinCat/.example/FEEDFORWARD.EXP

20 lines
497 B
Plaintext

(* @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