/*2013-01-18T16:22:16-01:00*/

/********************************************************************
 * echelle_coef.c
 * 
 * generated by: plcgen 2.3.253
 ********************************************************************/

#include "cb_comp.h"
#include "iec_1131.h"

#include "echelle_coef.h"



/**************************** Variables *****************************/

CB_Index echelle_coef__num = 0;
CB_Mem_Float *echelle_coef_valeurEntree;
CB_Mem_Float *echelle_coef_valeurSortie;
CB_Mem_Float *echelle_coef_coefficient;
CB_Mem_Bool *echelle_coef_d_echelle;
CB_Mem_Float *echelle_coef_v_d_echelle;

/**************************** Variables *****************************/

#define valeurEntree (echelle_coef_valeurEntree->CB_current_value)
#define valeurSortie (echelle_coef_valeurSortie->CB_current_value)
#define coefficient (echelle_coef_coefficient->CB_current_value)
#define d_echelle (echelle_coef_d_echelle->CB_current_value)
#define v_d_echelle (echelle_coef_v_d_echelle->CB_current_value)


/************************ Components offsets ************************/


/********************* Initialization function **********************/

int _bibliotheque_epo__echelle_coef_init(void)
{
	(self.Float+0)->CB_current_value = 1.0; /*coefficient*/
	self.Bool+=1;
	self.Float+=2;


	return 0;
}


/************************ Behavior function *************************/

int bibliotheque_epo__echelle_coef(void)
{
	if (exec_term_node(self_num)) {

		/*********************** Internals variables ************************/

		echelle_coef_coefficient = self.Float+0;
		echelle_coef_d_echelle = self.Bool+0;
		echelle_coef_v_d_echelle = self.Float+1;

		/********************* Pre-conditions execution *********************/

		/*no Pre-conditions*/

		/************************ Behavior execution ************************/

		{
			/* -----------------------------------------------------------------	*/
			/* Type : Modèle de Comportement Opératif					*/
			/* Catégorie :  Boite à outils						*/
			/* Auteur : Techniques Nouvelles d'Informatique				*/
			/* Date de révision : Octobre 2002						*/
			/* -----------------------------------------------------------------	*/
			/* Ce module représente la mise à l'échelle de variables réelles	*/
			/*	en la multipliant par un coefficient donné en paramètre.	*/
			/* L'équation de mise à l'échelle est de la forme y = k x.		*/
			/* -----------------------------------------------------------------	*/

			if (d_echelle)
				valeurSortie = v_d_echelle;
			else
				valeurSortie = valeurEntree * coefficient;
		}

		CB_post_float(echelle_coef_valeurSortie);

		/******************** Post-conditions execution *********************/

		/*no Post-conditions*/
	}

	/*************************** self update ****************************/

	self.Bool += 1;
	self.Float += 2;

	return 0;
}

