/*----------------------------------------------------------------
%W% %G%
ctty118e.asc translated Tue Dec 17 10:28:21 1996 by ntscable 2.0
source file syntax: Eutectic
output file syntax: CABLE
soma: diameter = 10.0751 um length = 23.0005 um area = 728.008 um2
16 three-D points; 19 outline points numbered 1-19
outline diameter = 15.7266 um
4 primary neurites
42 branches totaling 1395.32 um in length, 2191.11 um2 in area
568 tree points translated to 52 segments (1 requested)
Neurites divided into segments of equal dx between adjacent digitized
branch points.
Segment length constrained to be < 10 um.
No. points 587
No. trees 5
Text T11118EO, HRP and DAB, 2/3/89
----------------------------------------------------------------*/
/* create sections */
create soma,\
dend1[3],\
dend2[3],\
dend3[1],\
dend4[13]
/*----------------------------------------------------------------*/
proc geometry() { local i, j
/* soma geometry */
soma {
nseg = 1
pt3dclear()
for j = 1, fscan() {
pt3dadd(fscan(),fscan(),fscan(),fscan())
}
}
/* connect primary neurites */
soma connect dend1[0] (0), 0.5
soma connect dend2[0] (0), 0.5
soma connect dend3[0] (0), 0.5
soma connect dend4[0] (0), 0.5
/* neurite geometry*/
for i = 0,2 {
dend1[i] {
nseg = fscan()
pt3dclear()
for j = 1, fscan() {
pt3dadd(fscan(),fscan(),fscan(),fscan())
}
}
}
for i = 0,2 {
dend2[i] {
nseg = fscan()
pt3dclear()
for j = 1, fscan() {
pt3dadd(fscan(),fscan(),fscan(),fscan())
}
}
}
for i = 0,0 {
dend3[i] {
nseg = fscan()
pt3dclear()
for j = 1, fscan() {
pt3dadd(fscan(),fscan(),fscan(),fscan())
}
}
}
for i = 0,12 {
dend4[i] {
nseg = fscan()
pt3dclear()
for j = 1, fscan() {
pt3dadd(fscan(),fscan(),fscan(),fscan())
}
}
}
/* branching topology*/
for i = 1,2 {
dend1[fscan()] connect dend1[i] (0), fscan()
}
for i = 1,2 {
dend2[fscan()] connect dend2[i] (0), fscan()
}
for i = 1,0 {
dend3[fscan()] connect dend3[i] (0), fscan()
}
for i = 1,12 {
dend4[fscan()] connect dend4[i] (0), fscan()
}
}
geometry()
SOMA COORDINATES AND DIAMETERS:
16
-9 3 1.5 0
-8 2.6667 1.6667 3.35
-7.5 1.75 1.5 6.5765
-7.5 -0.5 1.25 11.102
-5.5 -1.5714 0.67857 14.861
-4 -1.0357 0.25 15.08
-2 -0.625 0.25 14.758
0 -0.055556 0.25 14.12
2.5 0.1875 0.25 12.385
4 0.6 0.25 10.812
5 0.625 0.375 9.2534
6 0.66667 0.41667 7.6685
7.5 1.0417 0.041667 5.9173
7.5 0.29167 0.29167 4.4363
8 -0.25 0 2.5
8 -1.5 0 0
NEURITE COORDINATES AND DIAMETERS:
4 11
8 2.5 0.5 0.7
10 4 0.5 0.7
12 5.5 3 0.7
16 7 3.5 0.7
20 9 4.5 0.7
21 10.5 5 0.7
23.5 10.5 4.5 0.4
28 11.5 5 0.4
30 13 4 0.5
32 14.5 4.5 0.3
34 15.5 4.5 0.3
7 18
34 15.5 4.5 0.3
36 15 5 0.1
39.5 15 4 0.1
41.5 15.5 5.5 0.1
44 15 7 0.1
48 13.5 7 0.1
52.5 11.5 7.5 0.1
56 11.5 7.5 0.1
60 12.5 6.5 0.1
62.5 13 7 0.1
65.5 14.5 9 0.1
70 16 9 0.1
73 17.5 7.5 0.1
76 20 7.5 0.1
78.5 22 7.5 0.1
82.5 25.5 7.5 0.1
87 28 8 0.1
87.5 28 6.5 0.1
2 9
34 15.5 4.5 0.3
34 17.5 5 0.1
31.5 20 5 0.1
31.5 22.5 6.5 0.1
31.5 24 8 0.1
33 25 8 0.1
32.5 27 8.5 0.1
32.5 28.5 9 0.1
31.5 32 9.5 0.1
5 16
5.5 0 -0.5 3.5
6.5 0 5 3.5
7.5 -1 5 2.1
8.5 -1.5 5 1.4
9.5 -2.5 6.5 0.7
11 -3 6.5 0.7
13.5 -3 6.5 0.4
16 -3.5 7 0.4
19.5 -4.5 7.5 0.2
21.5 -5.5 8 0.2
25 -6.5 8 0.2
28 -7.5 7 0.2
31 -9 8 0.2
34.5 -11 7 0.2
37 -11.5 7 0.2
38 -12.5 7 1
1 7
38 -12.5 7 1
37 -14 7 0.1
36 -15.5 7 0.1
37 -17.5 7 0.1
37 -19 7 0.1
37 -21 7 0.1
37 -21 7 0.1
2 8
38 -12.5 7 1
40 -13 7 0.1
42.5 -14 7 0.1
46 -15 7 0.1
48.5 -16 7 0.1
51.5 -16 7 0.1
55.5 -16.5 6.5 0.1
55.5 -16.5 6.5 0.1
1 3
-4 -2.5 0.5 2.8
-4 -3 4 2.8
-4 -3 3.5 2.8
1 4
3 3 -0.5 0.7
4.5 4.5 3 0.7
4.5 7 3.5 0.7
4 9.5 4 0.7
8 31
4 9.5 4 0.7
6.5 9.5 3 0.7
8 10.5 3 0.7
8 12 3 0.7
8.5 15.5 3.5 0.7
10 17 3.5 0.5
11 22 3.5 0.5
11.5 23.5 3.5 0.3
12 28 4.5 0.3
12 31 4 0.3
12 33.5 4 0.3
12.5 35.5 4 0.3
11 37 4 0.3
10 38.5 7.5 0.3
11.5 41 9.5 0.3
14 41.5 9.5 0.2
15.5 43 9.5 0.2
17.5 42.5 9.5 0.2
19 43.5 9.5 0.2
20.5 40.5 8.5 0.2
21 40 9 0.2
23.5 40 8 0.1
24.5 40.5 9 0.1
26.5 40.5 8 0.1
29 41 7 0.1
31 40.5 7.5 0.5
33.5 41 5.5 0.1
35.5 42 6 0.1
39 43 4.5 0.1
41.5 44 4.5 0.1
41 44 4.5 0.1
2 7
4 9.5 4 0.7
2.5 11 4.5 0.4
-0.5 13.5 5.5 0.4
-2.5 16 6.5 0.4
-4 17.5 6.5 0.4
-7 16.5 7.5 0.4
-8.5 17 7.5 0.4
1 2
-8.5 17 7.5 0.4
-9 17.5 7.5 0.1
2 9
-8.5 17 7.5 0.4
-10.5 17 7 0.4
-12.5 17.5 7 0.4
-15.5 17 7 0.4
-18.5 17 7 0.4
-20 15.5 7 0.4
-22.5 17 7 0.4
-23.5 17.5 7 0.9
-23.5 17.5 7 0.9
2 5
-23.5 17.5 7 0.9
-23 14 7.5 0.1
-21 10.5 8 0.1
-19 7 8 0.1
-19 7 8 0.1
2 7
-23.5 17.5 7 0.9
-25.5 18 8 0.5
-28 18 6.5 0.5
-30.5 18 7 0.5
-32.5 18.5 8.5 0.5
-34.5 20 9 0.5
-34.5 20 9 0.5
2 8
-34.5 20 9 0.5
-34.5 22.5 9.5 0.1
-33.5 26 11.5 0.1
-32 28.5 11 0.1
-31 29.5 10.5 0.5
-30 31.5 10.5 0.1
-30.5 33.5 11 0.1
-30.5 33.5 11 0.1
3 10
-34.5 20 9 0.5
-37 19.5 8 0.2
-40 20 8 0.2
-45 21.5 9.5 0.2
-48 23.5 8.5 0.6
-48.5 26 9 0.3
-50.5 29.5 9 1.1
-50.5 32.5 8.5 0.3
-52.5 33 8.5 0.3
-53 35.5 8 0.3
1 5
-53 35.5 8 0.3
-51 35 8 0.1
-50 34.5 8.5 0.1
-49 33 8 0.1
-49 33 8 0.1
1 5
-53 35.5 8 0.3
-53.5 38 8 0.1
-55 41 8.5 0.1
-57.5 42.5 9.5 0.1
-57.5 42.5 9.5 0.1
1 3
-57.5 42.5 9.5 0.1
-59.5 44.5 10.5 0.1
-62.5 47 11 0.1
3 11
-57.5 42.5 9.5 0.1
-60 42.5 9.5 0.1
-64 42.5 10 0.1
-67 43 10.5 0.1
-69 42.5 7.5 1.1
-70.5 43 9 0.1
-74 43 9 0.1
-76 42 9.5 0.1
-77.5 44 9.5 0.1
-79.5 45 9.5 0.1
-81 47 10.5 0.1
CONNECTIONS:
0 1
0 1
0 1
0 1
0 1
0 1
2 1
2 1
4 1
4 1
6 1
6 1
8 1
8 1
10 1
10 1
/*----------------------------------------------------------------*/
proc geometry() {
/* NULL geometry procedure: keeps the user from
calling the geometry procedure in isolation. */
printf("\nYou must re-read the entire geometry\n")
printf("file to execute geometry().\n\n")
}