File: convex1.in

package info (click to toggle)
polylib 5.22.5-3%2Bdfsg
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd, stretch, wheezy
  • size: 14,444 kB
  • ctags: 52,958
  • sloc: ansic: 16,342; sh: 10,134; makefile: 560
file content (17 lines) | stat: -rw-r--r-- 275 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
# D1 = readDom["{j,N | 0<=j<=N-1; 2<=N}"]
D 1
4 4
1   1  0   0
1  -1  1  -1
1   0  1  -2
1   0  0   1
# D2 = readDom["{j, N | 1<=j<=N; 2<=N}"]
D 1
4 4
1  1  0  -1
1 -1  1   0
1  0  1  -2
1  0  0   1
F 1
# D12 = DomConvex[DomUnion[D1,D2]]
# ashow[D12] = {j,N | 0<=j<=N; 2<=N}