(* @PATH := '\/Functions_Collection' *)
(* @SYMFILEFLAGS := '0' *)
FUNCTION Sinusoidal_Signal : REAL
VAR_INPUT
	i_Amplitude		: UINT ;
	i_Frequency		: REAL ;
END_VAR
VAR
END_VAR

(* @END_DECLARATION := '0' *)
IF gTime_sec<>0 THEN
	Sinusoidal_Signal :=  i_Amplitude * (1 - SIN (2 * gP_Greek * i_Frequency * gTime_sec / 60) );
END_IF
END_FUNCTION