/*----------------------------------------------------------------
%W%  %G%
ctty238g.asc  translated Tue Dec 17 10:28:23 1996 by ntscable 2.0
source file syntax: Eutectic
output file syntax: CABLE
soma: diameter = 10.966 um  length = 19.1375 um  area = 659.3 um2
      13 three-D points; 15 outline points numbered 25-39
      outline diameter = 15.8677 um
4 primary neurites
28 branches totaling 1094.2 um in length, 1959.84 um2 in area
304 tree points translated to 135 segments (1 requested)
Neurites divided into segments of equal dx between adjacent digitized
branch points.
Segment length constrained to be < 10 um.
No. points    343
No. trees       6
Text  T11238GO, HRB and DAB, 2/23/89                                                                                          

----------------------------------------------------------------*/
					/* create sections */
create    soma,\
          dend1[11],\
          dend2[1],\
          dend3[21],\
          dend4[19]



/*----------------------------------------------------------------*/
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,10 {
        dend1[i] {
            nseg = fscan()
            pt3dclear()
            for j = 1, fscan() {
                pt3dadd(fscan(),fscan(),fscan(),fscan())
            }
        }
    }

    for i = 0,0 {
        dend2[i] {
            nseg = fscan()
            pt3dclear()
            for j = 1, fscan() {
                pt3dadd(fscan(),fscan(),fscan(),fscan())
            }
        }
    }

    for i = 0,20 {
        dend3[i] {
            nseg = fscan()
            pt3dclear()
            for j = 1, fscan() {
                pt3dadd(fscan(),fscan(),fscan(),fscan())
            }
        }
    }

    for i = 0,18 {
        dend4[i] {
            nseg = fscan()
            pt3dclear()
            for j = 1, fscan() {
                pt3dadd(fscan(),fscan(),fscan(),fscan())
            }
        }
    }



					/* branching topology*/
    for i = 1,10 {
        dend1[fscan()] connect dend1[i] (0), fscan()
    }

    for i = 1,0 {
        dend2[fscan()] connect dend2[i] (0), fscan()
    }

    for i = 1,20 {
        dend3[fscan()] connect dend3[i] (0), fscan()
    }

    for i = 1,18 {
        dend4[fscan()] connect dend4[i] (0), fscan()
    }

}

geometry()


SOMA COORDINATES AND DIAMETERS:

    13
    -8.5       -1     11.5        0
    -8.5     0.25     11.5      2.5
    -6.5     1.45     11.5      8.1
      -6   1.3889     11.5   8.7778
      -3  0.97222     11.5   12.944
      -2    0.875     11.5    14.25
      -1      0.5     11.5       15
       1    -0.25     11.5     16.5
       4    -0.25     11.5     16.5
       6      0.5     11.5       11
       7   1.1667     11.5   7.6667
     7.5    0.875   11.625   4.7566
       8      1.5       12        0


NEURITE COORDINATES AND DIAMETERS:

    2 6
      -8     -1.5        0      5.9
   -10.5       -2        4      5.9
     -13       -3      5.5      3.9
     -16     -4.5      5.5      2.8
     -19     -5.5      6.5      2.1
   -21.5     -6.5      6.5      2.1

    2 5
   -21.5     -6.5      6.5      2.1
   -24.5     -7.5      9.5      1.5
   -26.5     -7.5       10      1.1
     -28       -8     10.5        1
   -30.5       -9     10.5      0.8

    2 5
   -30.5       -9     10.5      0.8
     -32    -13.5     10.5      0.1
     -34      -18     11.5      0.1
   -35.5      -21     12.5      0.1
     -38    -23.5     11.5      0.1

    7 15
   -30.5       -9     10.5      0.8
     -33     -8.5       10      0.5
   -35.5       -9     10.5      0.5
     -38     -9.5     10.5      0.5
   -40.5    -10.5      9.5      0.4
     -44      -11        9      0.4
   -46.5    -11.5        9      0.4
     -49      -12        9      0.4
     -55    -12.5        9      0.2
   -59.5      -14     10.5      0.2
   -65.5      -15       11      0.1
     -70    -16.5     10.5      0.1
   -77.5      -18     10.5      0.1
   -85.5    -18.5       11      0.1
     -94    -22.5       11      0.1

    2 7
   -21.5     -6.5      6.5      2.1
     -23       -5        8      0.9
   -24.5     -3.5      8.5      0.9
   -27.5     -3.5      8.5      0.9
   -30.5     -1.5     10.5      0.8
     -33       -1       11      0.8
   -33.5       -1     10.5      0.8

    1 4
   -33.5       -1     10.5      0.8
   -32.5      0.5       12      0.1
   -32.5        2     12.5      0.1
   -32.5      3.5       15      0.1

    1 4
   -32.5      3.5       15      0.1
     -30      4.5     15.5      0.1
   -27.5      5.5     16.5      0.1
     -25      7.5     19.5      0.1

    1 4
   -32.5      3.5       15      0.1
     -34      5.5       16      0.1
   -36.5      6.5     17.5      0.1
     -39      7.5     17.5      0.1

    2 6
   -33.5       -1     10.5      0.8
     -35       -1       12      0.4
   -37.5       -1       12      0.4
   -40.5       -1       11      0.4
   -43.5       -1     11.5      0.4
   -45.5     -0.5     11.5      0.4

    2 6
   -45.5     -0.5     11.5      0.4
   -45.5      1.5       12      0.1
   -46.5      3.5       12      0.1
     -47        6       12      0.1
   -47.5      8.5       14      0.1
   -47.5      8.5       14      0.1

    2 7
   -45.5     -0.5     11.5      0.4
     -48       -1       12      0.3
   -50.5       -2       12      0.3
   -52.5     -2.5       13      0.3
     -55     -3.5       13      0.3
     -58     -4.5     13.5      0.3
   -61.5     -5.5     16.5      0.1

    5 17
      -6        9      1.5      0.5
    -7.5      9.5      7.5      0.5
    -8.5       11        8      0.5
     -10     11.5      8.5      0.5
     -11       12      8.5      0.5
   -11.5       13      8.5      0.5
     -13       13      7.5      0.4
   -14.5     14.5      8.5      0.4
     -16     15.5      8.5      0.4
     -18       15      8.5      0.4
     -19     14.5      9.5      0.4
   -22.5     15.5     10.5      0.3
   -24.5     14.5     10.5      0.3
     -27       15       14      0.3
   -28.5     14.5     13.5      0.1
     -30       16       22      0.1
     -33     16.5       21      0.1

    2 6
     2.5        8      3.5      3.1
       3      9.5      5.5      3.1
       4       10      7.5      3.1
       5       11        9      3.1
       8       12       10      2.3
       8       12       10      2.3

    4 12
       8       12       10      2.3
      10     10.5     14.5        1
      14       12     14.5      0.7
      18       13       14      0.7
      21       14     12.5      0.7
    24.5       14       12      0.7
      25     13.5     12.5      0.7
      27       14       12      0.7
    29.5       14     12.5      0.5
      33     13.5     13.5      0.5
    36.5     13.5     12.5      0.5
    38.5     13.5     12.5      1.1

    11 18
    38.5     13.5     12.5      1.1
      40       11       13      0.5
      42       11     12.5      0.5
      44       11       12      0.5
    49.5       11     13.5      0.5
      54       11       14      0.3
    63.5       11       16      0.3
    68.5       11     14.5      0.3
      77       11     16.5      0.3
    83.5     11.5     18.5      0.3
      92       12     16.5      0.3
    98.5     11.5     15.5      0.3
   103.5       13       16      0.3
   109.5     16.5       18      0.3
   118.5     19.5     17.5      0.3
   123.5       21     18.5      0.1
     133       25       18      0.1
     140       28       22      0.1

    3 9
    38.5     13.5     12.5      1.1
    40.5       14       13      0.4
    44.5       15     12.5      0.4
      47       16     14.5      0.4
    51.5       17     13.5      0.2
    54.5       19       14      0.2
    57.5     19.5       15      0.2
      60       20       15      0.1
      62     20.5       14      0.1

    2 7
       8       12       10      2.3
     9.5       13       11      1.5
      12       15     11.5      1.5
    14.5       16     12.5      1.5
      18     17.5       14      1.5
      22       19       15      1.5
      23       19     14.5      1.5

    4 11
      23       19     14.5      1.5
    23.5       21     14.5      0.3
    25.5     22.5       16      0.3
    28.5       23       16      0.3
    32.5       25       16      0.1
    36.5       26       16      0.1
      39       27       16      0.1
    42.5       28       16      0.1
    45.5       30       16      0.1
      48       31     17.5      0.1
      52       33       19      0.1

    1 3
      23       19     14.5      1.5
      25       20     16.5      1.2
    27.5       21     16.5      1.2

    2 7
    27.5       21     16.5      1.2
    27.5     22.5       17      0.1
    26.5       24       19      0.1
    27.5     25.5     19.5      0.1
      31     27.5     17.5      0.1
    33.5     29.5       16      0.1
    34.5     29.5       16      0.1

    2 5
    27.5       21     16.5      1.2
    30.5     21.5     16.5      0.9
    34.5     22.5       16      0.9
      38       23       17      0.9
      39       23     15.5      0.9

    1 2
      39       23     15.5      0.9
    38.5       24     15.5      0.4

    1 6
    38.5       24     15.5      0.4
      39     25.5     15.5      0.1
      41       28       16      0.1
      42     30.5       16      0.1
      44     31.5       16      0.1
      44     31.5       16      0.1

    2 5
    38.5       24     15.5      0.4
      41       25     16.5      0.1
    44.5     26.5     18.5      0.1
      47       29     18.5      0.1
      47       30     18.5      0.1

    1 3
      39       23     15.5      0.9
      43     23.5       16      1.1
      45     23.5       15      1.1

    5 10
      45     23.5       15      1.1
      47       27       18      0.1
      50     28.5       18      0.1
    53.5     30.5       18      0.1
      58       32     19.5      0.1
    61.5     33.5       21      0.1
    65.5     33.5       21      0.1
    68.5     34.5     22.5      0.1
      74     34.5     27.5      0.1
      77     35.5       30      0.1

    1 3
      45     23.5       15      1.1
    49.5       23       15      0.4
    51.5     22.5       16      0.4

    2 6
    51.5     22.5       16      0.4
    52.5       24       16      0.1
      55     27.5     14.5      0.1
    58.5       29       15      0.1
      64     30.5       17      0.1
      67       32     17.5      0.1

    2 4
    51.5     22.5       16      0.4
      56     22.5       15      0.4
      61     22.5       14      0.4
    63.5       22     13.5      0.4

    1 4
    63.5       22     13.5      0.4
    63.5       20     15.5      0.1
    62.5       17     15.5      0.1
    62.5       14     17.5      0.1

    1 2
    63.5       22     13.5      0.4
      65     22.5       14      0.1

    4 9
      65     22.5       14      0.1
    67.5     25.5       17      0.1
    71.5     27.5     17.5      0.1
    74.5       29       17      0.1
    78.5     31.5       21      0.1
      85       34     21.5      0.1
    88.5     36.5       19      0.1
      94       38       19      0.1
    96.5       39       19      0.1

    8 13
      65     22.5       14      0.1
      69     22.5       14      0.1
    73.5       23     14.5      0.1
      78     24.5     14.5      0.1
    83.5       26       14      0.1
      89     27.5     16.5      0.1
      95     29.5       16      0.1
   101.5       31     19.5      0.1
   108.5     32.5     18.5      0.1
     115     33.5       19      0.1
     124       35     19.5      0.1
   132.5     36.5     21.5      0.1
   132.5     36.5     21.5      0.1

    1 2
     3.5     -4.5      0.5      7.4
     3.5     -4.5      8.5      7.4

    1 2
     3.5     -4.5      8.5      7.4
     3.5     -4.5     11.5      7.4

    2 6
     3.5     -4.5     11.5      7.4
     8.5       -4       11      2.4
    11.5       -3     10.5      1.8
      15       -2       11      1.6
    18.5     -0.5     13.5      1.6
    19.5     -0.5     13.5      1.1

    2 5
    19.5     -0.5     13.5      1.1
      23     -2.5     12.5      0.1
      25       -1       13      0.1
    28.5     -1.5     13.5      0.1
      31     -1.5     15.5      0.1

    1 2
    19.5     -0.5     13.5      1.1
    19.5     -0.5       12      0.8

    1 4
    19.5     -0.5       12      0.8
    19.5      1.5       12      0.1
      21      4.5       12      0.1
      22      5.5       12      0.1

    3 9
    19.5     -0.5       12      0.8
      22      0.5     12.5        1
      25      1.5       14        1
      27        2     13.5        1
    29.5        3     14.5      0.7
      33      3.5       15      0.7
    35.5        4     14.5      0.7
    37.5      4.5       15      0.7
    39.5      5.5       16      0.7

    1 4
    39.5      5.5       16      0.7
    39.5      7.5       16      0.1
      40      9.5       16      0.1
    43.5     11.5     16.5      0.1

    2 6
    39.5      5.5       16      0.7
      42      4.5     14.5      0.7
    45.5      4.5       16      0.7
    49.5        4       16      0.7
      52        4       16      0.7
      56        4     16.5      0.7

    4 8
      56        4     16.5      0.7
      59      1.5     15.5      0.1
    61.5       -1       15      0.1
    65.5       -4       15      0.1
      70       -8       17      0.1
      76     -9.5       17      0.1
    82.5     -8.5       17      0.1
      86     -7.5       16      0.1

    2 5
      56        4     16.5      0.7
    58.5        5     15.5      0.7
    62.5        5       15      0.7
      67      6.5     14.5      0.7
      70        7       15      0.7

    3 7
      70        7       15      0.7
      74      6.5       14      0.4
      77      4.5       14      0.4
      83      2.5       13      0.4
    86.5        1       13      0.1
      92      1.5     11.5      0.1
      97      2.5       10      0.1

    4 8
      70        7       15      0.7
      75      7.5       15      0.1
      79        8     16.5      0.1
    84.5      9.5     16.5      0.1
      86     11.5       18      0.1
      90       13       19      0.1
      94     14.5     20.5      0.1
    97.5     16.5     19.5      0.1

    4 14
     3.5     -4.5     11.5      7.4
     3.5       -7     10.5      1.4
       4       -8     13.5      1.4
       5       -7       14      0.9
       7     -6.5     13.5      0.9
     8.5       -8       13      0.9
       9     -8.5       12      0.9
    11.5     -9.5     10.5      0.7
    13.5       -9       11      0.4
    16.5    -10.5       10      0.4
      18     -9.5       11      0.4
      21    -10.5     10.5      0.2
      24    -10.5     12.5      0.2
    24.5    -10.5       12      0.2

    2 5
    24.5    -10.5       12      0.2
    24.5    -13.5       10      0.1
    27.5      -15       10      0.1
    31.5      -18      9.5      0.1
    33.5    -20.5      8.5      0.1

    2 6
    24.5    -10.5       12      0.2
      28       -9       12      0.1
    30.5       -9     13.5      0.1
    32.5     -9.5       12      0.1
      35      -10       16      0.1
    39.5     -8.5     18.5      0.1

    2 5
     3.5     -4.5      8.5      7.4
       0       -6     10.5      1.1
      -2       -7      9.5      1.1
      -4     -8.5        9      1.1
    -4.5    -10.5     10.5      1.8

    5 14
    -4.5    -10.5     10.5      1.8
    -3.5    -12.5     10.5      0.8
    -4.5    -14.5     11.5      0.8
      -6      -16       11      0.4
      -7    -17.5       12      0.4
      -6    -19.5       12      0.8
    -6.5      -22        9      0.4
    -4.5    -23.5       11      0.4
      -2    -25.5     10.5      0.1
     3.5      -28       14      0.1
     7.5    -31.5       13      0.1
    10.5      -32     11.5      0.1
    12.5      -31        8      0.1
    17.5    -30.5       11      0.1

    3 9
    -4.5    -10.5     10.5      1.8
    -6.5      -10     12.5      0.8
      -8      -11       14      0.6
   -11.5      -14       13      0.4
   -13.5    -16.5       14      0.1
     -16    -19.5       14      0.1
     -18      -21       16      0.1
     -19      -23       20      0.1
     -20      -24     19.5      0.1


CONNECTIONS:
        0    1
        1    1
        1    1
        0    1
        4    1
        5    1
        5    1
        4    1
        8    1
        8    1


        0    1
        1    1
        1    1
        0    1
        4    1
        4    1
        6    1
        6    1
        8    1
        9    1
        9    1
        8    1
       12    1
       12    1
       14    1
       14    1
       16    1
       16    1
       18    1
       18    1

        0    1
        1    1
        2    1
        2    1
        4    1
        4    1
        6    1
        6    1
        8    1
        8    1
       10    1
       10    1
        1    1
       13    1
       13    1
        0    1
       16    1
       16    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")
}