Set n / n1*n20 /; Set s / a1 /; yupp('n1','n1','a1')=0; Parameter fcost(m,n,s) / $ondelim n1 n2 a1 1334 n2 n1 a1 1724 n1 n3 a1 1962 n3 n1 a1 1145 n1 n4 a1 1961 n4 n1 a1 1942 n1 n5 a1 1391 n5 n1 a1 1153 n1 n6 a1 1421 n6 n1 a1 1895 n1 n7 a1 1771 n7 n1 a1 1912 n1 n8 a1 1035 n8 n1 a1 1811 n1 n9 a1 1673 n9 n1 a1 1711 n1 n10 a1 1547 n10 n1 a1 1757 n1 n11 a1 1723 n11 n1 a1 1778 n1 n12 a1 1190 n12 n1 a1 1106 n1 n13 a1 1264 n13 n1 a1 1805 n1 n14 a1 1370 n14 n1 a1 1101 n1 n15 a1 1629 n15 n1 a1 1954 n1 n16 a1 1966 n16 n1 a1 1308 n1 n17 a1 1626 n17 n1 a1 1538 n1 n18 a1 1929 n18 n1 a1 1115 n1 n19 a1 1704 n19 n1 a1 1306 n1 n20 a1 1021 n20 n1 a1 1072 n2 n3 a1 1777 n3 n2 a1 1512 n2 n4 a1 1161 n4 n2 a1 1767 n2 n5 a1 1031 n5 n2 a1 1150 n2 n6 a1 1966 n6 n2 a1 1191 n2 n7 a1 1457 n7 n2 a1 1383 n2 n8 a1 1209 n8 n2 a1 1588 n2 n9 a1 1506 n9 n2 a1 1168 n2 n10 a1 1762 n10 n2 a1 1359 n2 n11 a1 1548 n11 n2 a1 1041 n2 n12 a1 1291 n12 n2 a1 1020 n2 n13 a1 1348 n13 n2 a1 1484 n2 n14 a1 1053 n14 n2 a1 1938 n2 n15 a1 1127 n15 n2 a1 1893 n2 n16 a1 1807 n16 n2 a1 1617 n2 n17 a1 1309 n17 n2 a1 1451 n2 n18 a1 1519 n18 n2 a1 1303 n2 n19 a1 1844 n19 n2 a1 1702 n2 n20 a1 1093 n20 n2 a1 1587 n3 n4 a1 1448 n4 n3 a1 1618 n3 n5 a1 1798 n5 n3 a1 1798 n3 n6 a1 1472 n6 n3 a1 1292 n3 n7 a1 1190 n7 n3 a1 1191 n3 n8 a1 1156 n8 n3 a1 1634 n3 n9 a1 1328 n9 n3 a1 1886 n3 n10 a1 1869 n10 n3 a1 1416 n3 n11 a1 1322 n11 n3 a1 1699 n3 n12 a1 1892 n12 n3 a1 1712 n3 n13 a1 1003 n13 n3 a1 1688 n3 n14 a1 1255 n14 n3 a1 1585 n3 n15 a1 1088 n15 n3 a1 1757 n3 n16 a1 1169 n16 n3 a1 1189 n3 n17 a1 1368 n17 n3 a1 1555 n3 n18 a1 1441 n18 n3 a1 1060 n3 n19 a1 1139 n19 n3 a1 1996 n3 n20 a1 1549 n20 n3 a1 1949 n4 n5 a1 1297 n5 n4 a1 1105 n4 n6 a1 1455 n6 n4 a1 1701 n4 n7 a1 1786 n7 n4 a1 1355 n4 n8 a1 1912 n8 n4 a1 1945 n4 n9 a1 1321 n9 n4 a1 1982 n4 n10 a1 1196 n10 n4 a1 1161 n4 n11 a1 1173 n11 n4 a1 1659 n4 n12 a1 1253 n12 n4 a1 1510 n4 n13 a1 1186 n13 n4 a1 1022 n4 n14 a1 1787 n14 n4 a1 1391 n4 n15 a1 1477 n15 n4 a1 1824 n4 n16 a1 1372 n16 n4 a1 1070 n4 n17 a1 1518 n17 n4 a1 1270 n4 n18 a1 1192 n18 n4 a1 1480 n4 n19 a1 1802 n19 n4 a1 1625 n4 n20 a1 1023 n20 n4 a1 1181 n5 n6 a1 1505 n6 n5 a1 1031 n5 n7 a1 1222 n7 n5 a1 1900 n5 n8 a1 1413 n8 n5 a1 1170 n5 n9 a1 1711 n9 n5 a1 1667 n5 n10 a1 1140 n10 n5 a1 1624 n5 n11 a1 1576 n11 n5 a1 1302 n5 n12 a1 1678 n12 n5 a1 1484 n5 n13 a1 1119 n13 n5 a1 1087 n5 n14 a1 1010 n14 n5 a1 1315 n5 n15 a1 1043 n15 n5 a1 1109 n5 n16 a1 1565 n16 n5 a1 1474 n5 n17 a1 1629 n17 n5 a1 1520 n5 n18 a1 1123 n18 n5 a1 1261 n5 n19 a1 1264 n19 n5 a1 1116 n5 n20 a1 1011 n20 n5 a1 1547 n6 n7 a1 1790 n7 n6 a1 1763 n6 n8 a1 1662 n8 n6 a1 1713 n6 n9 a1 1365 n9 n6 a1 1200 n6 n10 a1 1303 n10 n6 a1 1324 n6 n11 a1 1113 n11 n6 a1 1850 n6 n12 a1 1993 n12 n6 a1 1540 n6 n13 a1 1835 n13 n6 a1 1350 n6 n14 a1 1556 n14 n6 a1 1357 n6 n15 a1 1337 n15 n6 a1 1361 n6 n16 a1 1617 n16 n6 a1 1696 n6 n17 a1 1423 n17 n6 a1 1565 n6 n18 a1 1296 n18 n6 a1 1962 n6 n19 a1 1654 n19 n6 a1 1369 n6 n20 a1 1607 n20 n6 a1 1635 n7 n8 a1 1675 n8 n7 a1 1142 n7 n9 a1 1741 n9 n7 a1 1825 n7 n10 a1 1626 n10 n7 a1 1783 n7 n11 a1 1279 n11 n7 a1 1734 n7 n12 a1 1556 n12 n7 a1 1705 n7 n13 a1 1881 n13 n7 a1 1641 n7 n14 a1 1142 n14 n7 a1 1877 n7 n15 a1 1752 n15 n7 a1 1673 n7 n16 a1 1875 n16 n7 a1 1610 n7 n17 a1 1112 n17 n7 a1 1831 n7 n18 a1 1685 n18 n7 a1 1589 n7 n19 a1 1353 n19 n7 a1 1740 n7 n20 a1 1335 n20 n7 a1 1605 n8 n9 a1 1503 n9 n8 a1 1608 n8 n10 a1 1549 n10 n8 a1 1627 n8 n11 a1 1129 n11 n8 a1 1174 n8 n12 a1 1215 n12 n8 a1 1992 n8 n13 a1 1392 n13 n8 a1 1428 n8 n14 a1 1075 n14 n8 a1 1970 n8 n15 a1 1604 n15 n8 a1 1663 n8 n16 a1 1010 n16 n8 a1 1240 n8 n17 a1 1619 n17 n8 a1 1704 n8 n18 a1 1750 n18 n8 a1 1539 n8 n19 a1 1098 n19 n8 a1 1648 n8 n20 a1 1913 n20 n8 a1 1712 n9 n10 a1 1769 n10 n9 a1 1985 n9 n11 a1 1865 n11 n9 a1 1508 n9 n12 a1 1601 n12 n9 a1 1472 n9 n13 a1 1570 n13 n9 a1 1103 n9 n14 a1 1600 n14 n9 a1 1565 n9 n15 a1 1347 n15 n9 a1 1637 n9 n16 a1 1049 n16 n9 a1 1342 n9 n17 a1 1221 n17 n9 a1 1888 n9 n18 a1 1949 n18 n9 a1 1620 n9 n19 a1 1536 n19 n9 a1 1226 n9 n20 a1 1853 n20 n9 a1 1748 n10 n11 a1 1257 n11 n10 a1 1955 n10 n12 a1 1411 n12 n10 a1 1001 n10 n13 a1 1584 n13 n10 a1 1342 n10 n14 a1 1142 n14 n10 a1 1072 n10 n15 a1 1173 n15 n10 a1 1705 n10 n16 a1 1375 n16 n10 a1 1036 n10 n17 a1 1814 n17 n10 a1 1652 n10 n18 a1 1482 n18 n10 a1 1131 n10 n19 a1 1625 n19 n10 a1 1186 n10 n20 a1 1662 n20 n10 a1 1353 n11 n12 a1 1008 n12 n11 a1 1454 n11 n13 a1 1303 n13 n11 a1 1124 n11 n14 a1 1109 n14 n11 a1 1080 n11 n15 a1 1050 n15 n11 a1 1264 n11 n16 a1 1643 n16 n11 a1 1561 n11 n17 a1 1282 n17 n11 a1 1220 n11 n18 a1 1831 n18 n11 a1 1259 n11 n19 a1 1971 n19 n11 a1 1781 n11 n20 a1 1685 n20 n11 a1 1589 n12 n13 a1 1037 n13 n12 a1 1234 n12 n14 a1 1959 n14 n12 a1 1269 n12 n15 a1 1058 n15 n12 a1 1264 n12 n16 a1 1555 n16 n12 a1 1039 n12 n17 a1 1082 n17 n12 a1 1710 n12 n18 a1 1380 n18 n12 a1 1541 n12 n19 a1 1110 n19 n12 a1 1788 n12 n20 a1 1956 n20 n12 a1 1008 n13 n14 a1 1723 n14 n13 a1 1184 n13 n15 a1 1071 n15 n13 a1 1071 n13 n16 a1 1153 n16 n13 a1 1825 n13 n17 a1 1650 n17 n13 a1 1693 n13 n18 a1 1116 n18 n13 a1 1528 n13 n19 a1 1421 n19 n13 a1 1816 n13 n20 a1 1666 n20 n13 a1 1964 n14 n15 a1 1021 n15 n14 a1 1064 n14 n16 a1 1902 n16 n14 a1 1941 n14 n17 a1 1423 n17 n14 a1 1268 n14 n18 a1 1907 n18 n14 a1 1012 n14 n19 a1 1114 n19 n14 a1 1556 n14 n20 a1 1996 n20 n14 a1 1345 n15 n16 a1 1491 n16 n15 a1 1114 n15 n17 a1 1722 n17 n15 a1 1052 n15 n18 a1 1238 n18 n15 a1 1866 n15 n19 a1 1486 n19 n15 a1 1633 n15 n20 a1 1146 n20 n15 a1 1925 n16 n17 a1 1602 n17 n16 a1 1830 n16 n18 a1 1278 n18 n16 a1 1448 n16 n19 a1 1315 n19 n16 a1 1567 n16 n20 a1 1418 n20 n16 a1 1851 n17 n18 a1 1449 n18 n17 a1 1229 n17 n19 a1 1560 n19 n17 a1 1655 n17 n20 a1 1361 n20 n17 a1 1146 n18 n19 a1 1188 n19 n18 a1 1663 n18 n20 a1 1521 n20 n18 a1 1528 n19 n20 a1 1905 n20 n19 a1 1962 $offdelim /; Parameter vcost(m,n,s) / $ondelim n1 n2 a1 9 n2 n1 a1 9 n1 n3 a1 1 n3 n1 a1 9 n1 n4 a1 7 n4 n1 a1 8 n1 n5 a1 1 n5 n1 a1 6 n1 n6 a1 8 n6 n1 a1 9 n1 n7 a1 1 n7 n1 a1 7 n1 n8 a1 2 n8 n1 a1 3 n1 n9 a1 4 n9 n1 a1 4 n1 n10 a1 2 n10 n1 a1 2 n1 n11 a1 8 n11 n1 a1 8 n1 n12 a1 3 n12 n1 a1 1 n1 n13 a1 6 n13 n1 a1 6 n1 n14 a1 7 n14 n1 a1 4 n1 n15 a1 3 n15 n1 a1 1 n1 n16 a1 6 n16 n1 a1 9 n1 n17 a1 4 n17 n1 a1 3 n1 n18 a1 4 n18 n1 a1 1 n1 n19 a1 4 n19 n1 a1 1 n1 n20 a1 4 n20 n1 a1 6 n2 n3 a1 7 n3 n2 a1 4 n2 n4 a1 7 n4 n2 a1 9 n2 n5 a1 5 n5 n2 a1 9 n2 n6 a1 8 n6 n2 a1 4 n2 n7 a1 7 n7 n2 a1 7 n2 n8 a1 9 n8 n2 a1 3 n2 n9 a1 8 n9 n2 a1 7 n2 n10 a1 3 n10 n2 a1 5 n2 n11 a1 9 n11 n2 a1 2 n2 n12 a1 6 n12 n2 a1 6 n2 n13 a1 1 n13 n2 a1 4 n2 n14 a1 1 n14 n2 a1 4 n2 n15 a1 9 n15 n2 a1 3 n2 n16 a1 2 n16 n2 a1 1 n2 n17 a1 2 n17 n2 a1 9 n2 n18 a1 3 n18 n2 a1 2 n2 n19 a1 2 n19 n2 a1 5 n2 n20 a1 2 n20 n2 a1 5 n3 n4 a1 9 n4 n3 a1 4 n3 n5 a1 6 n5 n3 a1 6 n3 n6 a1 5 n6 n3 a1 8 n3 n7 a1 6 n7 n3 a1 3 n3 n8 a1 2 n8 n3 a1 3 n3 n9 a1 4 n9 n3 a1 2 n3 n10 a1 3 n10 n3 a1 4 n3 n11 a1 4 n11 n3 a1 5 n3 n12 a1 1 n12 n3 a1 9 n3 n13 a1 9 n13 n3 a1 6 n3 n14 a1 7 n14 n3 a1 8 n3 n15 a1 8 n15 n3 a1 7 n3 n16 a1 9 n16 n3 a1 9 n3 n17 a1 1 n17 n3 a1 6 n3 n18 a1 8 n18 n3 a1 5 n3 n19 a1 1 n19 n3 a1 8 n3 n20 a1 2 n20 n3 a1 4 n4 n5 a1 3 n5 n4 a1 9 n4 n6 a1 2 n6 n4 a1 7 n4 n7 a1 8 n7 n4 a1 3 n4 n8 a1 2 n8 n4 a1 6 n4 n9 a1 1 n9 n4 a1 4 n4 n10 a1 5 n10 n4 a1 2 n4 n11 a1 3 n11 n4 a1 3 n4 n12 a1 7 n12 n4 a1 1 n4 n13 a1 4 n13 n4 a1 2 n4 n14 a1 6 n14 n4 a1 4 n4 n15 a1 8 n15 n4 a1 9 n4 n16 a1 9 n16 n4 a1 8 n4 n17 a1 2 n17 n4 a1 8 n4 n18 a1 5 n18 n4 a1 7 n4 n19 a1 5 n19 n4 a1 9 n4 n20 a1 8 n20 n4 a1 3 n5 n6 a1 1 n6 n5 a1 1 n5 n7 a1 8 n7 n5 a1 6 n5 n8 a1 9 n8 n5 a1 6 n5 n9 a1 9 n9 n5 a1 6 n5 n10 a1 5 n10 n5 a1 5 n5 n11 a1 2 n11 n5 a1 6 n5 n12 a1 3 n12 n5 a1 2 n5 n13 a1 7 n13 n5 a1 2 n5 n14 a1 1 n14 n5 a1 5 n5 n15 a1 6 n15 n5 a1 1 n5 n16 a1 5 n16 n5 a1 4 n5 n17 a1 5 n17 n5 a1 8 n5 n18 a1 5 n18 n5 a1 3 n5 n19 a1 9 n19 n5 a1 2 n5 n20 a1 5 n20 n5 a1 4 n6 n7 a1 2 n7 n6 a1 3 n6 n8 a1 8 n8 n6 a1 4 n6 n9 a1 2 n9 n6 a1 3 n6 n10 a1 5 n10 n6 a1 8 n6 n11 a1 6 n11 n6 a1 2 n6 n12 a1 1 n12 n6 a1 2 n6 n13 a1 4 n13 n6 a1 7 n6 n14 a1 5 n14 n6 a1 7 n6 n15 a1 2 n15 n6 a1 2 n6 n16 a1 9 n16 n6 a1 1 n6 n17 a1 3 n17 n6 a1 2 n6 n18 a1 5 n18 n6 a1 3 n6 n19 a1 8 n19 n6 a1 2 n6 n20 a1 3 n20 n6 a1 3 n7 n8 a1 7 n8 n7 a1 1 n7 n9 a1 5 n9 n7 a1 4 n7 n10 a1 6 n10 n7 a1 5 n7 n11 a1 2 n11 n7 a1 8 n7 n12 a1 3 n12 n7 a1 7 n7 n13 a1 1 n13 n7 a1 5 n7 n14 a1 7 n14 n7 a1 9 n7 n15 a1 9 n15 n7 a1 1 n7 n16 a1 8 n16 n7 a1 3 n7 n17 a1 2 n17 n7 a1 3 n7 n18 a1 2 n18 n7 a1 4 n7 n19 a1 8 n19 n7 a1 4 n7 n20 a1 9 n20 n7 a1 6 n8 n9 a1 5 n9 n8 a1 7 n8 n10 a1 4 n10 n8 a1 2 n8 n11 a1 4 n11 n8 a1 4 n8 n12 a1 3 n12 n8 a1 6 n8 n13 a1 4 n13 n8 a1 7 n8 n14 a1 8 n14 n8 a1 1 n8 n15 a1 7 n15 n8 a1 9 n8 n16 a1 6 n16 n8 a1 4 n8 n17 a1 1 n17 n8 a1 5 n8 n18 a1 8 n18 n8 a1 8 n8 n19 a1 2 n19 n8 a1 4 n8 n20 a1 9 n20 n8 a1 9 n9 n10 a1 4 n10 n9 a1 6 n9 n11 a1 6 n11 n9 a1 8 n9 n12 a1 7 n12 n9 a1 1 n9 n13 a1 5 n13 n9 a1 4 n9 n14 a1 9 n14 n9 a1 3 n9 n15 a1 7 n15 n9 a1 1 n9 n16 a1 4 n16 n9 a1 5 n9 n17 a1 3 n17 n9 a1 3 n9 n18 a1 7 n18 n9 a1 2 n9 n19 a1 5 n19 n9 a1 9 n9 n20 a1 1 n20 n9 a1 2 n10 n11 a1 3 n11 n10 a1 4 n10 n12 a1 3 n12 n10 a1 7 n10 n13 a1 2 n13 n10 a1 1 n10 n14 a1 4 n14 n10 a1 7 n10 n15 a1 9 n15 n10 a1 5 n10 n16 a1 5 n16 n10 a1 6 n10 n17 a1 9 n17 n10 a1 4 n10 n18 a1 5 n18 n10 a1 1 n10 n19 a1 4 n19 n10 a1 4 n10 n20 a1 4 n20 n10 a1 4 n11 n12 a1 7 n12 n11 a1 4 n11 n13 a1 3 n13 n11 a1 5 n11 n14 a1 2 n14 n11 a1 5 n11 n15 a1 2 n15 n11 a1 6 n11 n16 a1 5 n16 n11 a1 8 n11 n17 a1 1 n17 n11 a1 3 n11 n18 a1 3 n18 n11 a1 9 n11 n19 a1 3 n19 n11 a1 4 n11 n20 a1 9 n20 n11 a1 3 n12 n13 a1 8 n13 n12 a1 7 n12 n14 a1 8 n14 n12 a1 4 n12 n15 a1 7 n15 n12 a1 4 n12 n16 a1 7 n16 n12 a1 7 n12 n17 a1 3 n17 n12 a1 3 n12 n18 a1 7 n18 n12 a1 5 n12 n19 a1 6 n19 n12 a1 7 n12 n20 a1 7 n20 n12 a1 5 n13 n14 a1 5 n14 n13 a1 2 n13 n15 a1 1 n15 n13 a1 6 n13 n16 a1 8 n16 n13 a1 3 n13 n17 a1 6 n17 n13 a1 7 n13 n18 a1 3 n18 n13 a1 1 n13 n19 a1 8 n19 n13 a1 7 n13 n20 a1 7 n20 n13 a1 7 n14 n15 a1 8 n15 n14 a1 7 n14 n16 a1 4 n16 n14 a1 7 n14 n17 a1 2 n17 n14 a1 1 n14 n18 a1 5 n18 n14 a1 1 n14 n19 a1 9 n19 n14 a1 8 n14 n20 a1 9 n20 n14 a1 2 n15 n16 a1 6 n16 n15 a1 2 n15 n17 a1 3 n17 n15 a1 3 n15 n18 a1 1 n18 n15 a1 1 n15 n19 a1 9 n19 n15 a1 2 n15 n20 a1 8 n20 n15 a1 6 n16 n17 a1 2 n17 n16 a1 4 n16 n18 a1 3 n18 n16 a1 2 n16 n19 a1 1 n19 n16 a1 6 n16 n20 a1 2 n20 n16 a1 8 n17 n18 a1 3 n18 n17 a1 2 n17 n19 a1 6 n19 n17 a1 8 n17 n20 a1 1 n20 n17 a1 1 n18 n19 a1 1 n19 n18 a1 8 n18 n20 a1 9 n20 n18 a1 1 n19 n20 a1 7 n20 n19 a1 1 $offdelim /; Parameter demand(n) / n5 18 n7 21 n10 -100 n14 20 n19 6 n20 35 /; u = -sum(n$(demand(n)<0), demand(n)); xupp(m,n,s)$(fcost(m,n,s) or vcost(m,n,s)) = u; loop((m,n,s)$(fcost(m,n,s)<0), fcost(m,n,s)=0; vcost(m,n,s)=0; );