alpar@9: /* netgen.c */
alpar@9: 
alpar@9: /* This main program generates 50 original NETGEN instances of the
alpar@9:    minimum cost flow problem and writes them in DIMACS format to the
alpar@9:    current directory. */
alpar@9: 
alpar@9: #include <stddef.h>
alpar@9: #include <stdio.h>
alpar@9: #include <stdlib.h>
alpar@9: #include <glpk.h>
alpar@9: 
alpar@9: static int parm[50][15] =
alpar@9: {    {13502460, 101,
alpar@9:       5000, 2500, 2500, 25000, 1, 100, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{4281922, 102,
alpar@9:       5000, 2500, 2500, 25000, 1, 100, 2500000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{44820113, 103,
alpar@9:       5000, 2500, 2500, 25000, 1, 100, 6250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{13450451, 104,
alpar@9:       5000, 2500, 2500, 25000, -100, -1, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{14719436, 105,
alpar@9:       5000, 2500, 2500, 25000, 101, 200, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{17365786, 106,
alpar@9:       5000, 2500, 2500, 12500, 1, 100, 125000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{19540113, 107,
alpar@9:       5000, 2500, 2500, 37500, 1, 100, 375000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{19560313, 108,
alpar@9:       5000, 2500, 2500, 50000, 1, 100, 500000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{2403509, 109,
alpar@9:       5000, 2500, 2500, 75000, 1, 100, 750000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{92480414, 110,
alpar@9:       5000, 2500, 2500, 12500, 1, 100, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{4230140, 111,
alpar@9:       5000, 2500, 2500, 37500, 1, 100, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{10032490, 112,
alpar@9:       5000, 2500, 2500, 50000, 1, 100, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{17307474, 113,
alpar@9:       5000, 2500, 2500, 75000, 1, 100, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{4925114, 114,
alpar@9:       5000, 500, 4500, 25000, 1, 100, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{19842704, 115,
alpar@9:       5000, 1500, 3500, 25000, 1, 100, 250000, 0, 0, 0, 100, 1, 1000,
alpar@9:    },{88392060, 116,
alpar@9:       5000, 2500, 2500, 25000, 1, 100, 250000, 0, 0, 0, 0, 1, 1000,
alpar@9:    },{12904407, 117,
alpar@9:       5000, 2500, 2500, 12500, 1, 100, 125000, 0, 0, 0, 0, 1, 1000,
alpar@9:    },{11811811, 118,
alpar@9:       5000, 2500, 2500, 37500, 1, 100, 375000, 0, 0, 0, 0, 1, 1000,
alpar@9:    },{90023593, 119,
alpar@9:       5000, 2500, 2500, 50000, 1, 100, 500000, 0, 0, 0, 0, 1, 1000,
alpar@9:    },{93028922, 120,
alpar@9:       5000, 2500, 2500, 75000, 1, 100, 750000, 0, 0, 0, 0, 1, 1000,
alpar@9:    },{72707401, 121,
alpar@9:       5000, 50, 50, 25000, 1, 100, 250000, 50, 50, 0, 100, 1, 1000,
alpar@9:    },{93040771, 122,
alpar@9:       5000, 250, 250, 25000, 1, 100, 250000, 250, 250, 0, 100, 1, 1000,
alpar@9:    },{70220611, 123,
alpar@9:       5000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{52774811, 124,
alpar@9:       5000, 1000, 1000, 25000, 1, 100, 250000, 1000, 1000, 0, 100, 1,
alpar@9:       1000,
alpar@9:    },{22492311, 125,
alpar@9:       5000, 1500, 1500, 25000, 1, 100, 250000, 1500, 1500, 0, 100, 1,
alpar@9:       1000,
alpar@9:    },{35269337, 126,
alpar@9:       5000, 500, 500, 12500, 1, 100, 125000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{30140502, 127,
alpar@9:       5000, 500, 500, 37500, 1, 100, 375000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{49205455, 128,
alpar@9:       5000, 500, 500, 50000, 1, 100, 500000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{42958341, 129,
alpar@9:       5000, 500, 500, 75000, 1, 100, 750000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{25440925, 130,
alpar@9:       5000, 500, 500, 12500, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{75294924, 131,
alpar@9:       5000, 500, 500, 37500, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{4463965, 132,
alpar@9:       5000, 500, 500, 50000, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{13390427, 133,
alpar@9:       5000, 500, 500, 75000, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{95250971, 134,
alpar@9:       1000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{54830522, 135,
alpar@9:       2500, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{520593, 136,
alpar@9:       7500, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{52900925, 137,
alpar@9:       10000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{22603395, 138,
alpar@9:       5000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 50,
alpar@9:    },{55253099, 139,
alpar@9:       5000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 250,
alpar@9:    },{75357001, 140,
alpar@9:       5000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 500,
alpar@9:    },{10072459, 141,
alpar@9:       5000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 2500,
alpar@9:    },{55728492, 142,
alpar@9:       5000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 100, 1, 5000,
alpar@9:    },{593043, 143,
alpar@9:       5000, 500, 500, 25000, 1, 100, 250000, 500, 500, 0, 0, 1, 1000,
alpar@9:    },{94236572, 144,
alpar@9:       5000, 500, 500, 25000, 1, 10, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{94882955, 145,
alpar@9:       5000, 500, 500, 25000, 1, 1000, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{48489922, 146,
alpar@9:       5000, 500, 500, 25000, 1, 10000, 250000, 500, 500, 0, 100, 1,
alpar@9:       1000,
alpar@9:    },{75578374, 147,
alpar@9:       5000, 500, 500, 25000, -100, -1, 250000, 500, 500, 0, 100, 1,
alpar@9:       1000,
alpar@9:    },{44821152, 148,
alpar@9:       5000, 500, 500, 25000, -50, 49, 250000, 500, 500, 0, 100, 1, 1000,
alpar@9:    },{45224103, 149,
alpar@9:       5000, 500, 500, 25000, 101, 200, 250000, 500, 500, 0, 100, 1,
alpar@9:       1000,
alpar@9:    },{63491741, 150,
alpar@9:       5000, 500, 500, 25000, 1001, 1100, 250000, 500, 500, 0, 100, 1,
alpar@9:       1000,
alpar@9:    }
alpar@9: };
alpar@9: 
alpar@9: typedef struct { double rhs; } v_data;
alpar@9: typedef struct { double cap, cost; } a_data;
alpar@9: 
alpar@9: int main(void)
alpar@9: {     glp_graph *G;
alpar@9:       int k;
alpar@9:       char fname[100+1];
alpar@9:       G = glp_create_graph(sizeof(v_data), sizeof(a_data));
alpar@9:       for (k = 1; k <= 50; k++)
alpar@9:       {  sprintf(fname, "netgn%03d.min", parm[k-1][1]);
alpar@9:          glp_netgen(G, offsetof(v_data, rhs), offsetof(a_data, cap),
alpar@9:             offsetof(a_data, cost), &parm[k-1][-1]);
alpar@9:          glp_write_mincost(G, offsetof(v_data, rhs), -1,
alpar@9:             offsetof(a_data, cap), offsetof(a_data, cost), fname);
alpar@9:       }
alpar@9:       glp_delete_graph(G);
alpar@9:       return 0;
alpar@9: }
alpar@9: 
alpar@9: /* eof */