(* @PATH := '\/Functions_Collection' *)
(* @SYMFILEFLAGS := '0' *)
FUNCTION DeaireationValve : REAL
VAR_INPUT
	in_DeaireationFlow			: REAL ;
	in_InletPressure				: REAL ;
	in_FlowCoefficient			: REAL ;
END_VAR
VAR
	mAux						: REAL;
END_VAR
(* @END_DECLARATION := '0' *)
(* 	Regime Sonico P2 < P1/2 	*)
(* 	OV = Flow / 14.3 * kv * P1 	*)
mAux := in_FlowCoefficient * 14.3 * (in_InletPressure + 1.0) ;

IF mAux <> 0 THEN
	DeaireationValve := LIMIT(gDeaireationValveOV_Min, in_DeaireationFlow / mAux, 100.0) ; (* La valvola è stata tarata per cominciare ad aprire al 5% *)
END_IF
END_FUNCTION