File: convex2.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 (22 lines) | stat: -rw-r--r-- 377 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
# D1 = readDom["{i,j,N | 1<=i<=N; 0<=j<=N-1; 2<=N}"]
D 1
6 5
1  1  0  0 -1
1 -1  0  1  0
1  0  1  0  0
1  0 -1  1 -1 
1  0  0  1 -2
1  0  0  0  1
# D2 = readDom["{i,j,N | 1<=i<=N; 1<=j<=N; 2<=N}"]
D 1
6 5
1  1  0  0 -1
1 -1  0  1  0
1  0  1  0 -1
1  0 -1  1  0
1  0  0  1 -2
1  0  0  0  1
F 1
# D12 = DomConvex[DomUnion[D1,D2]]
# ashow[D12] = {i,j,N | 1<=i<=N; 0<=j<=N; 2<=N}