| 1 | BLOCKDATA EDGEC
|
|---|
| 2 | C
|
|---|
| 3 | C Note, for some (lesser) compilers, the BLOCKDATA statement
|
|---|
| 4 | C needs to be compiled in a separate file. Therefore, do not
|
|---|
| 5 | C include any other modules in this file.
|
|---|
| 6 | C
|
|---|
| 7 | INCLUDE 'SIZE'
|
|---|
| 8 | INCLUDE 'TOPOL'
|
|---|
| 9 | DATA IEDGFC / 5,7,9,11, 6,8,10,12,
|
|---|
| 10 | $ 1,3,9,10, 2,4,11,12,
|
|---|
| 11 | $ 1,2,5,6, 3,4,7,8 /
|
|---|
| 12 | DATA ICEDG / 1,2,1, 3,4,1, 5,6,1, 7,8,1,
|
|---|
| 13 | $ 1,3,2, 2,4,2, 5,7,2, 6,8,2,
|
|---|
| 14 | $ 1,5,3, 2,6,3, 3,7,3, 4,8,3,
|
|---|
| 15 | C -2D-
|
|---|
| 16 | $ 1,2,1, 3,4,1, 1,3,2, 2,4,2 /
|
|---|
| 17 | DATA ICFACE/ 1,3,5,7, 2,4,6,8,
|
|---|
| 18 | $ 1,2,5,6, 3,4,7,8,
|
|---|
| 19 | $ 1,2,3,4, 5,6,7,8,
|
|---|
| 20 | C -2D-
|
|---|
| 21 | $ 1,3,0,0, 2,4,0,0,
|
|---|
| 22 | $ 1,2,0,0, 3,4,0,0 /
|
|---|
| 23 | C
|
|---|
| 24 | END
|
|---|
