/* fparam.c  Calcul des parametres et indices courants de la
             photometrie de Geneve pour creation du fichier gen.prm
             Entree et sortie standard, a rediriger
 */
#include <stdio.h>

main(argc,argv)
  int argc;
  char *argv[];
 {
  short i, no, par;
  char buf[BUFSIZ];
  float mv,c[7],p[10];
  float parmf();
  c[0]=0.;

  while (fgets(buf, sizeof buf, stdin) != NULL)
   {
    sscanf(buf,"%hd%*f%f%*f%f%f%f%f%f%f",&no,&mv,
           &c[1],&c[2],&c[3],&c[4],&c[5],&c[6]);
    printf(" %04d %6.3f",no,mv);
    for ( i = 1; i <= argc-1; i++)
      {
       par=atoi(argv[i]);
       p[i]=parmf(c,par);
       printf(" %6.3f",p[i]);
      }
    printf("\n");
   }
  exit(0);
 }