test_walsh.c

在linux系统下开发研究移动通信的工具型代码

/*
 * $Log: test_walsh.c,v $
 * Revision 1.1  2000/05/03 14:30:04  bjc97r
 * Initial revision
 *
 */
char *id = "$Id: test_walsh.c,v 1.1 2000/05/03 14:30:04 bjc97r Exp $";

#include <stdio.h>
#include <stdlib.h>

#include "walsh.h"
#include "pnutil.h"

#define SIZE 16


int main( void )
  /* This program investigates Walsh Codes. */
{
  Walsh *pn0, *pn1;
  char *pnd0, *pnd1;

  int i, ii, j, jj;
  
  pnd0 = (char*) malloc(SIZE);
  pnd1 = (char*) malloc(SIZE);

  /* Cross-correlation Property: Orthogonal */
  puts("\nross-correlation Property\n");
  for( i = 0; i < SIZE; i++ ) {
    /* make walsh[i] */
    pn0 = walsh_create( i, 0);
    for( ii = 0; ii < SIZE; ii++ ) {
      pnd0[ii] = walsh(pn0);
    }
    printf("%2d: ", i);
    for( j = 0; j < SIZE; j++ ) {
      /* make walsh[j] */
      pn1 = walsh_create( j, 0);
      for( jj = 0; jj < SIZE; jj++ ) {
	pnd1[jj] = walsh(pn1);
      }
      /* calculate x-correlation */
      printf("%3d ", pn_xcorr(pnd0, pnd1, 0, SIZE) );
      walsh_free(pn1);
    }
    puts("");

    walsh_free(pn0);
  }

  /* The Orthogonal Walsh codes */
  puts("\nThe Orthogonal Walsh Codes\n");
  for( i = 0; i < SIZE; i++ ) {
    /* make walsh[i] */
    pn0 = walsh_create( i, 0);
    printf("%2d: ", i);
    for( ii = 0; ii < SIZE; ii++ ) {
      printf("%1d", walsh(pn0) );
    }
    puts("");
    walsh_free(pn0);
  }
  
  /* Auto-correlation Property */
  puts("\nAuto-correlation Property\n");
  for( i = 0; i < SIZE; i++ ) {
    /* make walsh[i] */
    pn0 = walsh_create( i, 0);
    for( ii = 0; ii < SIZE; ii++ ) {
      pnd0[ii] = walsh(pn0);
    }
    walsh_free(pn0);
    /* calculate auto-correlation */
    printf("%2d:", i );
    for( j = 0; j < SIZE; j++ ) {
      printf(" %3d", pn_acorr(pnd0, j, SIZE) );
    }
    puts("");
  }

  return 0;
}