#if HP || IBM
#define jdbopen_ jdbopen
#define jdbreada_ jdbreada
#define jdbread_ jdbread
#define jdbclose_ jdbclose
#define jdbcomments_ jdbcomments
#define jdblevel_ jdblevel
#define jdbattributes_ jdbattributes
#endif
#include <stdio.h>
#define NVALS 20
#define TOKEN 40
char names[NVALS][TOKEN];
float vals[NVALS];
int unit,maxlevel,level,num;
int token=TOKEN;

main(argc,argv)
     int argc;
     char *argv[];
{
  char tmp[1025];
  int i;
  strcpy(tmp,argv[1]);
  
  unit=1;
  num= 0;
  for(i=2;i<argc;i++)strcpy(names[num++],argv[i]);

  maxlevel=jdbopen_(&unit,tmp,names,&token,&num);
  if(maxlevel<0){printf("Object not found\n");exit(1);};

  while((level=jdbread_(&unit,vals)) >=0) {
    for(i=0;i<num;i++)printf("%f ",vals[i]);
    printf("\n");
  };

  jdbclose_(&unit);

}