cuikmaf.c

Go to the documentation of this file.

 
#include "cuiksystem.h"
#include "parameters.h"
 
#include "defines.h"
#include "error.h"
#include "filename.h"
#include "random.h"
 
#include <string.h>
#include <stdlib.h>
#include <time.h>
#include <sys/stat.h>
 
int main(int argc, char **arg)
{
  Tfilename fparam;
  Tparameters parameters;  /* Parameters used in the Cuik process */
  TCuikSystem *cuiksystem;
  unsigned int i,ns;
  
  if (argc>1)
    {
      /*Init parameters*/
      CreateFileName(NULL,arg[1],NULL,PARAM_EXT,&fparam);
      InitParametersFromFile(GetFileFullName(&fparam),&parameters);
      
      ns=ReadProblemFromFile(&parameters,arg[1],&cuiksystem);
 
      if (ns>0)
        {
          SaveCuikSystemToMAF(arg[1],ns,cuiksystem);
 
          for(i=0;i<ns;i++)
            DeleteCuikSystem(&(cuiksystem[i]));
          free(cuiksystem);
        }
      
      DeleteParameters(&parameters);
      DeleteFileName(&fparam);
    }
  else
    {
      fprintf(stderr,"  Wrong number of parameters.\n");
      fprintf(stderr,"  Use:\n");   
      fprintf(stderr,"      cuikmaf <problem file name>.cuik \n");
      fprintf(stderr,"  where <problem file name> contains the kinematic equations\n");
      fprintf(stderr,"    (the '.cuik' extension is not required)\n");
    }
 
  return(EXIT_SUCCESS);
}