1load_package linalg; 2 3 4 5hu := { 6 - n2 <= -1, 7 - n1 - n2 <= 0, 8 2*n1 + n2 <= 0, 9 5*n1 + 2*n2 <= 0, 10 5*n1 - n2 <= 0}$ 11 12 13 14simplex(min, 0, hu); 15 16 17***** Error in simplex: Problem has no feasible solution. 18 19simplex(max, n1, hu); 20 21 22***** Error in simplex: Problem has no feasible solution. 23 24 25end; 26 27Tested on x86_64-pc-windows CSL 28Time (counter 1): 0 ms 29 30End of Lisp run after 0.00+0.06 seconds 31real 0.20 32user 0.04 33sys 0.01 34