/*----------------------------------------------------------------
%W%  %G%
ctty118c.asc  translated Tue Dec 17 10:28:19 1996 by ntscable 2.0
source file syntax: Eutectic
output file syntax: CABLE
soma: diameter = 11.6739 um  length = 26.4317 um  area = 969.375 um2
      15 three-D points; 17 outline points numbered 1-17
      outline diameter = 18.5369 um
4 primary neurites
33 branches totaling 1445.65 um in length, 1884.55 um2 in area
469 tree points translated to 180 segments (1 requested)
Neurites divided into segments of equal dx between adjacent digitized
branch points.
Segment length constrained to be < 10 um.
No. points    486
No. trees       5
Text  T11118CO, HRP and DAB, good stain, 2/2/89                                                                               

----------------------------------------------------------------*/
					/* create sections */
create    soma,\
          dend1[3],\
          dend2[9],\
          dend3[3],\
          dend4[47]



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

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

    for i = 0,46 {
        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,8 {
        dend2[fscan()] connect dend2[i] (0), fscan()
    }

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

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

}

geometry()


SOMA COORDINATES AND DIAMETERS:

    15
     -11        3      0.5        0
    -8.5    0.375     0.25   7.7661
      -6       -1        0   13.038
      -5    -1.75        0   15.532
    -4.5   -2.125   0.0625   16.788
      -3    -1.75     0.25   17.564
      -1    -0.35     0.05    20.33
    -0.5  0.15909 -0.045455   20.711
     3.5 -0.068182  -1.1591    15.14
     4.5    -0.25   -1.375   13.502
     5.5   -0.375   -1.625   11.753
       6  -0.4375  -2.1875   10.893
     8.5    -0.25     -2.5      7.5
    10.5     0.25     -2.5      3.5
    10.5     -1.5     -2.5        0


NEURITE COORDINATES AND DIAMETERS:

    2 6
    -0.5       11       -2      0.5
    -0.5     13.5       -2      0.5
    -0.5     15.5       -1      0.3
       3       18      0.5      0.3
       5     20.5        1      0.3
     6.5     23.5        2      0.3

    1 3
     6.5     23.5        2      0.3
       9       25        3      0.3
     9.5       25        2      0.3

    3 9
     6.5     23.5        2      0.3
       5       25        2      0.3
     1.5       26      2.5      0.3
    -2.5       26      2.5      0.3
    -5.5       25      2.5      0.3
    -9.5     25.5      2.5      0.3
   -12.5       27        2      0.1
   -13.5       29        3      0.1
   -11.5     30.5        3      0.1

    1 2
    -1.5        9        7      0.5
    -2.5        9        7      0.5

    1 2
    -2.5        9        7      0.5
    -4.5        9        7      0.5

    1 3
    -4.5        9        7      0.5
    -5.5        6      6.5      0.1
      -7        6      5.5      0.1

    2 7
    -4.5        9        7      0.5
      -6     10.5      6.5      0.4
      -5       14        8      0.4
    -7.5     14.5        8      0.4
   -10.5     16.5        8      0.4
   -11.5       18        8      0.4
     -13     18.5        8      0.6

    3 10
     -13     18.5        8      0.6
     -13       20      7.5      0.3
     -13     22.5      7.5      0.3
     -14     23.5        8      0.3
   -15.5       25        8      0.3
     -15       28        8      0.3
     -15     31.5      8.5      0.3
     -15     35.5        9      0.3
     -16       39        8      0.1
     -16     39.5      8.5      0.1

    1 4
     -13     18.5        8      0.6
   -14.5     18.5        8      0.3
     -17     17.5      7.5      0.3
     -19     17.5      6.5      0.3

    1 2
     -19     17.5      6.5      0.3
     -19       19        7      0.3

    4 12
     -19     17.5      6.5      0.3
     -21     17.5        8      0.3
     -23       16      8.5      0.3
   -25.5     13.5        8      0.3
   -26.5       10      9.5      0.3
     -24      7.5        8      0.1
     -23        6        9      0.1
   -20.5      2.5        9      0.1
     -19      0.5        9      0.6
   -16.5     -1.5      9.5      0.1
   -14.5       -4     10.5      0.1
   -13.5     -6.5     11.5      0.1

    7 16
    -2.5        9        7      0.5
      -3       10      5.5      0.4
      -3       11        5      0.4
       0       13        5      0.3
       2       14      5.5      0.3
     4.5       17      4.5      0.3
      11       18        6      0.3
    17.5       19        7      0.3
      21     20.5        7      0.3
    24.5     20.5      7.5      0.3
    27.5       19        8      0.3
      35     19.5        6      0.3
      39     19.5        6      0.1
    43.5     20.5        6      0.1
    47.5       22        6      0.1
      51       23        5      0.1

    1 4
     6.5     -4.5      0.5      0.5
     8.5       -5      0.5      0.5
      11       -7        0      0.5
      13       -7        2      1.2

    2 4
      13       -7        2      1.2
      17       -7        1      0.1
      22     -4.5        1      0.1
      23       -3        1      0.1

    1 5
      13       -7        2      1.2
      15       -8        2      0.1
      18       -8        2      0.1
    20.5     -9.5      0.5      0.1
    20.5    -10.5        0      0.1

    1 5
    -4.5       -9      2.5      5.8
      -6    -12.5      2.5      4.2
      -8      -15        3      2.4
    -9.5    -15.5        3      1.8
    -9.5    -15.5        3      1.1

    4 10
    -9.5    -15.5        3      1.1
     -11      -19        2      1.1
   -12.5    -21.5      3.5      1.1
     -15      -23      3.5      1.7
   -17.5    -25.5        3      1.2
   -16.5      -29        1      1.2
   -14.5      -30      2.5      1.2
   -15.5      -32        6      1.2
   -19.5      -34       10      1.2
   -21.5      -35      9.5      1.9

    2 7
   -21.5      -35      9.5      1.9
   -24.5      -36      9.5      0.8
     -27    -36.5     10.5      0.8
   -31.5      -36     10.5      0.8
   -33.5      -38     10.5      0.8
   -34.5    -40.5      8.5      0.8
     -34    -42.5       11      0.8

    2 6
     -34    -42.5       11      0.8
   -32.5    -43.5     11.5      1.4
   -29.5      -45     10.5      0.5
   -26.5    -46.5     10.5      0.5
   -24.5    -47.5       11      0.5
   -23.5      -49       11      0.5

    3 6
   -23.5      -49       11      0.5
     -21      -50     10.5      0.1
   -18.5      -51     10.5      0.1
   -14.5    -50.5     10.5      0.1
      -7      -49     10.5      0.1
    -2.5    -47.5     10.5      0.1

    2 5
   -23.5      -49       11      0.5
     -22      -52     10.5      0.5
   -19.5    -55.5     10.5      0.5
     -16    -58.5       12      0.5
     -16    -58.5       13      0.5

    1 3
     -16    -58.5       13      0.5
   -15.5    -57.5       13      0.1
   -14.5    -57.5       13      0.1

    4 10
     -16    -58.5       13      0.5
   -14.5    -59.5       14      0.7
   -13.5    -60.5       14      0.7
   -13.5      -63       16      0.7
     -14    -65.5     17.5      0.7
   -10.5      -69     17.5      0.7
      -7    -72.5       20      0.7
      -5    -74.5       22      0.7
    -2.5      -79       19      0.6
      -2    -79.5       17      0.4

    3 13
      -2    -79.5       17      0.4
      -2    -78.5     16.5      0.4
     0.5    -82.5     17.5      0.4
     1.5      -87     17.5      0.4
     2.5      -88     17.5      0.4
       4    -88.5     17.5      0.4
       4      -87       17      0.4
       1    -87.5       17      0.4
     0.5      -88     18.5      0.4
     1.5    -92.5     18.5      0.4
     0.5      -94     18.5      0.4
    -0.5    -96.5     18.5      0.4
    -0.5    -97.5     18.5      0.3

    1 5
    -0.5    -97.5     18.5      0.3
       1    -98.5       19      0.2
     1.5     -100       19      0.2
     0.5   -100.5       19      0.2
     0.5   -100.5       19      0.2

    7 23
    -0.5    -97.5     18.5      0.3
    -0.5    -98.5     18.5      0.2
     0.5   -100.5     18.5      0.2
     0.5   -103.5       19      0.2
     1.5     -107       20      0.2
       1   -108.5       19      0.2
       0   -110.5       20      0.2
       0     -111     21.5      0.2
     0.5     -113       21      0.2
    -2.5   -112.5       22      0.2
      -3     -115     23.5      0.2
    -6.5     -115     23.5      0.2
    -6.5     -118       25      0.2
   -11.5   -119.5       26      0.2
     -16   -121.5       27      0.2
     -17   -123.5     27.5      0.2
     -18   -124.5       27      0.2
   -19.5   -123.5       27      1.4
   -19.5   -126.5       27      0.1
     -20     -129     27.5      0.1
   -20.5   -132.5     27.5      0.9
     -21   -136.5     26.5      0.1
     -21   -136.5     26.5      0.1

    3 7
      -2    -79.5       17      0.4
      -1    -81.5       13      0.4
    -0.5      -83     13.5      0.4
       2    -82.5     13.5      0.4
     2.5      -87     10.5      0.4
       3      -93     11.5      0.4
       3    -92.5     10.5      0.1

    1 3
       3    -92.5     10.5      0.1
       3      -95     10.5      0.1
     3.5    -96.5     10.5      0.1

    2 3
       3    -92.5     10.5      0.1
       4    -98.5     11.5      0.1
     5.5     -103     11.5      0.2

    4 13
     5.5     -103     11.5      0.2
       3   -102.5     12.5      0.2
       0     -101     12.5      0.2
    -2.5     -103     12.5      0.2
    -6.5     -104     12.5      0.2
     -11   -105.5     13.5      0.2
   -14.5     -108       15      0.2
   -14.5   -108.5       15      1.6
     -17     -111       15      0.1
   -19.5   -111.5       16      0.1
   -19.5     -113       16      0.1
     -21     -115     14.5      0.1
     -21   -115.5       15      0.1

    3 9
     5.5     -103     11.5      0.2
     6.5     -107       12      0.5
       8   -110.5       12      0.5
     8.5   -113.5       12      1.3
       9   -116.5       12      0.6
     9.5   -118.5       12      0.6
     9.5   -122.5       13      0.3
    11.5     -127     14.5      0.3
    11.5     -129       15      0.3

    3 8
    11.5     -129       15      0.3
      15   -124.5     15.5      0.1
      20     -120     15.5      0.1
    23.5   -122.5       15      0.1
    26.5     -124       15      0.1
      27     -128       15      0.1
      28   -130.5     15.5      0.1
      28   -130.5     15.5      0.1

    3 9
    11.5     -129       15      0.3
      12     -132     15.5      0.1
    14.5   -135.5     15.5      0.1
      16   -138.5     15.5      0.1
      17   -140.5     15.5      0.1
    15.5   -141.5     15.5      0.1
    16.5     -145     15.5      0.1
    17.5     -147       13      0.1
      19   -149.5       15      0.1

    6 16
     -34    -42.5       11      0.8
     -35    -45.5     11.5        1
     -35    -48.5     11.5        1
   -37.5    -49.5       11      0.6
     -38    -52.5     13.5      0.6
   -39.5    -56.5       14      0.6
   -37.5      -61       13      0.6
   -38.5      -63       13      0.6
   -41.5      -64     15.5      0.6
   -41.5    -66.5       16      0.6
   -37.5    -69.5     16.5      0.5
     -37    -72.5     16.5      0.5
   -37.5    -71.5     15.5      0.5
   -34.5      -72       17      0.5
     -30      -77       17      0.5
     -28      -84       17      0.4

    2 9
     -28      -84       17      0.4
     -28    -85.5     18.5      0.1
     -30    -86.5       18      0.1
     -29      -89     18.5      0.1
   -30.5      -90     20.5      0.1
     -31      -92       21      0.1
     -34    -92.5       21      0.1
   -36.5    -95.5       21      0.1
   -36.5    -96.5       21      0.1

    3 8
     -28      -84       17      0.4
   -30.5    -84.5       16      0.8
   -30.5    -88.5     16.5      0.8
     -33      -90       17      0.5
   -34.5      -95     17.5      0.5
   -35.5      -99     16.5      0.5
     -37     -104     16.5      0.4
   -37.5   -105.5     16.5      0.4

    3 5
   -37.5   -105.5     16.5      0.4
     -40     -107     16.5      0.1
     -44   -107.5       15      0.1
   -48.5     -106       15      0.1
     -57     -104     15.5      0.1

    3 8
   -37.5   -105.5     16.5      0.4
   -35.5     -106     16.5      0.2
     -36     -110     16.5      0.2
   -36.5   -113.5     16.5      0.2
   -37.5     -116     16.5      0.2
     -40   -118.5       17      0.2
     -40     -122       17      0.2
   -41.5     -124     18.5      0.2

    1 3
   -21.5      -35      9.5      1.9
     -20    -36.5      8.5      0.9
   -18.5    -37.5      8.5      0.6

    1 2
   -18.5    -37.5      8.5      0.6
   -19.5      -39      8.5      0.1

    1 3
   -18.5    -37.5      8.5      0.6
   -16.5      -38      8.5      0.6
     -16    -38.5      8.5      0.6

    1 2
     -16    -38.5      8.5      0.6
     -15    -37.5        8      0.1

    3 8
     -16    -38.5      8.5      0.6
   -14.5      -39        8      0.6
   -12.5      -40        8      0.6
     -11      -42        8      0.6
    -8.5      -45        7      0.6
    -4.5      -47      7.5      0.6
    -0.5      -50      7.5      0.6
      -1      -50        8      0.6

    8 26
      -1      -50        8      0.6
      -1      -51        9      0.4
    -1.5      -51       10      0.4
     0.5    -52.5       11      0.4
     2.5    -54.5     10.5      0.4
       2    -57.5       12      0.4
       4    -58.5     13.5      0.3
       2      -61     15.5      0.3
     2.5      -62       16      0.3
       5    -62.5       17      0.3
     4.5      -65       17      0.2
       3      -67     17.5      0.2
       5    -69.5     18.5      0.2
       9      -72     19.5      0.2
       8    -74.5     20.5      0.2
     7.5    -80.5       21      0.2
       9    -82.5     21.5      0.2
     9.5    -86.5     21.5      0.2
     9.5    -88.5     21.5      0.2
       8      -89     21.5      0.2
     9.5      -93       22      0.2
     9.5    -95.5       21      0.2
      11    -96.5     21.5      0.2
     9.5    -98.5     21.5      0.2
      11     -102     20.5      0.2
    10.5     -106     20.5      0.2

    1 3
    10.5     -106     20.5      0.2
      12     -110       20      0.2
      12   -112.5       19      0.1

    4 15
    10.5     -106     20.5      0.2
     8.5     -106       19      0.2
     5.5     -107       19      0.2
     4.5     -110       20      0.2
       3     -114       19      0.2
       4   -117.5     18.5      0.2
     2.5     -120       18      0.2
       1   -119.5       16      0.2
     0.5   -121.5     15.5      0.2
    -0.5     -123     15.5      0.2
     0.5   -123.5     15.5      0.2
       1     -125     15.5      0.2
     3.5   -125.5       16      0.2
     3.5   -128.5       16      0.2
     3.5   -128.5       16      0.2

    1 3
      -1      -50        8      0.6
     1.5      -52        7      0.4
     1.5    -52.5      6.5      0.4

    1 2
     1.5    -52.5      6.5      0.4
       2      -51        7      0.1

    6 15
     1.5    -52.5      6.5      0.4
     3.5      -54      6.5      0.4
       5    -56.5        7      0.4
     5.5    -57.5        7      0.4
     9.5    -58.5      6.5      0.4
      10    -59.5        7      0.4
    13.5    -62.5        9      0.4
      16      -64        9      0.4
      20      -71        9      0.4
    23.5    -70.5     10.5      0.4
      23    -72.5       11      0.4
    22.5    -75.5       12      0.4
    24.5      -79     13.5      0.4
      26    -81.5     14.5      0.4
      26    -87.5     14.5      0.3

    3 12
      26    -87.5     14.5      0.3
      24      -89       14      0.1
    22.5      -91     14.5      0.1
      21      -93       15      0.1
      18      -94       15      0.1
      16      -95       15      0.1
      15    -95.5       15      0.1
      14      -97       15      0.1
    11.5      -98       15      0.1
       7    -99.5       15      0.1
       7   -100.5     14.5      0.1
       7   -100.5     14.5      0.1

    1 2
      26    -87.5     14.5      0.3
      27    -91.5       13      0.4

    1 3
      27    -91.5       13      0.4
      26    -92.5       13      0.1
    27.5    -94.5       13      0.1

    8 21
      27    -91.5       13      0.4
      27      -93       13      0.3
    26.5    -96.5     12.5      0.3
      26   -101.5       12      0.3
    22.5   -102.5     13.5      0.3
    23.5     -106       15      0.3
      27     -111       16      0.3
      29   -114.5       15      0.3
      29     -116       15      0.3
    31.5   -116.5     15.5      0.3
    36.5     -121     14.5      1.5
    42.5     -120       15      0.3
    45.5   -119.5       15      0.3
      51     -118     14.5      1.2
      53   -117.5       14      0.3
      54     -118       14      0.3
      55   -113.5       14      0.3
      57   -111.5     13.5      0.3
      60   -109.5       13      0.3
    63.5     -110     13.5      0.3
    68.5     -109       12      0.8

    5 15
    -9.5    -15.5        3      1.1
      -9      -10        0      0.5
     -11     -8.5        2      0.5
     -15     -7.5        4      0.5
     -17     -8.5        4      0.5
   -19.5     -8.5      5.5      0.5
   -21.5     -8.5        4      0.5
   -20.5     -7.5      3.5      0.5
   -20.5     -8.5        3      0.5
     -22      -10      1.5      0.5
     -24      -11        3      0.5
   -25.5     -7.5      6.5      0.5
     -29     -4.5        7      0.8
   -31.5       -5      7.5      0.8
     -33       -6      7.5      0.8

    2 5
     -33       -6      7.5      0.8
     -34       -9        7      0.5
     -33    -11.5      7.5      0.5
     -32    -15.5      7.5      0.5
     -32      -20      7.5      0.5

    5 16
     -32      -20      7.5      0.5
   -30.5    -21.5      7.5      0.3
     -29    -24.5        8      0.3
     -28      -27        8      0.3
   -27.5    -30.5       10      0.3
   -26.5    -32.5       10      0.3
     -25      -34       10      0.3
   -23.5    -38.5       10      0.3
   -22.5      -42     12.5      0.3
   -21.5    -45.5     11.5      0.3
   -20.5    -47.5     11.5      0.3
     -19    -48.5     11.5      0.3
     -17      -53     11.5      0.3
     -15      -56     10.5      0.3
     -11    -57.5     10.5      0.3
    -8.5      -58      9.5      0.3

    6 18
     -32      -20      7.5      0.5
   -32.5    -21.5        9      0.7
     -34      -23       11      0.7
   -37.5      -23       11      0.6
     -40      -25     11.5      0.6
     -42      -28     12.5      0.6
     -44      -28       14      0.6
   -47.5      -25       14      0.5
   -48.5      -24       14      0.5
   -52.5    -24.5       15      0.5
     -56      -26     14.5      0.5
   -56.5      -27     14.5      0.4
   -57.5      -27       15      0.4
     -62    -28.5     13.5      0.4
     -67    -31.5     13.5      0.4
   -67.5    -32.5     10.5      0.5
   -68.5      -35     10.5      0.7
     -69      -37     11.5      0.7

    4 13
     -69      -37     11.5      0.7
   -67.5    -39.5       12      0.2
   -66.5    -41.5       12      0.2
   -64.5    -43.5       12      0.2
     -64    -46.5       12      0.2
     -64    -49.5     12.5      0.2
     -64      -52     12.5      0.1
   -64.5    -55.5       13      0.1
     -64      -58       13      0.1
   -64.5      -63       13      0.1
     -63    -66.5       13      0.1
     -65    -70.5     14.5      0.1
     -65    -70.5     14.5      0.1

    4 15
     -69      -37     11.5      0.7
   -70.5    -36.5     11.5      0.5
   -72.5      -35     11.5      0.5
   -74.5      -33       11      0.4
   -76.5      -32       11      0.4
   -80.5    -31.5     11.5      0.3
   -85.5      -29     12.5      0.3
     -87      -29     12.5      0.3
     -87      -27     11.5      0.3
     -86      -27       12      0.3
     -86    -28.5     12.5      0.3
   -90.5    -29.5       15      0.3
     -94    -30.5       15      0.2
   -95.5      -32       15      0.2
   -96.5    -30.5     15.5      0.9

    2 7
     -33       -6      7.5      0.8
   -35.5       -6        7      0.8
     -38       -4        8      0.8
     -42     -2.5        9      0.8
   -44.5     -2.5      9.5      0.8
     -48       -4      9.5      0.8
   -48.5     -4.5      9.5      0.8

    10 27
   -48.5     -4.5      9.5      0.8
     -48     -7.5     10.5      0.5
   -48.5      -11      9.5      0.5
     -50      -13      9.5      0.5
   -52.5      -15       10      0.5
     -52      -17        9      0.5
   -50.5    -20.5        9      0.5
     -48    -22.5      9.5      0.5
     -47      -25        9      0.5
     -42      -30      9.5      0.5
     -40    -35.5     11.5      0.5
     -38      -38       11      0.5
     -37    -39.5       11      1.8
   -35.5    -43.5     10.5      0.4
     -32    -47.5       10      0.4
     -29      -51     11.5      0.4
   -27.5      -55     11.5      0.4
   -25.5      -60     11.5      0.4
   -25.5    -61.5     11.5      0.4
     -27      -61       12      0.4
   -24.5    -62.5     11.5      0.2
     -23    -65.5     11.5      0.2
   -23.5    -66.5     11.5      0.2
   -21.5    -67.5       11      0.2
   -19.5    -69.5       11      0.2
   -15.5      -74     11.5      0.2
   -13.5    -76.5       15      0.2

    3 11
   -48.5     -4.5      9.5      0.8
     -49     -3.5     10.5      0.7
   -50.5     -2.5       10      0.7
   -53.5       -3       10      0.5
   -56.5       -2       10      0.5
   -57.5     -1.5     10.5      0.1
   -58.5       -1     10.5      0.6
   -61.5     -0.5      8.5      0.4
     -65      1.5        9      0.4
   -68.5        4      8.5      0.4
   -69.5        4      8.5      0.4


CONNECTIONS:
        0    1
        0    1

        0    1
        1    1
        1    1
        3    1
        3    1
        5    1
        5    1
        0    1

        0    1
        0    1

        0    1
        1    1
        2    1
        3    1
        3    1
        5    1
        5    1
        7    1
        8    1
        8    1
        7    1
       11    1
       11    1
       13    1
       13    1
       15    1
       15    1
        2    1
       18    1
       18    1
       20    1
       20    1
        1    1
       23    1
       23    1
       25    1
       25    1
       27    1
       28    1
       28    1
       27    1
       31    1
       31    1
       33    1
       33    1
       35    1
       35    1
        0    1
       38    1
       39    1
       39    1
       41    1
       41    1
       38    1
       44    1
       44    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")
}