Low level routine
fr - eng

modqam_c - Quadrature amplitude modulator computational routine

Module

• Modnum

Parameters

• n : size of input vectors
• m : number of bits per symbol (scalar)
• u : address of symbol input vector
• i_c : address of I component output vector.
• q_c : address of Q component output vector.

File content

/* modqam_c subroutine
 * Quadrature Amplitude Modulation Modulator
 *
 * Copyright (C) 2007-2011 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"

/* modqam_c routine de calcul d'un modulataur mQAM
 *
 * Entrées :
 * n  : dimension 1 des matrices d'entrée/sorties (scalaire)
 * m  : dimension 2 des matrices d'entrée/sorties (scalaire)
 * ns : longueurs des mots binaires en nombre de bits (scalaire)
 * u  : adresse de départ du vecteur du symbole en entrée
 *
 * Sortie :
 * i_c : adresse de départ du vecteur de la composante I
 * q_c : adresse de départ du vecteur de la composante Q
 *
 * Dépendances:
 */

void modqam_c(int *n,int *m,int *ns,double *u,double *i_c,double *q_c)
{
 /*déclaration des variables compteurs*/
 int i,j,l;
 int ng,nd;

 /*Calcul des sélecteurs binaires (c'est maladroit!!)*/
 nd=(1<<(*ns)/2)-1;
 ng=(1<<(*ns))-1-nd;

 for(l=0;l<(*m);l++) {
   for(j=0;j<(*n);j++) {
     /*récupération de la valeur du port d'entrée*/
     i=(int)u[(*n)*l+j];

     /*Calcul de la valeur de I et de Q*/
     i_c[(*n)*l+j]=((i&nd)*2)-nd;
     q_c[(*n)*l+j]=(((i&ng)>>((*ns)/2))*2)-nd;
   }
 }

 return;
}

void modqami_c(int *n,int *m,int *ns,int *u,int *i_c,int *q_c)
{
 /*déclaration des variables compteurs*/
 int i,j,l;
 int ng,nd;

 /*Calcul des sélecteurs binaires (c'est maladroit!!)*/
 nd=(1<<(*ns)/2)-1;
 ng=(1<<(*ns))-1-nd;

 for(l=0;l<(*m);l++) {
   for(j=0;j<(*n);j++) {
     /*récupération de la valeur du port d'entrée*/
     i=(int)u[(*n)*l+j];

     /*Calcul de la valeur de I et de Q*/
     i_c[(*n)*l+j]=((i&nd)*2)-nd;
     q_c[(*n)*l+j]=(((i&ng)>>((*ns)/2))*2)-nd;
   }
 }

 return;
}

/* modqamv_c routine de calcul d'un modulataur mQAM
 *
 * Entrées :
 * n :longueur du vecteur d'entrée
 * m :longueurs des mots binaires en nombre de bits (vecteur)
 * u :adresse de départ du vecteur du symbole en entrée
 *
 * Sortie :
 * i_c : adresse de départ du vecteur de la composante I
 * q_c : adresse de départ du vecteur de la composante Q
 *
 * Dépendances:
 */
void modqamv_c(int *n,int *m,double *u,double *i_c,double *q_c)
{
 /*déclaration des variables compteurs*/
 int i,j;
 int ng,nd;

 for(j=0;j<(*n);j++) {
   /*récupération du nombre de bits associé à chaque axes*/
   /*n = block->ipar[j];*/

   /*Calcul des sélecteurs binaires (c'est maladroit!!)*/
   nd=(1<<(m[j])/2)-1;
   ng=(1<<(m[j]))-1-nd;

   /*récupération de la valeur du port d'entrée*/
   i=(int)u[j];

   /*Calcul de la valeur de I et de Q*/
   i_c[j]=((i&nd)*2)-nd;
   q_c[j]=(((i&ng)>>((m[j])/2))*2)-nd;
 }
 return;
}

Authors

A. Layec