/* test_permute.c */
#include <stdio.h>
#include "permute.h"
#define TRUE 1
#define FALSE 0

  int permute(int n, int vector[], int permuters[]);

int main(int argc, char *argv[])
{
  int vector[] = {1,2,3,4,5,6};
  double vecd[] = {1.0, 2.0, 3.0};
  int permuters[6];
  int if_last = FALSE;

  printf("test_permute.c running \n");
  printf("Permute 3 integers \n");
  permuters[0] = 4;
  if_last = FALSE;
  while(!if_last)
  {
    if_last=permute(3,vector,permuters);
     printf(" %d %d %d   fyi permuters %d %d %d \n",
	    vector[0],vector[1],vector[2],
	    permuters[0],permuters[1],permuters[2]);
  }

  printf("\nPermute 4 integers, starting with previous 3 \n");
  permuters[0] = 5;
  if_last = FALSE;
  while(!if_last)
  {
    if_last=permute(4,vector,permuters);
     printf(" %d %d %d %d \n",
	    vector[0],vector[1],vector[2],vector[3]);
  }

  printf("\nPermute 3 doubles \n");
  permuters[0] = 4;
  if_last = FALSE;
  while(!if_last)
  {
    if_last=permuted(3,vecd,permuters);
     printf(" %f %f %f \n", vecd[0],vecd[1],vecd[2]);
  }

  printf("\nPermute 4 characters \n");
  permuters[0]=5;
  vector[0] = 'a';
  vector[1] = 'b';
  vector[2] = 'c';
  vector[3] = 'd';
  if_last = FALSE;
  while(!if_last)
  {
    if_last=permute(4,vector,permuters);
    printf(" %c%c%c%c \n", vector[0],vector[1],vector[2],vector[3]);
  }
  printf("\nPermute 5 characters \n");
  permuters[0] = 6;
  vector[0] = 'a';
  vector[1] = 'b';
  vector[2] = 'c';
  vector[3] = 'd';
  vector[4] = 'e';
  if_last = FALSE;
  while(!if_last)
  {
    if_last=permute(5,vector,permuters);
    printf(" %c%c%c%c%c \n", vector[0],vector[1],vector[2],
           vector[3],vector[4]);
  }
  printf("test_permute.c finished \n");
  return 0;
} /* end test_permute.c */