ARM Club 3/TheARMClub_PDCD3.iso/hensa/programming/fortranf1_1/!WimpPoly_dat1_P8

Text File | 1991-10-14 | 5.2 KB | 358 lines

:name
great icosahedron
:comment
 Net data does not agree with Cundy and Rollet
 KMC supplied data for solid vertices Oct 91
:number
8
:symbol
{3,5}      @I sub 5 @
:dual
great stellated dodecahedron
:sfaces
20 20{3}
:svertices
12 12(@3 sup 5@)
:net
20 3
3 0 5 6
3 5 11 12
3 1 6 7
3 6 12 13
3 2 7 8
3 7 13 14
3 3 8 9
3 8 14 15
3 4 9 10
3 9 15 16
3 12 6 5
3 17 12 11
3 13 7 6
3 18 13 12
3 14 8 7
3 19 14 13
3 15 9 8
3 20 15 14
3 16 10 9
3 21 16 15
:solid
180 3
3 24 23 22
3 26 23 25
3 28 23 27
3 27 23 29
3 22 23 30
3 25 23 31
3 30 32 22
3 31 33 25
3 29 34 27
3 22 33 24
3 25 34 26
3 27 32 28
3 35 34 25
3 36 32 27
3 37 33 22
3 27 34 38
3 22 32 39
3 25 33 40
3 23 33 31
3 23 34 29
3 23 32 30
3 34 23 26
3 32 23 28
3 33 23 24
3 38 41 27
3 39 42 22
3 40 43 25
3 22 44 37
3 25 45 35
3 27 46 36
3 47 46 27
3 48 44 22
3 49 45 25
3 25 43 49
3 27 41 47
3 22 42 48
3 46 32 36
3 33 43 40
3 44 33 37
3 34 41 38
3 32 42 39
3 45 34 35
3 34 45 50
3 32 46 51
3 33 44 52
3 41 34 53
3 42 32 54
3 43 33 55
3 55 33 56
3 53 34 57
3 54 32 58
3 57 34 50
3 58 32 51
3 56 33 52
3 42 44 48
3 43 45 49
3 41 46 47
3 51 46 58
3 52 44 56
3 50 45 57
3 58 42 54
3 56 43 55
3 57 41 53
3 45 43 59
3 46 41 60
3 44 42 61
3 62 43 56
3 63 41 57
3 64 42 58
3 57 45 65
3 58 46 66
3 56 44 67
3 59 43 68
3 60 41 69
3 61 42 70
3 69 46 60
3 70 44 61
3 68 45 59
3 71 41 63
3 72 42 64
3 73 43 62
3 44 74 67
3 45 75 65
3 46 76 66
3 65 75 57
3 66 76 58
3 67 74 56
3 56 73 62
3 57 71 63
3 58 72 64
3 76 46 77
3 74 44 78
3 75 45 79
3 43 73 80
3 41 71 81
3 42 72 82
3 79 45 68
3 77 46 69
3 78 44 70
3 69 41 81
3 70 42 82
3 68 43 80
3 83 71 57
3 84 72 58
3 85 73 56
3 56 74 85
3 57 75 83
3 58 76 84
3 81 71 69
3 82 72 70
3 80 73 68
3 68 75 79
3 69 76 77
3 70 74 78
3 75 71 83
3 76 72 84
3 74 73 85
3 71 75 86
3 73 74 87
3 72 76 88
3 89 76 69
3 90 75 68
3 91 74 70
3 69 71 92
3 68 73 93
3 70 72 94
3 73 95 93
3 71 96 92
3 72 97 94
3 95 75 90
3 96 76 89
3 97 74 91
3 92 96 69
3 94 97 70
3 93 95 68
3 68 95 90
3 69 96 89
3 70 97 91
3 74 97 98
3 96 71 99
3 97 72 100
3 75 95 101
3 76 96 102
3 95 73 103
3 87 74 104
3 86 75 105
3 88 76 106
3 105 71 86
3 106 72 88
3 104 73 87
3 103 73 104
3 99 71 105
3 100 72 106
3 106 76 102
3 104 74 98
3 105 75 101
3 95 107 108
3 96 107 109
3 97 107 110
3 107 96 111
3 107 97 112
3 107 95 113
3 101 95 105
3 102 96 106
3 98 97 104
3 104 95 103
3 105 96 99
3 106 97 100
3 112 97 106
3 113 95 104
3 111 96 105
3 106 96 109
3 104 97 110
3 105 95 108
3 109 107 106
3 110 107 104
3 108 107 105
3 104 107 113
3 105 107 111
3 106 107 112
:hinges
19
0 1 10 1 .72973
10 2 1 2 .72973
1 1 11 1 .72973
2 1 12 1 .72973
12 2 3 2 .72973
3 1 13 1 .72973
10 0 3 0 .72973
4 1 14 1 .72973
14 2 5 2 .72973
5 1 15 1 .72973
12 0 5 0 .72973
6 1 16 1 .72973
16 2 7 2 .72973
7 1 17 1 .72973
14 0 7 0 .72973
8 1 18 1 .72973
18 2 9 2 .72973
9 1 19 1 .72973
16 0 9 0 .72973
:vertices
114 22
-.57735 0 0
-.57735 1 0
-.57735 2 0
-.57735 3 0
-.57735 4 0
.28868 -.5 0
.28868 .5 0
.28868 1.5 0
.28868 2.5 0
.28868 3.5 0
.28868 4.5 0
1.1547 -1 0
1.1547 0 0
1.1547 1 0
1.1547 2 0
1.1547 3 0
1.1547 4 0
2.02073 -.5 0
2.02073 .5 0
2.02073 1.5 0
2.02073 2.5 0
2.02073 3.5 0
0.60706 0 -0.79465
0 0 -0.56278
0.11594 -0.08981 -0.35538
-0.30353 -0.52573 -0.79465
-0.13574 -0.0555 -0.35538
-0.30353 0.52573 -0.79465
0.0198 0.14531 -0.35538
-0.13574 0.0555 -0.35538
0.11594 0.08981 -0.35538
0.0198 -0.14531 -0.35538
0.18759 0.32492 -0.41947
0.18759 -0.32492 -0.41947
-0.37518 0 -0.41947
-0.25168 -0.14531 -0.25168
0 0.29062 -0.25168
0.25168 -0.14531 -0.25168
-0.25168 0.14531 -0.25168
0.25168 0.14531 -0.25168
0 -0.29062 -0.25168
-0.41947 0.32492 -0.18759
0.49112 0.20081 -0.18759
-0.07165 -0.52573 -0.18759
0.49112 -0.20081 -0.18759
-0.41947 -0.32492 -0.18759
-0.07165 0.52573 -0.18759
-0.16779 0.29062 -0.18759
0.33558 0 -0.18759
-0.16779 -0.29062 -0.18759
-0.32334 -0.08981 -0.18759
0.08389 0.32492 -0.18759
0.23944 -0.23511 -0.18759
-0.32334 0.08981 -0.18759
0.23944 0.23511 -0.18759
0.08389 -0.32492 -0.18759
0.49112 -0.85065 -0.18759
-0.98225 0 -0.18759
0.49112 0.85065 -0.18759
-0.18759 -0.32492 -0.08389
-0.18759 0.32492 -0.08389
0.37518 0 -0.08389
0.05185 -0.38042 -0.0198
-0.35538 0.14531 -0.0198
0.30353 0.23511 -0.0198
-0.35538 -0.14531 -0.0198
0.05185 0.38042 -0.0198
0.30353 -0.23511 -0.0198
-0.49112 -0.85065 0.18759
-0.49112 0.85065 0.18759
0.98225 0 0.18759
-0.49112 0.20081 0.18759
0.41947 0.32492 0.18759
0.07165 -0.52573 0.18759
0.41947 -0.32492 0.18759
-0.49112 -0.20081 0.18759
0.07165 0.52573 0.18759
-0.05185 0.38042 0.0198
0.35538 -0.14531 0.0198
-0.30353 -0.23511 0.0198
-0.05185 -0.38042 0.0198
-0.30353 0.23511 0.0198
0.35538 0.14531 0.0198
-0.37518 0 0.08389
0.18759 0.32492 0.08389
0.18759 -0.32492 0.08389
-0.33558 0 0.18759
0.16779 -0.29062 0.18759
0.16779 0.29062 0.18759
-0.08389 0.32492 0.18759
-0.23944 -0.23511 0.18759
0.32334 -0.08981 0.18759
-0.23944 0.23511 0.18759
-0.08389 -0.32492 0.18759
0.32334 0.08981 0.18759
-0.18759 -0.32492 0.41947
-0.18759 0.32492 0.41947
0.37518 0 0.41947
0.25168 -0.14531 0.25168
-0.25168 0.14531 0.25168
0.25168 0.14531 0.25168
-0.25168 -0.14531 0.25168
0 0.29062 0.25168
0 -0.29062 0.25168
0.30353 -0.52573 0.79465
-0.60706 0 0.79465
0.30353 0.52573 0.79465
0 0 0.56278
-0.11594 -0.08981 0.35538
-0.0198 0.14531 0.35538
0.13574 -0.0555 0.35538
-0.11594 0.08981 0.35538
0.13574 0.0555 0.35538
-0.0198 -0.14531 0.35538
:EOF