/* cpf_c subroutine * Ideal discrete D Flip-Flop * Phase/Frequency Detector * * Copyright (C) 2007-2009 Alan Layec * * This file is part of modnumlib. * * modnumlib is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * modnumlib 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 General Public License for more details. * * You should have received a copy of the GNU General Public License * along with modnumlib; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA * */ /* REVISION HISTORY : * $Log$ */ #include "modnum_lib.h" /* cpf_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 * * Sorties : * y1 : etat de sortie bascule 1 * y2 : etat de sortie bascule 2 * Entrées/sorties : * z1 : état de sortie précédent bascule 1 * z2 : etat de sortie précédent bascule 2 */ void cpf_c(int *n,int *nev,double *z1,double *z2,double *y1,double *y2) { /*déclaration*/ int i; for (i=0;i<(*n);i++) { switch (nev[i]) { case 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 if (z2[i] == 1) {y1[i] = 0; y2[i] = 0;} else {y1[i] = 1; y2[i] = 0;} break; } case 2 : { if ((z1[i] == 0) && (z2[i] == 0)) {y1[i] = 0; y2[i] = 1;} else if (z1[i] == 1) {y1[i] = 0; y2[i] = 0;} 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; break; } y1[i] = 0 ; y2[i] = 0; break; } /*Met en mémoire les états*/ z1[i]=y1[i]; z2[i]=y2[i]; } return; } void cpfy_c(int *n,int *nev,double *z1,double *z2,double *y1,double *y2) { /*déclaration*/ int i; for (i=0;i<(*n);i++) { switch (nev[i]) { case 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 if (z2[i] == 1) {y1[i] = 0; y2[i] = 0;} else {y1[i] = 1; y2[i] = 0;} break; } case 2 : { if ((z1[i] == 0) && (z2[i] == 0)) {y1[i] = 0; y2[i] = 1;} else if (z1[i] == 1) {y1[i] = 0; y2[i] = 0;} 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; break; } y1[i] = 0 ; y2[i] = 0; break; } } return; } void cpfz_c(int *n,int *nev,double *z1,double *z2) { /*déclaration*/ int i; for (i=0;i<(*n);i++) { switch (nev[i]) { case 1 : if ((z1[i]==0) && (z2[i]==0)) {z1[i] = 1; z2[i] = 0;} else if (z1[i] == 1) {z1[i] = 1; z2[i] = 0;} else if (z2[i] == 1) {z1[i] = 0; z2[i] = 0;} else {z1[i] = 1; z2[i] = 0;} break; case 2 : if ((z1[i] == 0) && (z2[i] == 0)) {z1[i] = 0; z2[i] = 1;} else if (z1[i] == 1) {z1[i] = 0; z2[i] = 0;} else if (z2[i] == 1) {z1[i] = 0; z2[i] = 1;} else {z1[i] = 0; z2[i] = 1;} break; case 4 : z1[i]=0; z2[i]=0; break; default : z1[i]=0; z2[i]=0; break; } } return; } /* 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++) { /* output */ if(flag[i]==1) { switch (nev[i]) { /* ref */ case 1 : { y1[i] = 1; break; } /* div */ case 2 : { y2[i] = 1; break; } /* raz */ case 3 : case 4 : { y1[i] = 0; y2[i] = 0; break; } break; } } /* state */ else if(flag[i]==2) { switch (nev[i]) { /* ref */ case 1 : { z1[i] = 1; break; } /* div */ case 2 : { z2[i] = 1; break; } /* raz */ case 3 : case 4 : { z1[i] = 0; z2[i] = 0; break; } break; } } /* raz */ else if(flag[i]==3) { switch (nev[i]) { /* ref */ case 1 : { if(z2[i] == 1) { evout[i]=delay[i]; } else { evout[i]=-1; } break; } /* div */ case 2 : { if(z1[i] == 1) { evout[i]=delay[i]; } else { evout[i]=-1; } break; } /* */ case 3 : { evout[i]=delay[i]; break; } /* ? */ evout[i]=-1; break; } } /*Met en mémoire les états*/ //z1[i]=y1[i]; //z2[i]=y2[i]; } return; }