/* A simple example application of the automatically generated cifnibble_
function */

#include <stdio.h>
#include "cifvars.h"

main(int argc, char *argv[])
{
int i;
char filename[80];
char block[80];
printf("Please enter CIF file name: ");
scanf("%s", filename);
printf("Please enter data block name (without data_ prepended): ");
scanf("%s", block);
errornum = 0;
cifsiv_(filename,block);
if(errornum != 0)      /* an error, we have problems */
  {
  printf("An error occured while reading the CIF file:\n");
  printf("%s",errormes);
  }
for(i=0;i<5;i++)
{
  printf("Atom %d: %s %f %f\n", i, mylabel[i], atsiteu[i][0], atsiteu[i][1]);
}
printf("Total reflections: %.f\n", reftot[0]);
printf("Extinction method: %s\n", extmet);
}