barvinok 0.41.5
[barvinok.git] / tests / iscc / lattice_width-2
blob642ee06d3fa0a06e52db0b27a7756f105778b07c
1 P := [m,n] -> { [x,y] : x, y >= 0 and 2x <= n and 3x + 4y <= m };
2 R := lattice_width(P);
3 W := [m, n] -> { 1/2 * n : m >= 0 and 0 <= n <= 2m and 2n < m and 3n < 2m;
4                 1/4 * m : m >= 0 and n >= 0 and 2n >= m };
5 Z := [n] -> { };
6 assert((R - W) == Z);