pump

 

	int samples;
	float t_in;
	float t_in2;

 

	for(samples = MIN_AVAIL();samples > 0; --samples)
	{
		IT_IN(0);
		IT_IN(1);
		t_in = down(0)-up(0);
		t_in2 = down(1)-up(1);

		if(t_in == 0.0)
		{
			if(t_in2 == -1.0)
			{
				t_out += vs;
			}
			if(t_in2 == 1.0)
			{
				t_out -= vs;
			}
		}
		if(t_in == 1.0)
		{
			if(t_in2 == 0.0)
			{
				t_out += vs;
			}
			else
			{
				t_out += g1;
			}
		}
		if(t_in == -1.0)
		{
			if(t_in2 == 0.0)
			{
				t_out -= vs;
			}
			else
			{
				t_out -= g1;
			}
		}
		if(IT_OUT(0)) {
			KrnOverflow("pump",0);
			return(99);
		}
		y(0)=t_out;
	}
	return(0);

/*  Capsim (r) Text Mode Kernel (TMK) Star Library (Blocks)
    Copyright (C) 1989-2002  XCAD Corporation 

    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Lesser General Public
    License as published by the Free Software Foundation; either
    version 2.1 of the License, or (at your option) any later version.

    This library is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    Lesser General Public License for more details.

    You should have received a copy of the GNU Lesser General Public
    License along with this library; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

    http://capsimtmk.sourceforge.net
    XCAD Corporation
    Raleigh, North Carolina */

 

/*
	pump.s:		charge pump and loop filter for PLL
	parameters:	g1, integrate gain of the filter
			vs, voltage step magnitude
	inputs:		up, of phase detector
			down, of phase detector
	outputs:	out, the filtered signal
	description:	This star implements a charge pump
			loop filter as a recursive equation:
			y(n)=y(n-1)
			     +g1*[x(n)-x(n-1)]	
			This filter can be used as a PLL loop filter.

pump


	pump.s:		charge pump and loop filter for PLL
	parameters:	g1, integrate gain of the filter
			vs, voltage step magnitude
	inputs:		up, of phase detector
			down, of phase detector
	outputs:	out, the filtered signal
	description:	This star implements a charge pump
			loop filter as a recursive equation:
			y(n)=y(n-1)
			     +g1*[x(n)-x(n-1)]	
			This filter can be used as a PLL loop filter.



 */