#include <xvt.h>
#include "f90.h"

int main(int argc, char** argv)
{
  int rt;
  const int r = (argc > 1) ? atoi( &argv[1][1] ) : 0;

  switch (r)
  {
		default:
		case 0: rt = f90100(argc, argv); break; // Programma estrazione pacchetti
		case 1: rt = f90200(argc, argv); break; // Tabella categorie documentali
		case 2: rt = f90300(argc, argv); break; // Gestione documenti cartacei
		case 3: rt = f90400(argc, argv); break; // Test classi
		case 4: rt = f90500(argc, argv); break; // Ripristino archiviazioni
		case 5: rt = f90600(argc, argv); break; // Archiviazione Integrazioni
  }
  return rt;
}