Low level routine
eng - fr


cpft_c - Ideal tri-state phase/frequency comparator with delay computational routine

Library

Parameters

File content


/* cpft_c subroutine
 * Ideal discrete D Flip-Flop
 * Phase/Frequency Detector 
 * with delay on RAZ state
 * IRCOM GROUP - Author : A.Layec
 */
 
/* REVISION HISTORY :
 * $Log$
 */
 
#include "mod_num_lib.h"

/* cpft_c routine de calcul d'un comparateur phase fréquence trois états idéal
 * Entrées :
 * n    : taille des vecteurs
 * nev  : entrée d'activation des horloges des bascules
 *       1: bascule 1
 *       2: bascule 2
 *       3: bascule 1&2 (rmq : non programmé)
 *       4: entrée RAZ des deux bascules
 * flag  : Tache à effectuer
 *       1: calcul des etats de sorties
 *       3: calcul de la date de remise à zéro
 * delay : retard de la remise à zéro
 * Sorties :
 * y1    : etat de sortie bascule 1
 * y2    : etat de sortie bascule 2
 * evout : date de la remise à zéro
 * Entrées/sorties :
 * z1 : état de sortie précédent bascule 1
 * z2 : etat de sortie précédent bascule 2
 * sh : etat du comparateur
 *     0 : activé
 *     1 : desactivé
 */

void cpft_c(int *n,int *nev,int *flag,double *delay,double *z1,double *z2,double *evout,double *y1,double *y2,double *sh)
{
 /*déclaration*/
 int i;
 
 for (i=0;i<(*n);i++)
 {
  if(flag[i]==1)
  {
   switch (nev[i])
   {
    case 1 :
    {
     if(sh[i]!=1)
     {
      if ((z1[i]==0) && (z2[i]==0)) {y1[i] = 1; y2[i] = 0;}
      else if (z1[i] == 1) {y1[i] = 1; y2[i] = 0;}
      else {y1[i] = 1; y2[i] = 0;}
     }
     break;
    }
    case 2 :
    {
     if(sh[i]!=1)
     {
      if ((z1[i] == 0) && (z2[i] == 0)) {y1[i] = 0; y2[i] = 1;}
      else if (z2[i] == 1) {y1[i] = 0; y2[i] = 1;}
      else {y1[i] = 0; y2[i] = 1;}
     }
     break;
    }
    case 4 :
    {
     y1[i]=0;
     y2[i]=0;
     sh[i]=0;
     break;
    }
    break;
   }
  }
  else if(flag[i]==3)
  {
   switch (nev[i])
   {
    case 1 :
    {
     if(z2[i] == 1) {evout[i]=delay[i];}
     sh[i]=1;
     break;
    }
    case 2 :
    {
     if(z1[i] == 1) {evout[i]=delay[i];}
     sh[i]=1;
     break;
    }
    break;
   }
  }
  /*Met en mémoire les états*/ 
  z1[i]=y1[i];
  z2[i]=y2[i];
 }
 return;
}

Authors

IRCOM Group Alan Layec