yarrg/rsmain.c

   1 /**/
   2
   3 #include "rscommon.h"
   4
   5 int o_quiet= 0;
   6 double max_mass=-1, max_volu=-1, max_capi=-1;
   7 double distance_loss_factor_per_league;
   8
   9 int main(int argc, const char **argv) {
  10   int ia[argc], ni=0;
  11
  12   debug_flags= ~( dbg_sql2 );
  13   setup();
  14
  15   max_mass= atof(*++argv);
  16   max_volu= atof(*++argv);
  17   max_capi= atof(*++argv);
  18   double loss_per_league= atof(*++argv);
  19
  20   if (!loss_per_league) loss_per_league= 1e-7;
  21   distance_loss_factor_per_league= 1.0 - loss_per_league;
  22
  23   const char *arg;
  24   while ((arg= *++argv)) {
  25     ia[ni++]= atoi(arg);
  26   }
  27   double val= value_route(ni, ia);
  28   printf("route value is %g\n", val);
  29   return 0;
  30 }