#*-------------------------------------------------------------------
* EMSO Model Library (EML) Copyright (C) 2004 - 2007 ALSOC.
*
* This LIBRARY is free software; you can distribute it and/or modify
* it under the therms of the ALSOC FREE LICENSE as available at
* http://www.enq.ufrgs.br/alsoc.
*
* EMSO is distributed under the terms of the ALSOC LICENSE as
* available at http://www.enq.ufrgs.br/alsoc.
*-----------------------------------------------------------------------
* Author: Jonathan Ospino P.
* $Id: Pulse.mso  2012$
*---------------------------------------------------------------------*#

using "types";
 
Model Pulse
	
	ATTRIBUTES

	Pallete=true;
	Icon="icon/Pulse2";
	Info="== Pulse signal source ==";

	
	PARAMETERS

	Start_Time as time_sec(Brief="Start time of the pulse",Default=0);
	Magnitude as Real(Brief="Pulse magnitude",Default=1);
	Duration as time_sec(Brief="Pulse duration",Default=1);

	
	VARIABLES

	out Out as Real(Brief="Output of the ramp block",Protected=true,PosX=1,PosY=0.5);

	
	EQUATIONS
	
	if time>=(Start_Time+Duration) then
		Out=0;
	else
		if time<Start_Time then
			Out=0;
		else
			Out=Magnitude;
		end
	end
		
end