/*----------------------------------------------------------------
%W%  %G%
ctt2249c.asc  translated Mon Dec 16 17:00:29 1996 by ntscable 2.0
source file syntax: Eutectic
output file syntax: CABLE
soma: diameter = 13.7844 um  length = 23.0998 um  area = 1000.34 um2
      14 three-D points; 16 outline points numbered 1-16
      outline diameter = 19.5156 um
4 primary neurites
19 branches totaling 784.578 um in length, 1166.97 um2 in area
216 tree points translated to 95 segments (1 requested)
Neurites divided into segments of equal dx between adjacent digitized
branch points.
Segment length constrained to be < 10 um.
No. points    232
No. trees       5
Text  T02249CO, HRP and silver, 3/7/89                                                                                        

----------------------------------------------------------------*/
					/* create sections */
create    soma,\
          dend1[11],\
          dend2[1],\
          dend3[9],\
          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,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,8 {
        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,10 {
        dend1[fscan()] connect dend1[i] (0), fscan()
    }

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

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

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

}

geometry()


SOMA COORDINATES AND DIAMETERS:

    14
    -9.5       -1      1.5        0
      -9  0.33333   1.4167   5.3359
      -8   -0.125     1.25   9.7628
      -7   -0.125     1.25   13.259
      -6 -0.64286     1.25   15.722
    -3.5  -0.0625   0.9375    18.16
      -2  0.28571     0.75   19.629
       0      1.2     0.75   20.655
       3      0.9      0.6   18.838
       5   1.1667  0.66667    16.68
       6   1.2143     0.75   15.437
     8.5     2.25     0.75   10.512
      10     1.75      0.5      3.5
      10        0      0.5        0


NEURITE COORDINATES AND DIAMETERS:

    1 4
     8.5        8        0      1.9
      10       10        0      1.6
    12.5     12.5        0      1.6
      16     13.5        1      2.1

    1 3
      16     13.5        1      2.1
      19     15.5      2.5      1.1
    20.5     15.5      2.5      1.1

    2 6
    20.5     15.5      2.5      1.1
      23     17.5      2.5      0.1
    26.5     20.5        2      0.1
      30       24        2      0.1
    31.5       28        2      0.1
    31.5       28        2      0.1

    5 16
    20.5     15.5      2.5      1.1
      22     13.5        4      1.1
    23.5     11.5      4.5      1.1
      25     10.5      5.5      1.1
    28.5       11      5.5      0.8
      31       12      5.5      0.8
      33       14      4.5      0.8
      36       15      2.5      0.8
    40.5       15      1.5      0.8
    41.5     16.5      1.5      0.6
      43       20      2.5      0.6
    45.5       23      1.5      0.5
    46.5     26.5      2.5      0.5
      49       29        2      0.5
    50.5       32      0.5      0.5
    50.5       32      0.5      0.1

    3 8
    50.5       32      0.5      0.1
    54.5     33.5     -0.5      0.1
    58.5     33.5      0.5      0.1
    61.5     31.5      0.5      0.1
      65     32.5        1      0.1
      69     36.5      2.5      0.1
    73.5     39.5      2.5      0.1
    73.5     39.5      2.5      0.1

    1 3
    50.5       32      0.5      0.1
      50       35       -1      0.3
      51       38        0      0.3

    3 6
      51       38        0      0.3
      49     40.5        0      0.1
    50.5       45        2      0.1
    51.5     51.5        2      0.1
    49.5       57      2.5      0.1
      49       63        2      0.1

    4 10
      51       38        0      0.3
      54     39.5     -0.5      0.2
    56.5       43      1.5      0.2
    58.5     46.5      0.5      0.2
    58.5       50      0.5      0.2
      58       55        1      0.2
      59       59      2.5      0.2
      61     62.5      1.5      0.2
      63       66      1.5      0.2
      63       66      1.5      0.2

    2 6
      16     13.5        1      2.1
    17.5      9.5        0      0.1
      19      9.5     -0.5      0.1
      21        6     -0.5      0.1
      23      6.5     -0.5      0.1
    26.5        5     -1.5      0.6

    2 4
    26.5        5     -1.5      0.6
    29.5        7     -1.5      0.1
    33.5      9.5     -1.5      0.1
      36     10.5     -1.5      0.1

    4 10
    26.5        5     -1.5      0.6
      29        4       -2      0.2
    33.5      1.5       -2      0.2
    37.5      1.5     -2.5      0.2
      41      0.5     -2.5      0.2
    44.5      0.5      0.5      0.2
      50      1.5        0      0.2
      57      2.5     -0.5      0.2
    62.5        4     -0.5      0.2
    62.5        4     -0.5      0.2

    7 19
       9     -1.5      0.5        2
      11     -2.5       -2        2
    13.5     -2.5       -5      1.5
      17      0.5     -6.5      1.5
      19        2     -9.5      0.9
    21.5      3.5       -9      0.7
    24.5        6       -9      0.4
    26.5      7.5     -8.5      0.3
      28      8.5     -8.5      0.2
    28.5        7     -8.5      0.2
    30.5      8.5     -8.5      0.1
    31.5     10.5     -8.5      0.1
    37.5       13     -8.5      0.1
    39.5     14.5     -9.5      0.1
    41.5       15       -9      0.1
    43.5     16.5       -9      0.1
      48       21      -10      0.1
      52       24       -9      0.1
      54     24.5       -8      0.1

    1 3
     -10     -1.5        0      3.1
   -13.5       -3        0      1.9
   -16.5       -5        0      1.9

    1 2
   -16.5       -5        0      1.9
   -18.5    -11.5        0      0.1

    5 9
   -18.5    -11.5        0      0.1
     -21      -15       -1      0.1
     -24      -20       -1      0.1
   -27.5      -24     -0.5      0.1
     -32    -26.5      0.5      0.1
   -39.5    -31.5      1.5      0.1
   -48.5    -34.5        2      0.1
     -56    -36.5      2.5      0.1
     -56    -36.5      2.5      0.1

    2 5
   -18.5    -11.5        0      0.1
   -17.5      -14     -1.5      0.1
   -16.5      -19     -0.5      0.1
   -17.5      -24      5.5      0.1
     -18      -27        4      0.1

    3 7
   -16.5       -5        0      1.9
   -19.5     -3.5       -2      1.9
   -22.5       -2       -1      1.9
   -24.5       -2       -1      1.9
     -27      0.5     -0.5      1.9
     -32       -1       -2      1.7
     -36     -1.5       -2      1.7

    1 3
     -36     -1.5       -2      1.7
   -37.5     -4.5     -1.5      0.1
     -39     -6.5        2      0.1

    1 4
     -39     -6.5        2      0.1
   -42.5       -6        2      0.1
   -48.5     -5.5      2.5      0.1
   -48.5     -5.5      2.5      0.1

    2 4
     -39     -6.5        2      0.1
     -38    -10.5        2      0.1
     -40      -14        2      0.1
   -40.5      -16        2      0.1

    8 23
     -36     -1.5       -2      1.7
   -37.5      0.5     -3.5      0.8
     -39        1     -3.5      0.8
     -40      4.5       -2      0.8
     -43        5       -3      0.8
   -46.5      5.5       -2      0.8
     -49      7.5     -1.5      0.8
     -52        8     -1.5      0.6
     -55      9.5       -1      0.6
     -55       13      1.5      0.6
   -56.5       14        0      0.6
     -60     13.5     -0.5      0.6
     -62     13.5     -0.5      0.6
   -63.5       17     -0.5      0.6
   -67.5       17        0      0.6
     -71       17        0      0.4
     -73       17        0      0.4
     -73     19.5     -1.5      0.3
     -75       21     -1.5      0.3
     -78     18.5     -1.5      0.3
   -80.5       18     -1.5      0.3
     -80     22.5     -2.5      0.3
   -83.5       27      0.5      0.1

    1 5
      -4        9        0      3.7
      -5     10.5        0      3.7
      -6       13     -0.5      2.2
    -7.5     15.5        1      3.1
    -8.5     16.5        1      2.5

    3 6
    -8.5     16.5        1      2.5
    -6.5       21        1      0.1
    -2.5       24        1      0.1
       1       31      1.5      0.1
     1.5     37.5      1.5      0.1
     1.5     37.5      1.5      0.1

    1 4
    -8.5     16.5        1      2.5
   -10.5       16        1      1.5
   -12.5     16.5       -1      1.5
     -14       18       -1      2.2

    3 8
     -14       18       -1      2.2
     -14       21       -1      1.2
     -15       25     -0.5      0.8
   -14.5     29.5     -0.5      0.8
   -15.5     31.5     -0.5      0.5
     -14     35.5        0      1.3
   -14.5       37     -0.5      1.1
   -13.5       41       -1        1

    3 6
   -13.5       41       -1        1
   -15.5       44       -1      0.1
     -20     43.5       -1      0.1
     -24       47     -2.5      0.1
   -26.5       51       -2      0.1
     -29       53       -2      0.1

    1 2
   -13.5       41       -1        1
   -11.5       42        0      0.1

    4 9
   -11.5       42        0      0.1
    -9.5     46.5      0.5      0.1
      -9     50.5      0.5      0.1
    -9.5       56        1      0.1
    -9.5     60.5        1      0.1
   -11.5     66.5        2      0.1
     -12       72        2      0.1
   -10.5       78      2.5      0.1
   -10.5       78      2.5      0.1

    5 9
   -11.5       42        0      0.1
    -7.5     43.5        0      0.1
    -3.5     45.5        0      0.1
    -0.5     47.5        0      0.1
     2.5     50.5        0      0.1
       7       56     -0.5      0.1
     8.5       62     -0.5      0.1
     8.5       69     -0.5      0.1
     9.5       74     -0.5      0.1

    4 14
     -14       18       -1      2.2
   -16.5     16.5      0.5      0.8
     -19       16        0      0.8
     -21       18        0      1.9
   -22.5       20      0.5      1.3
     -24     21.5        0        1
   -23.5       24      1.5      0.7
   -24.5     25.5      1.5      0.7
   -26.5     25.5      1.5      0.5
   -28.5     25.5     -0.5      0.5
   -31.5       28      1.5      0.5
     -35     27.5      1.5      0.5
     -35       30        2      0.5
   -35.5       30        0      0.5

    3 8
   -35.5       30        0      0.5
   -34.5     32.5     -0.5      0.1
   -34.5     36.5     -0.5      0.1
   -34.5       41     -0.5      0.1
     -34     44.5     -0.5      0.1
     -34     48.5     -0.5      0.1
   -34.5     50.5     -0.5      0.1
   -34.5     50.5     -0.5      0.1

    2 8
   -35.5       30        0      0.5
     -38     29.5       -1      0.1
   -38.5     31.5       -1      0.1
   -39.5     31.5       -2      0.1
   -39.5     33.5       -2      0.1
   -41.5     34.5       -2      0.1
   -44.5       35      0.5      0.1
     -45       35        2      0.1

    2 6
     -45       35        2      0.1
   -45.5     37.5      0.5      0.1
   -46.5     44.5      0.5      0.1
     -45     47.5      0.5      0.1
   -44.5       52      0.5      0.1
   -44.5       52      0.5      0.1

    3 6
     -45       35        2      0.1
     -49       38      1.5      0.1
   -53.5       40      1.5      0.1
   -56.5       43      1.5      0.1
     -62       43      1.5      0.1
   -65.5       43      1.5      0.1


CONNECTIONS:
        0    1
        1    1
        1    1
        3    1
        3    1
        5    1
        5    1
        0    1
        8    1
        8    1


        0    1
        1    1
        1    1
        0    1
        4    1
        5    1
        5    1
        4    1

        0    1
        0    1
        2    1
        3    1
        3    1
        5    1
        5    1
        2    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")
}