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

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

  switch (r)
  {
	default: rt = f90100(argc, argv); break;
  }
  return rt;
}