chiark / gitweb /
ed176354e902ed8a402be49eed313240abb00bc9
[ypp-sc-tools.web-live.git] / 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= ~0UL;
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   value_route(ni, ia);
28   return 0;
29 }