(* @PATH := '\/Functions_Collection' *)
(* @SYMFILEFLAGS := '0' *)
FUNCTION ValveFlow : REAL
VAR_INPUT
	i_DeltaP			: REAL ;
	i_ValveOp		: REAL ;
	i_KFF			: REAL ;
	i_Dens			: REAL ;
END_VAR
VAR
END_VAR
(* @END_DECLARATION := '0' *)
IF i_KFF<>0 AND i_DeltaP>=0 AND i_Dens<>0THEN
    ValveFlow := i_ValveOp * SQRT(i_DeltaP / i_Dens) / i_KFF ;
END_IF

END_FUNCTION