test.c

混沌分析的C语言程序的

#include "n_dim_traversal.h"

#ifndef NULL
#define NULL 0
#endif

void city_block();

void printvals (LEAFTYPE);

void printvals(q)
     LEAFTYPE q;
{
  if (q == NULL) {
    printf("No entries\n");
  } else {
    printf("%d  ", q->val);
    if (q->next != NULL) printvals(q->next);
    printf("\n");
  }
}

main()
{
  int i,j,k,l;
  void *matrix;

  matrix = (void *)0;
  dimsize = 10;

  enter_value(1428, &matrix, 4, 1, 4, 2, 8);
  enter_value(1427, &matrix, 4, 1, 4, 2, 7);
  enter_value(1429, &matrix, 4, 1, 4, 2, 9);
  enter_value(1417, &matrix, 4, 1, 4, 1, 7);
  enter_value(1418, &matrix, 4, 1, 4, 1, 8);
  enter_value(1419, &matrix, 4, 1, 4, 1, 9);
  enter_value(1437, &matrix, 4, 1, 4, 3, 7);
  enter_value(1438, &matrix, 4, 1, 4, 3, 8);
  enter_value(1439, &matrix, 4, 1, 4, 3, 9);
  enter_value(1327, &matrix, 4, 1, 3, 2, 7);
  enter_value(1328, &matrix, 4, 1, 3, 2, 8);
  enter_value(1329, &matrix, 4, 1, 3, 2, 9);
  enter_value(1317, &matrix, 4, 1, 3, 1, 7);
  enter_value(1318, &matrix, 4, 1, 3, 1, 8);
  enter_value(1319, &matrix, 4, 1, 3, 1, 9);
  enter_value(1537, &matrix, 4, 1, 5, 3, 7);
  enter_value(1538, &matrix, 4, 1, 5, 3, 8);
  enter_value(1539, &matrix, 4, 1, 5, 3, 9);
  enter_value(1527, &matrix, 4, 1, 5, 2, 7);
  enter_value(1528, &matrix, 4, 1, 5, 2, 8);
  enter_value(1529, &matrix, 4, 1, 5, 2, 9);
  enter_value(1517, &matrix, 4, 1, 5, 1, 7);
  enter_value(1518, &matrix, 4, 1, 5, 1, 8);
  enter_value(1519, &matrix, 4, 1, 5, 1, 9);
  enter_value(1537, &matrix, 4, 1, 5, 3, 7);
  enter_value(1538, &matrix, 4, 1, 5, 3, 8);
  enter_value(1539, &matrix, 4, 1, 5, 3, 9);
  enter_value(327, &matrix, 4, 0, 3, 2, 7);
  enter_value(328, &matrix, 4, 0, 3, 2, 8);
  enter_value(329, &matrix, 4, 0, 3, 2, 9);
  enter_value(317, &matrix, 4, 0, 3, 1, 7);
  enter_value(318, &matrix, 4, 0, 3, 1, 8);
  enter_value(319, &matrix, 4, 0, 3, 1, 9);
  enter_value(337, &matrix, 4, 0, 3, 3, 7);
  enter_value(338, &matrix, 4, 0, 3, 3, 8);
  enter_value(339, &matrix, 4, 0, 3, 3, 9);
  enter_value(427, &matrix, 4, 0, 4, 2, 7);
  enter_value(428, &matrix, 4, 0, 4, 2, 8);
  enter_value(429, &matrix, 4, 0, 4, 2, 9);
  enter_value(417, &matrix, 4, 0, 4, 1, 7);
  enter_value(418, &matrix, 4, 0, 4, 1, 8);
  enter_value(419, &matrix, 4, 0, 4, 1, 9);
  enter_value(437, &matrix, 4, 0, 4, 3, 7);
  enter_value(438, &matrix, 4, 0, 4, 3, 8);
  enter_value(439, &matrix, 4, 0, 4, 3, 9);
  enter_value(537, &matrix, 4, 0, 5, 3, 7);
  enter_value(538, &matrix, 4, 0, 5, 3, 8);
  enter_value(539, &matrix, 4, 0, 5, 3, 9);
  enter_value(527, &matrix, 4, 0, 5, 2, 7);
  enter_value(528, &matrix, 4, 0, 5, 2, 8);
  enter_value(529, &matrix, 4, 0, 5, 2, 9);
  enter_value(517, &matrix, 4, 0, 5, 1, 7);
  enter_value(518, &matrix, 4, 0, 5, 1, 8);
  enter_value(519, &matrix, 4, 0, 5, 1, 9);
  enter_value(537, &matrix, 4, 0, 5, 3, 7);
  enter_value(538, &matrix, 4, 0, 5, 3, 8);
  enter_value(539, &matrix, 4, 0, 5, 3, 9);
  enter_value(2327, &matrix, 4, 2, 3, 2, 7);
  enter_value(2328, &matrix, 4, 2, 3, 2, 8);
  enter_value(2329, &matrix, 4, 2, 3, 2, 9);
  enter_value(2317, &matrix, 4, 2, 3, 1, 7);
  enter_value(2318, &matrix, 4, 2, 3, 1, 8);
  enter_value(2319, &matrix, 4, 2, 3, 1, 9);
  enter_value(2427, &matrix, 4, 2, 4, 2, 7);
  enter_value(2428, &matrix, 4, 2, 4, 2, 8);
  enter_value(2429, &matrix, 4, 2, 4, 2, 9);
  enter_value(2417, &matrix, 4, 2, 4, 1, 7);
  enter_value(2418, &matrix, 4, 2, 4, 1, 8);
  enter_value(2419, &matrix, 4, 2, 4, 1, 9);
  enter_value(2437, &matrix, 4, 2, 4, 3, 7);
  enter_value(2438, &matrix, 4, 2, 4, 3, 8);
  enter_value(2439, &matrix, 4, 2, 4, 3, 9);
  enter_value(2537, &matrix, 4, 2, 5, 3, 7);
  enter_value(2538, &matrix, 4, 2, 5, 3, 8);
  enter_value(2539, &matrix, 4, 2, 5, 3, 9);
  enter_value(2527, &matrix, 4, 2, 5, 2, 7);
  enter_value(2528, &matrix, 4, 2, 5, 2, 8);
  enter_value(2529, &matrix, 4, 2, 5, 2, 9);
  enter_value(2517, &matrix, 4, 2, 5, 1, 7);
  enter_value(2518, &matrix, 4, 2, 5, 1, 8);
  enter_value(2519, &matrix, 4, 2, 5, 1, 9);
  enter_value(2537, &matrix, 4, 2, 5, 3, 7);
  enter_value(2538, &matrix, 4, 2, 5, 3, 8);
  enter_value(2539, &matrix, 4, 2, 5, 3, 9);
  enter_value(1438, &matrix, 4, 1, 4, 3, 8);
  enter_value(7428, &matrix, 4, 7, 4, 2, 8);
  enter_value(7428, &matrix, 4, 7, 4, 2, 8);
  
  printvals(get_value(&matrix, 4, 1, 4, 2, 8));
  printvals(get_value(&matrix, 4, 1, 4, 2, 6));
  printvals(get_value(&matrix, 4, 1, 4, 3, 8));
  printvals(get_value(&matrix, 4, 7, 4, 2, 8));
  printvals(get_value(&matrix, 4, 1, 4, 2, 7));
  printvals(get_value(&matrix, 4, 1, 4, 4, 8));
  printvals(get_value(&matrix, 4, 1, 1, 1, 1));

  for (i=0; i<7; i++) {
    city_block(&matrix, i, 4, 1, 4, 2, 8);
  }
}