Routine bas-niveau
fr -
eng
cpf_c - routine de calcul de comparateur phase fréquence trois états idéal
- n :
taille des vecteurs
- nev :
entrée d'activation des horloges des bascules
- 1 :
bascule 1
- 2 :
bascule 2
- 3 :
bascule 1 et 2 (rmq : non programmé)
- 4 :
entrée RAZ des deux bascules
- y1 :
etat de sortie bascule 1
- y2 :
etat de sortie bascule 2
- z1 :
état de sortie précédent bascule 1
- z2 :
etat de sortie précédent bascule 2
/* 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;
}
IRCOM Group Alan Layec