Nonlinear dendritic processing in barrel cortex spiny stellate neurons (Lavzin et al. 2012)

 Download zip file   Auto-launch 
Help downloading and running models
Accession:146565
This is a multi-compartmental simulation of a spiny stellate neuron which is stimulated by a thalamocortical (TC) and cortico-cortical (CC) inputs. No other cells are explicitly modeled; the presynaptic network activation is represented by the number of active synapses. Preferred and non –preferred thalamic directions thus correspond to larder/smaller number of TC synapses. This simulation revealed that randomly activated synapses can cooperatively trigger global NMDA spikes, which involve participation of most of the dendritic tree. Surprisingly, we found that although the voltage profile of the cell was uniform, the calcium influx was restricted to ‘hot spots’ which correspond to synaptic clusters or large conductance synapses
Reference:
1 . Lavzin M, Rapoport S, Polsky A, Garion L, Schiller J (2012) Nonlinear dendritic processing determines angular tuning of barrel cortex neurons in vivo. Nature 490:397-401 [PubMed]
Model Information (Click on a link to find other models with that property)
Model Type: Realistic Network; Neuron or other electrically excitable cell; Synapse; Dendrite;
Brain Region(s)/Organism:
Cell Type(s): Neocortex spiny stellate cell;
Channel(s): I Sodium; I Potassium; Ca pump;
Gap Junctions:
Receptor(s): GabaA; AMPA; NMDA;
Gene(s):
Transmitter(s): Gaba; Glutamate;
Simulation Environment: NEURON;
Model Concept(s): Active Dendrites; Detailed Neuronal Models; Synaptic Integration; Calcium dynamics; Direction Selectivity; Whisking;
Implementer(s): Polsky, Alon [alonpol at tx.technion.ac.il];
Search NeuronDB for information about:  GabaA; AMPA; NMDA; I Sodium; I Potassium; Ca pump; Gaba; Glutamate;
begintemplate l4
public apcounter,apvec,FSsyn,FSsynnetcon
public all,dends,segdends,ccsyn,tcsyn,ccnetcon,tcnetcon,soma,fire ,Isyn,Inetcon
objref all,dends,segdends,ccsyn,tcsyn,ccnetcon,tcnetcon,fire,Isyn,Inetcon//,nil
objref apcounter,apvec,nil,FSsyn,FSsynnetcon
public        a1_1,a1_11 ,a1_112,a1_12, a1_121,a1_1211 ,a2_1,a2_11,a2_111,a2_1222,a2_1221,a2_122,a2_121,a2_12
public        a1_1212 ,a1_122,a1_1221,a1_1222 ,a2_112,a2_1121,a2_11211,a2_11212,a2_1122,a2_11221, a2_11222

public a3_1,a3_11,a3_111,a3_1111,a3_1112 ,a3_11121,a3_11122 ,a3_111221 ,a3_111222 ,a3_1112221,a3_1112222 ,a3_112  ,  a3_1121 , a3_1122 , a3_12  ,  a3_121 ,  a3_122 ,  a3_1221 ,  a3_1222 , a4_1   ,  a4_11  ,  a4_111 ,  a4_112 , a4_12  , a5_1  , a5_11 , a5_111, a5_1111 , a5_11111 ,a5_11112 ,a5_1112 , a5_11121 ,a5_11122 ,a5_111221 ,  a5_111222  ,a5_112    ,  a5_1121   ,  a5_11211   , a5_11212   , a5_112121  ,   a5_112122 , a5_1122 ,a5_12   ,a5_121  , a5_1211 ,a5_1212 ,a5_122 ,a6_1   ,a6_11  ,a6_111 ,a6_112  ,a6_1121 ,a6_1122 ,a6_12
// j3886d_sdt.hoc -- This file was automatically generated by
// from j3886d_sdt.txt by /home/dan/projects/neuron/tools/geometry_to_neuron on Wed 26 Mar, 97 11:31.
// DO NOT EDIT!  The file may be generated again and you'll lose your edits.
// 
// If you use this cell for publication, we would appreciate receiving a
// reprint.  Send reprints to John Anderson, Rodney Douglas, and Kevan Martin
// at
//	Institute of Neuroinformatics
//	ETH/UZ
//	Gloriastrasse 32
//	CH-8006 Zurich
//
strdef neuron_name
neuron_name = "j3886d_sdt"

create	soma
create        a1_1,a1_11 ,a1_112,a1_12, a1_121,a1_1211
create        a1_1212 ,a1_122,a1_1221,a1_1222 
create        a2_1
create        a2_11
create        a2_111
create        a2_112
create        a2_1121
create        a2_11211
create        a2_11212
create        a2_1122 
create        a2_11221
create        a2_11222
create        a2_12
create        a2_121
create        a2_122 
create        a2_1221
create        a2_1222 
create        a3_1 
create        a3_11 
create  		a3_111
create        a3_1111 
create        a3_1112 
create        a3_11121 
create        a3_11122 
create        a3_111221 
create        a3_111222 
create        a3_1112221 
create        a3_1112222 
create        a3_112
create        a3_1121
create        a3_1122 
create        a3_12
create        a3_121 
create        a3_122 
create        a3_1221
create        a3_1222 
create        a4_1
create        a4_11
create        a4_111
create        a4_112
create        a4_12 
create        a5_1 
create        a5_11
create        a5_111
create        a5_1111
create        a5_11111
create        a5_11112
create        a5_1112 
create        a5_11121
create        a5_11122
create        a5_111221
create        a5_111222
create        a5_112 
create        a5_1121
create        a5_11211 
create        a5_11212 
create        a5_112121
create        a5_112122
create        a5_1122 
create        a5_12 
create        a5_121
create        a5_1211
create        a5_1212
create        a5_122 
create        a6_1 
create        a6_11
create        a6_111 
create        a6_112 
create        a6_1121
create        a6_1122
create        a6_12 


proc m1(){
create a1_1

a1_1 {

  pt3dclear()

  pt3dadd(-7.833,-0.466,-2.159,3.75)
  pt3dadd(-10.389,-1.311,-2.419,1.75)
  pt3dadd(-14.098,-2.596,-4.331,2)

  pt3dadd(-17.158,-4.356,-6.039,1)
  pt3dadd(-21.411,-4.775,-7.574,0.75)
  pt3dadd(-23.808,-5.993,-8.906,1.5)
  pt3dadd(-26.335,-5.765,-10.76,2)
  pt3dadd(-30.327,-7.14,-13.207,2.5)
  pt3dadd(-33.897,-7.908,-15.278,1.5)
  pt3dadd(-33.931,-8.034,-14.539,1.5)

}
create a1_11

a1_11 {
  pt3dclear()

  pt3dadd(-33.931,-8.034,-14.539,1.5)
  pt3dadd(-36.627,-8.436,-17.015,1.75)

  pt3dadd(-36.345,-8.347,-20.795,0.75)
  pt3dadd(-37.631,-8.318,-23.387,1)
  pt3dadd(-38.812,-7.897,-25.4,1)
  pt3dadd(-40.538,-6.611,-31.353,1)
  pt3dadd(-43.314,-6.347,-34.481,0.75)
  pt3dadd(-43.865,-6.47,-37.319,1)
  pt3dadd(-44.835,-8.159,-42.475,1)
  pt3dadd(-45.407,-9.326,-46.761,0.5)
  pt3dadd(-46.686,-11.203,-50.439,0.75)
  pt3dadd(-47.977,-13.122,-53.871,0.75)
  pt3dadd(-49.269,-14.081,-59.678,1)
  pt3dadd(-59.204,-23.148,-96.201,1)
  pt3dadd(-59.983,-24.124,-96.91,0.5)
  pt3dadd(-58.765,-24.406,-97.156,0.5)
  pt3dadd(-60.804,-25.254,-98.155,0.5)
  pt3dadd(-59.293,-26.378,-98.532,0.5)
  pt3dadd(-61.656,-27.47,-100.603,0.5)
  pt3dadd(-60.174,-27.732,-101.341,0.5)
  pt3dadd(-58.465,-30.049,-102.673,0.5)
  pt3dadd(-55.99,-28.538,-103.065,0.5)
  pt3dadd(-54.29,-27.99,-105.686,0.5)
  pt3dadd(-53.345,-29.293,-107.134,0.5)
  pt3dadd(-50.132,-28.894,-109.712,0.5)
}
create a1_112
a1_112 {
  pt3dclear()
  pt3dadd(-54.029,-18.324,-69.757,1.75)
  pt3dadd(-55.016,-19.109,-71.205,1)
  pt3dadd(-56.677,-20.479,-72.784,0.5)
  pt3dadd(-57.638,-23.1,-74.289,0.5)
  pt3dadd(-59.137,-26.762,-76.505,0.5)
  pt3dadd(-62.121,-31.135,-78.401,0.5)
  pt3dadd(-63.437,-33.151,-79.82,0.5)
  pt3dadd(-63.182,-37.028,-81.992,1)
  pt3dadd(-64.306,-39.291,-85.221,0.5)
  pt3dadd(-64.898,-41.502,-86.64,0.5)
  pt3dadd(-64.778,-43.948,-87.813,0.5)
  pt3dadd(-66.566,-45.793,-89.478,0.5)
  pt3dadd(-67.175,-47.1,-91.505,0.5)
  pt3dadd(-68.724,-49.983,-93.59,0.5)
  pt3dadd(-68.994,-50.991,-96.312,1)
  pt3dadd(-69.978,-53.696,-97.326,0.5)
  pt3dadd(-70.68,-55.352,-100.179,0.5)
  pt3dadd(-71.664,-58.057,-101.192,0.5)
}
//a1_11 connect a1_111(0),1
a1_11 connect a1_112(0),1
create a1_12
a1_12 {
  pt3dclear()
  pt3dadd(-33.931,-8.034,-14.539,1.5)
  pt3dadd(-35.281,-8.242,-17.175,1.5)
  pt3dadd(-38.153,-9.302,-17.232,1)
  pt3dadd(-40.417,-10.989,-17.623,1.5)
  pt3dadd(-41.896,-10.713,-18.405,1)
  pt3dadd(-44.377,-11.278,-18.868,2)
}
create a1_121
a1_121 {
  pt3dclear()
  pt3dadd(-44.377,-11.278,-18.868,2)
  pt3dadd(-44.01,-11.841,-19.201,1.5)
  pt3dadd(-45.768,-13.574,-20.084,1.5)
  pt3dadd(-48.301,-14.334,-20.837,1.5)
  pt3dadd(-48.614,-14.535,-22.155,2)
}
create a1_1211
a1_1211 {
  pt3dclear()
  pt3dadd(-48.614,-14.535,-22.155,2)
  pt3dadd(-49.339,-14.341,-22.155,0.5)
  pt3dadd(-52.008,-14.646,-22.329,0.5)
  pt3dadd(-52.943,-15.235,-23.487,1)
  pt3dadd(-56.064,-16.258,-24.819,0.5)
  pt3dadd(-58.633,-18.118,-25.254,0.5)
  pt3dadd(-61.837,-19.449,-27.657,1)
  pt3dadd(-63.722,-21.658,-28.627,0.5)
  pt3dadd(-66.477,-23.244,-30.292,0.75)
  pt3dadd(-68.115,-24.53,-32.363,0.5)
  pt3dadd(-70.001,-26.738,-33.333,0.5)
  pt3dadd(-71.79,-28.583,-34.998,0.5)
  pt3dadd(-73.271,-29.281,-36.2,0.5)
  pt3dadd(-75.077,-29.262,-36.533,0.5)
  pt3dadd(-76.087,-30.131,-37.489,0.5)
  pt3dadd(-78.616,-30.878,-39.762,0.5)
  pt3dadd(-80.775,-32.173,-39.574,0.5)
  pt3dadd(-82.071,-33.145,-39.545,0.5)
  pt3dadd(-84.625,-34.95,-41.745,0.5)
  pt3dadd(-86.6,-35.561,-42.701,1)
  pt3dadd(-90.326,-35.942,-45.221,0.5)
  pt3dadd(-94.564,-34.372,-46.162,0.5)
  pt3dadd(-96.674,-33.552,-46.119,1)
  pt3dadd(-99.607,-31.941,-47.755,0.5)
  pt3dadd(-102.198,-31.952,-49.652,1)
  pt3dadd(-104.372,-33.304,-52.013,0.5)
  pt3dadd(-106.905,-34.065,-52.766,0.5)
  pt3dadd(-110.861,-34.339,-55.532,0.25)
  pt3dadd(-110.921,-34.563,-57.096,1)
  pt3dadd(-114.936,-33.128,-59.065,0.5)
  pt3dadd(-117.211,-32.924,-61.165,1)
  pt3dadd(-119.418,-32.468,-64.742,1)
  pt3dadd(-120.534,-34.702,-66.697,0.5)
  pt3dadd(-123.448,-37.85,-69.651,0.5)
  pt3dadd(-125.54,-38.894,-70.939,0.5)
  pt3dadd(-127.729,-40.303,-75.849,0.5)
  pt3dadd(-127.802,-41.542,-77.586,0.5)
  pt3dadd(-129.542,-41.272,-79.396,1)
  pt3dadd(-131.105,-42.277,-81.67,1)
  pt3dadd(-133.049,-38.908,-81.439,0.5)
}
create a1_1212
a1_1212 {
  pt3dclear()
  pt3dadd(-48.614,-14.535,-22.155,2)
  pt3dadd(-47.671,-14.878,-21.663,1)
  pt3dadd(-48.409,-15.7,-21.836,1)
  pt3dadd(-49.057,-18.12,-22.024,1)
  pt3dadd(-51.262,-21.518,-23.211,0.5)
  pt3dadd(-52.903,-25.711,-23.747,0.5)
  pt3dadd(-55.763,-29.622,-24.036,1)
  pt3dadd(-60.272,-32.927,-23.789,0.5)
  pt3dadd(-66.189,-37.623,-21.051,0.5)
  pt3dadd(-68.799,-41.571,-20.065,1)
  pt3dadd(-72.945,-45.453,-18.631,1)
  pt3dadd(-77.648,-50.445,-18.934,1.5)
  pt3dadd(-81.295,-57.294,-19.252,1)
  pt3dadd(-85.076,-62.713,-18.57,1)
  pt3dadd(-88.122,-70.218,-16.18,0.5)
  pt3dadd(-91.879,-76.512,-13.615,0.5)
  pt3dadd(-95.441,-82.079,-12.441,1.5)
  pt3dadd(-100.687,-87.165,-9.993,0.5)
  pt3dadd(-103.827,-90.192,-10.398,0.5)
  pt3dadd(-105.24,-93.532,-13.062,0.5)
  pt3dadd(-107.708,-96.949,-13.757,0.5)
  pt3dadd(-112.035,-100.543,-15.074,1.5)
  pt3dadd(-116.913,-104.258,-14.914,0.5)
  pt3dadd(-119.507,-107.177,-15.276,1)
  pt3dadd(-123.478,-109.441,-14.319,0.5)
  pt3dadd(-128.573,-112.034,-14.232,0.5)
  pt3dadd(-129.871,-113.98,-14.623,0.5)
}
a1_121 connect a1_1211(0),1
a1_121 connect a1_1212(0),1
create a1_122
a1_122 {
  pt3dclear()
  pt3dadd(-44.377,-11.278,-18.868,2)
  pt3dadd(-44.577,-11.059,-18.333,1)
  pt3dadd(-49.002,-10.188,-16.609,1)
  pt3dadd(-52.184,-8.54,-15.204,1)
  pt3dadd(-57.938,-6.833,-14.669,1.5)
  pt3dadd(-61.319,-3.993,-12.308,1)
  pt3dadd(-67.148,-2.566,-11.57,1)
}
create a1_1221
a1_1221 {
  pt3dclear()
  pt3dadd(-67.148,-2.566,-11.57,1)
  pt3dadd(-67.704,-1.742,-10.947,0.75)
  pt3dadd(-70.286,0.209,-9.209,0.75)
  pt3dadd(-70.55,0.19,-8.717,0.5)
  pt3dadd(-74.234,1.897,-8.341,1)
  pt3dadd(-78.114,5.77,-6.589,0.5)
  pt3dadd(-83.104,8.397,-7.892,1)
  pt3dadd(-85.696,11.281,-5.488,1)
  pt3dadd(-90.202,12.818,-4.417,0.5)
  pt3dadd(-93.496,15.98,-2.505,0.5)
  pt3dadd(-98.538,18.411,0.217,0.5)
  pt3dadd(-101.805,18.776,0.13,1)
  pt3dadd(-104.345,19.922,0.463,0.5)
  pt3dadd(-107.983,23.73,2.215,0.5)
  pt3dadd(-111.133,28.398,2.866,0.5)
  pt3dadd(-114.935,33.525,4.835,1)
  pt3dadd(-119.575,38.426,4.951,0.5)
  pt3dadd(-123.056,40.888,5.211,0.5)
  pt3dadd(-124.078,42.871,4.487,0.5)
  pt3dadd(-126.584,44.143,4.081,1)
}
create a1_1222
a1_1222 {
  pt3dclear()
  pt3dadd(-67.148,-2.566,-11.57,1)
  pt3dadd(-67.067,-3.232,-10.918,0.5)
  pt3dadd(-68.588,-5.044,-10.28,1)
  pt3dadd(-70.702,-6.172,-11.077,0.5)
  pt3dadd(-76.206,-5.462,-11.207,1)
  pt3dadd(-81.755,-4.919,-10.352,0.5)
  pt3dadd(-85.989,-3.335,-8.499,1)
  pt3dadd(-91.293,-4.777,-7.209,1)
  pt3dadd(-95.825,-5.271,-6.485,1)
  pt3dadd(-101.408,-4.855,-4.892,0.5)
  pt3dadd(-106.41,-4.204,-3.994,1.5)
  pt3dadd(-112.338,-4.115,-2.98,1)
  pt3dadd(-118.292,-5.083,-1.893,0.75)
  pt3dadd(-123.371,-5.686,-1.213,1)
  pt3dadd(-129.957,-7.085,0.28,1.5)
  pt3dadd(-136.319,-7.644,1.163,0.5)
  pt3dadd(-143.267,-9.426,-0.473,0.5)
  pt3dadd(-149.269,-8.642,1.164,0.5)
  pt3dadd(-154.722,-8.71,0.903,1)
  pt3dadd(-162.211,-9.612,2.439,1)
  pt3dadd(-163.935,-9.285,3.177,1)
  pt3dadd(-169.363,-8.295,2.844,0.5)
  pt3dadd(-172.893,-8.909,1.31,0.5)
  pt3dadd(-177.225,-9.622,1.498,1)
  pt3dadd(-181.817,-10.341,0.658,0.5)
  pt3dadd(-185.522,-9.678,-0.413,1)
}
a1_122 connect a1_1221(0),1
a1_122 connect a1_1222(0),1
a1_12 connect a1_121(0),1
a1_12 connect a1_122(0),1
a1_1 connect a1_11(0),1
a1_1 connect a1_12(0),1
create a2_1
a2_1 {
  pt3dclear()
  pt3dadd(7.664,-0.586,-1.218,3.5)
  pt3dadd(9.788,-1.35,-3.028,2.5)
  pt3dadd(11.962,-1.932,-3.028,2.5)
  pt3dadd(14.427,-3.358,-3.158,2)
  pt3dadd(17.147,-3.832,-3.115,1.5)
  pt3dadd(19.271,-4.596,-4.925,1.5)
  pt3dadd(21.215,-5.072,-5.171,1.5)
}
create a2_11
a2_11 {
  pt3dclear()
  pt3dadd(21.215,-5.072,-5.171,1.5)
  pt3dadd(22.75,-5.138,-5.62,2.25)
  pt3dadd(24.187,-5.568,-5.374,1)
  pt3dadd(25.659,-5.873,-5.867,1)
  pt3dadd(26.722,-5.768,-6.562,1.75)
  pt3dadd(29.931,-5.384,-7.619,1.5)
  pt3dadd(31.741,-5.389,-8.807,1)
  pt3dadd(33.329,-5.26,-8.966,2)
  pt3dadd(34.637,-5.206,-11.182,2)
}
create a2_111
a2_111 {
  pt3dclear()
  pt3dadd(34.637,-5.206,-11.182,2)
  pt3dadd(34.598,-4.386,-11.298,1.5)
  pt3dadd(36.062,-2.785,-15.02,1)
  pt3dadd(36.36,-2.64,-16.251,1)
  pt3dadd(40.007,-2.553,-20.639,1.5)
  pt3dadd(43.055,-7.598,-23.39,1.5)
  pt3dadd(44.051,-7.745,-26.924,0.5)
  pt3dadd(46.165,-9.513,-34.744,0.5)
  pt3dadd(49.496,-9.641,-38.93,1)
  pt3dadd(52.3,-10.768,-44.071,1)
  pt3dadd(55.876,-11.907,-51.717,0.5)
  pt3dadd(59.431,-13.13,-54.556,0.5)
  pt3dadd(64.916,-13.911,-59.769,1)
  pt3dadd(69.663,-15.513,-65.157,0.5)
  pt3dadd(71.735,-16.475,-75.888,0.5)
  pt3dadd(74.414,-15.17,-82.651,1)
  pt3dadd(75.191,-15.168,-86.677,0.5)
  pt3dadd(74.962,-16.022,-88.864,0.5)
  pt3dadd(76.667,-16.419,-90.631,1)
  pt3dadd(78.621,-16.853,-91.123,1)
  pt3dadd(79.027,-18.236,-91.34,0.5)
  pt3dadd(81.337,-19.275,-91.92,0.5)
  pt3dadd(81.863,-20.211,-93.324,0.5)
  pt3dadd(84.794,-20.861,-94.063,1)
  pt3dadd(86.91,-20.694,-95.207,1.5)
  pt3dadd(89.667,-21.028,-97.423,1.5)
  pt3dadd(92.797,-22.871,-99.117,0.5)
  pt3dadd(97.302,-24.409,-100.189,0.5)
  pt3dadd(100.956,-26.227,-101.347,0.5)
  pt3dadd(104.063,-28.155,-102.549,0.5)
  pt3dadd(106.876,-30.213,-104.041,0.5)
  pt3dadd(108.694,-30.19,-103.954,0.5)
}
create a2_112
a2_112 {
  pt3dclear()
  pt3dadd(34.637,-5.206,-11.182,2)
  pt3dadd(34.697,-4.982,-9.618,1)
  pt3dadd(35.686,-5.157,-10.11,1)
  pt3dadd(38.164,-5.566,-10.067,1.5)
  pt3dadd(40.982,-5.676,-10.719,0.75)
  pt3dadd(44.806,-5.892,-10.835,1)
  pt3dadd(47.87,-4.119,-10.647,1)
  pt3dadd(51.696,-3.36,-10.343,1.5)
  pt3dadd(53.542,-4.199,-9.894,1)
  pt3dadd(55.573,-3.379,-10.169,1.5)
}
create a2_1121
a2_1121 {
  pt3dclear()
  pt3dadd(55.573,-3.379,-10.169,1.5)
  pt3dadd(56.328,-3.461,-9.387,1)
  pt3dadd(58.237,-4.063,-8.895,1)
  pt3dadd(61.068,-5.091,-7.418,1)
  pt3dadd(65.926,-5.313,-4.695,0.5)
  pt3dadd(70.131,-5.075,-4.97,0.75)
  pt3dadd(72.792,-6.732,-4.116,1)
  pt3dadd(76.078,-7.028,-3.001,0.5)
  pt3dadd(79.11,-7.301,-1.64,1)
  pt3dadd(82.905,-9.562,-0.582,1.5)
  pt3dadd(85.488,-9.579,0.04,1.5)
  pt3dadd(87.714,-9.965,0.33,1)
  pt3dadd(90.016,-11.032,2.792,1)
  pt3dadd(92.265,-11.334,2.589,1.5)
}
create a2_11211
a2_11211 {
  pt3dclear()
  pt3dadd(92.265,-11.334,2.589,1.5)
  pt3dadd(93.369,-11.076,2.43,0.75)
  pt3dadd(95.183,-11.067,4.037,1)
  pt3dadd(98.083,-10.869,4.457,1)
  pt3dadd(99.496,-12.357,4.776,1)
  pt3dadd(102.584,-11.46,6.847,0.5)
  pt3dadd(104.446,-13.203,7.904,1)
  pt3dadd(106.628,-14.718,7.238,1)
  pt3dadd(108.055,-15.19,7.73,1)
  pt3dadd(110.935,-16.996,9.077,0.75)
  pt3dadd(114.243,-17.208,9.7,1)
  pt3dadd(117.564,-20.271,10.091,1)
  pt3dadd(118.585,-24.188,12.771,1)
  pt3dadd(118.374,-26.905,13.568,1)
  pt3dadd(119.838,-29.171,18.072,1)
  pt3dadd(122.675,-32.105,18.463,1)
  pt3dadd(125.82,-33.892,19.318,0.5)
  pt3dadd(127.569,-36.055,18.522,0.5)
  pt3dadd(129.763,-39.461,19.565,0.5)
  pt3dadd(131.276,-42.505,19.623,1)
  pt3dadd(133.396,-47.152,18.928,0.5)
  pt3dadd(136.229,-52.034,18.48,0.5)
  pt3dadd(138.927,-55.486,19.031,0.5)
  pt3dadd(141.76,-60.368,18.582,0.5)
}
create a2_11212
a2_11212 {
  pt3dclear()
  pt3dadd(92.265,-11.334,2.589,1.5)
  pt3dadd(92.098,-10.99,2.386,0.25)
}
a2_1121 connect a2_11211(0),1
a2_1121 connect a2_11212(0),1
create a2_1122
a2_1122 {
  pt3dclear()
  pt3dadd(55.573,-3.379,-10.169,1.5)
  pt3dadd(57.639,-2.433,-11.183,1.5)
  pt3dadd(58.26,-2.045,-11.343,2.25)
  pt3dadd(59.406,-1.632,-10.966,2.5)
}
}
proc m2(){
create a2_11221
a2_11221 {
  pt3dclear()
  pt3dadd(59.406,-1.632,-10.966,2.5)
  pt3dadd(61.346,-0.188,-11.647,1)
  pt3dadd(64.261,1.999,-10.634,0.5)
  pt3dadd(67.819,3.685,-10.692,0.5)
  pt3dadd(71.189,4.671,-12.401,0.5)
  pt3dadd(73.78,6.615,-12.459,0.5)
  pt3dadd(78.098,9.206,-12.836,0.5)
  pt3dadd(81.345,11.665,-13.793,0.5)
  pt3dadd(84.661,13.415,-13.851,1)
  pt3dadd(88.221,16.074,-13.489,1)
  pt3dadd(90.168,17.547,-12.896,0.5)
  pt3dadd(92.749,19.449,-12.708,0.5)
  pt3dadd(94.823,21.397,-12.028,0.5)
  pt3dadd(97.538,21.869,-12.839,0.5)
  pt3dadd(100.416,21.983,-11.927,1)
  pt3dadd(103.707,22.675,-11.912,1)
  pt3dadd(107.916,24.861,-11.348,0.5)
  pt3dadd(112.827,24.835,-8.336,1)
  pt3dadd(115.212,26.01,-6.758,0.5)
  pt3dadd(118.953,26.447,-6.005,0.5)
  pt3dadd(121.982,28.094,-5.078,0.5)
  pt3dadd(126.26,29.572,-3.616,0.5)
  pt3dadd(129.47,31.891,-2.313,1)
  pt3dadd(132.569,32.83,-0.488,0.5)
  pt3dadd(136.325,35.257,0.858,0.5)
  pt3dadd(141.163,37.859,2.537,0.5)
  pt3dadd(144.496,38.705,3.087,0.75)
  pt3dadd(149.957,38.802,4.622,1)
  pt3dadd(153.561,39.695,5.954,0.5)
  pt3dadd(156.575,39.352,6.287,0.5)
  pt3dadd(158.922,38.454,7.765,0.5)
  pt3dadd(159.345,36.167,8.156,0.5)
}

create a2_11222
a2_11222 {
  pt3dclear()
  pt3dadd(59.406,-1.632,-10.966,2.5)
  pt3dadd(60.769,-2.342,-10.517,1)
  pt3dadd(62.929,-3.941,-10.691,1)
  pt3dadd(66.837,-4.808,-11.676,1)
  pt3dadd(71.461,-4.938,-11.994,1.5)
  pt3dadd(75.056,-5.046,-12.357,0.5)
  pt3dadd(78.999,-3.854,-11.72,1)
  pt3dadd(82.607,-2.946,-11.908,0.75)
  pt3dadd(87.719,-2.218,-13.328,1)
  pt3dadd(91.988,-1.742,-13.56,1)
  pt3dadd(96.903,0.179,-14.023,0.5)
  pt3dadd(101.345,0.339,-12.778,1)
  pt3dadd(104.307,-0.2,-12.735,0.5)
  pt3dadd(110.479,0.62,-13.329,0.5)
  pt3dadd(115.233,1.94,-13.141,1)
  pt3dadd(121.357,4.512,-13.185,0.5)
  pt3dadd(124.382,4.211,-13.098,0.5)
  pt3dadd(126.661,4.02,-12.519,1.5)
  pt3dadd(130.287,4.998,-11.679,0.5)
  pt3dadd(132.6,6.867,-9.478,0.5)
  pt3dadd(136.784,7.995,-8.841,0.5)
  pt3dadd(140.655,9.882,-7.582,1)
  pt3dadd(143.769,12.811,-5.164,0.5)
  pt3dadd(145.117,13.979,-4.903,0.5)
  pt3dadd(149.696,13.682,-4.237,0.5)
  pt3dadd(152.407,14.14,-3.528,0.75)
  pt3dadd(154.963,14.985,-3.267,0.5)
  pt3dadd(159.621,16.915,-1.964,1)
  pt3dadd(163.19,18.643,-2.269,1)
  pt3dadd(167.959,21.953,-1.487,0.5)
  pt3dadd(173.194,22.169,-1.719,0.5)
  pt3dadd(175.652,22.65,-5.079,1)
}
a2_1122 connect a2_11221(0),1
a2_1122 connect a2_11222(0),1
a2_112 connect a2_1121(0),1
a2_112 connect a2_1122(0),1
a2_11 connect a2_111(0),1
a2_11 connect a2_112(0),1
create a2_12
a2_12 {
  pt3dclear()
  pt3dadd(21.215,-5.072,-5.171,1.5)
  pt3dadd(21.598,-6.539,-4.896,2.75)
  pt3dadd(22.305,-7.763,-3.549,1.5)
  pt3dadd(23.472,-11.134,-4.07,1.5)
  pt3dadd(24.831,-13.792,-4.461,1.5)
  pt3dadd(25.401,-16.494,-4.895,1)
  pt3dadd(26.34,-18.784,-5.242,1.5)
  pt3dadd(26.441,-20.341,-5.503,1.5)
  pt3dadd(27.649,-23.558,-5.488,2.5)
}
create a2_121
a2_121 {
  pt3dclear()
  pt3dadd(27.649,-23.558,-5.488,2.5)
  pt3dadd(27.963,-24.317,-6.11,0.25)
  pt3dadd(26.358,-27.41,-6.964,0.5)
  pt3dadd(26.404,-30.137,-7.934,1)
  pt3dadd(26.723,-33.776,-10.063,0.5)
  pt3dadd(26.603,-36.157,-11.235,0.5)
  pt3dadd(26.104,-38.018,-11.829,0.5)
  pt3dadd(26.026,-41.206,-14.406,1)
  pt3dadd(25.51,-46.031,-16.013,0.5)
  pt3dadd(24.978,-48.017,-15.868,0.5)
  pt3dadd(25.302,-52.602,-17.142,1.5)
  pt3dadd(23.53,-57.285,-20.559,1.5)
  pt3dadd(23.127,-62.65,-22.253,0.5)
  pt3dadd(21.02,-65.684,-24.135,1)
  pt3dadd(19.347,-69.03,-27.827,0.5)
  pt3dadd(17.867,-72.621,-29.014,0.5)
  pt3dadd(17.197,-73.192,-30.665,0.5)
  pt3dadd(17.585,-82.367,-34.241,1)
  pt3dadd(18.246,-84.733,-36.645,0.5)
  pt3dadd(18.947,-86.945,-38.513,0.5)
  pt3dadd(18.619,-89.137,-40.424,0.5)
  pt3dadd(18.545,-90.377,-42.162,0.5)
  pt3dadd(18.149,-92.819,-42.596,0.5)
  pt3dadd(18.008,-94.311,-42.856,0.5)
  pt3dadd(16.403,-97.404,-43.71,0.5)
  pt3dadd(15.094,-99.392,-43.855,0.5)
  pt3dadd(13.225,-102.505,-44.216,0.5)
  pt3dadd(12.601,-103.867,-44.477,0.5)
  pt3dadd(11.437,-107.244,-45.867,0.5)
  pt3dadd(9.946,-110.877,-46.807,0.5)
  pt3dadd(9.206,-112.673,-47.401,0.5)
  pt3dadd(6.824,-115.768,-48.544,0.5)
  pt3dadd(4.334,-120.229,-50.687,0.5)
  pt3dadd(3.342,-122.002,-51.034,0.5)
  pt3dadd(1.686,-124.318,-51.758,0.5)
  pt3dadd(-0.136,-126.288,-52.685,0.5)
  pt3dadd(-2.567,-129.566,-55.639,0.5)
  pt3dadd(-5.893,-132.318,-57.275,0.5)
  pt3dadd(-10.198,-135.827,-59.084,0.5)
  pt3dadd(-11.035,-137.987,-58.982,1)
  pt3dadd(-13.579,-141.683,-59.474,0.25)
  pt3dadd(-14.944,-143.881,-58.388,1)
  pt3dadd(-16.297,-146.997,-59.488,1)
  pt3dadd(-19.183,-151.007,-57.764,0.5)
  pt3dadd(-20.629,-154.473,-59.69,0.5)
  pt3dadd(-23.148,-157.111,-60.254,0.5)
  pt3dadd(-24.14,-158.884,-60.601,1)
  pt3dadd(-25.025,-160.252,-61.89,0.5)
}
create a2_122
a2_122 {
  pt3dclear()
  pt3dadd(27.649,-23.558,-5.488,2.5)
  pt3dadd(29.139,-23.792,-4.952,1)
  pt3dadd(30.27,-25.37,-5.169,1.5)
  pt3dadd(32.343,-27.29,-4.894,1.5)
  pt3dadd(33.854,-28.414,-5.27,0.75)
}
create a2_1221
a2_1221 {
  pt3dclear()
  pt3dadd(33.854,-28.414,-5.27,0.75)
  pt3dadd(34.007,-29.775,-5.241,0.5)
  pt3dadd(35.248,-31.906,-4.024,1)
  pt3dadd(37.266,-36.929,-2.503,0.5)
  pt3dadd(38.192,-38.302,-0.664,1.5)
  pt3dadd(39.942,-42.399,0.495,0.5)
  pt3dadd(41.864,-43.918,3.117,1)
  pt3dadd(43.82,-45.311,5,0.5)
  pt3dadd(43.75,-46.537,6.057,1)
  pt3dadd(44.843,-48.254,8.099,1.5)
  pt3dadd(47.519,-51.79,9.142,1)
  pt3dadd(50.147,-55.507,12.691,0.5)
  pt3dadd(51.958,-58.405,15.834,1)
  pt3dadd(54.598,-60.147,17.181,0.5)
  pt3dadd(56.814,-61.535,20.092,1)
  pt3dadd(59.725,-63.229,22.221,1)
  pt3dadd(61.587,-64.972,23.278,1)
  pt3dadd(63.303,-65.327,25.581,0.5)
  pt3dadd(65.521,-67.675,26.551,1)
  pt3dadd(67.822,-69.716,28.593,0.5)
  pt3dadd(69.487,-73.16,30.621,0.5)
  pt3dadd(70.381,-75.619,31.259,0.5)
  pt3dadd(71.28,-79.023,32.751,0.5)
  pt3dadd(72.296,-81.994,34.576,0.5)
  pt3dadd(74.669,-86.662,37.951,1)
  pt3dadd(77.875,-89.185,38.429,0.5)
  pt3dadd(81.232,-94.042,42.832,1)
  pt3dadd(83.929,-96.534,45.323,0.5)
  pt3dadd(86.078,-100.108,47.351,0.5)
  pt3dadd(87.435,-104.699,48.916,0.5)
  pt3dadd(90.824,-110.405,52.16,1.5)
  pt3dadd(92.645,-114.236,54.637,0.75)
  pt3dadd(94.75,-117.003,58.07,1)
  pt3dadd(96.391,-119.571,62.531,1)
  pt3dadd(100.033,-123.366,63.574,0.5)
  pt3dadd(102.85,-125.41,64.877,0.5)
  pt3dadd(106.148,-130.491,67.716,0.5)
}
create a2_1222
a2_1222 {
  pt3dclear()
  pt3dadd(33.854,-28.414,-5.27,0.75)
  pt3dadd(34.039,-28.688,-4.039,0.5)
  pt3dadd(38.007,-31.266,-5.82,1)
  pt3dadd(39.77,-32.413,-6.443,0.5)
  pt3dadd(42.385,-33.279,-6.979,0.5)
  pt3dadd(43.311,-36.586,-7.5,1)
  pt3dadd(44.496,-36.993,-7.007,1)
  pt3dadd(46.745,-40.19,-7.195,0.5)
  pt3dadd(47.628,-42.69,-6.311,0.5)
  pt3dadd(50.465,-45.624,-5.92,0.5)
  pt3dadd(52.258,-48.593,-3.805,0.5)
  pt3dadd(52.905,-51.975,-2.067,0.75)
  pt3dadd(53.002,-53.545,-0.807,0.5)
  pt3dadd(52.814,-56.178,-0.503,0.5)
  pt3dadd(52.869,-59.836,2.177,0.5)
  pt3dadd(53.108,-62.808,3.713,0.5)
  pt3dadd(55.456,-66.601,5.205,0.5)
  pt3dadd(56.622,-69.012,6.624,1)
  pt3dadd(58.829,-71.402,7.841,1)
  pt3dadd(61.277,-73.857,9.058,1)
  pt3dadd(63.92,-75.585,8.884,1)
  pt3dadd(67.053,-77.414,9.985,0.5)
  pt3dadd(69.16,-76.314,13.822,0.5)
  pt3dadd(73.073,-80.061,15.648,0.5)
  pt3dadd(75.51,-82.557,17.11,0.5)
  pt3dadd(78.922,-86.245,17.907,0.75)
  pt3dadd(83.234,-89.47,16.286,0.5)
  pt3dadd(85.644,-92.065,15.446,0.5)
  pt3dadd(87.796,-97.559,13.593,0.5)
  pt3dadd(91.179,-102.32,11.667,0.5)
  pt3dadd(91.056,-105.675,10.075,0.25)
  pt3dadd(95.108,-110.839,9.38,0.5)
  pt3dadd(96.186,-112.612,8.873,0.5)
  pt3dadd(99.155,-117.951,7.846,1)
  pt3dadd(102.951,-121.172,6.963,0.5)
  pt3dadd(106.782,-123.293,5.761,0.5)
  pt3dadd(110.373,-121.482,4.964,0.5)
}
a2_122 connect a2_1221(0),1
a2_122 connect a2_1222(0),1
a2_12 connect a2_121(0),1
a2_12 connect a2_122(0),1
a2_1 connect a2_11(0),1
a2_1 connect a2_12(0),1
create a3_1
a3_1 {
  pt3dclear()
  pt3dadd(-3.868,-5.952,-2.404,5)
  pt3dadd(-3.905,-6.092,-4.461,4)
  pt3dadd(-5.236,-9.124,-6.053,3)
  pt3dadd(-6.485,-10.889,-8.95,0.5)
  pt3dadd(-6.658,-13.467,-10.412,2.5)
  pt3dadd(-8.061,-15.805,-11.382,3)
}
create a3_11
a3_11 {
  pt3dclear()
  pt3dadd(-8.061,-15.805,-11.382,3)
  pt3dadd(-6.891,-16.268,-13.438,2.75)
  pt3dadd(-6.431,-18.416,-15.306,2.5)
  pt3dadd(-5.627,-19.277,-18.97,3.25)
}
create a3_111
a3_111 {
  pt3dclear()
  pt3dadd(-5.627,-19.277,-18.97,3.25)
  pt3dadd(-5.704,-20.53,-19.187,3.25)
  pt3dadd(-4.983,-20.739,-21.982,2)
  pt3dadd(-4.095,-24.186,-24.56,1.5)
  pt3dadd(-3.91,-26.395,-30.005,1.5)
  pt3dadd(-3.494,-24.842,-30.483,1)
}
create a3_1111
a3_1111 {
  pt3dclear()
  pt3dadd(-3.494,-24.842,-30.483,1)
 
  pt3dadd(-4.826,-25.306,-30.611,0.5)
}
create a3_1112
a3_1112 {
  pt3dclear()
  pt3dadd(-3.494,-24.842,-30.483,1)
  pt3dadd(-3.257,-24.921,-28.962,1.5)
  pt3dadd(-2.54,-27.077,-32.597,1)
}
create a3_11121
a3_11121 {
  pt3dclear()
  pt3dadd(-2.54,-27.077,-32.597,1)
  pt3dadd(-1.296,-27.261,-34.856,0.5)
  pt3dadd(-0.025,-27.348,-39.128,1)
  pt3dadd(2.184,-26.831,-43.763,1)
  pt3dadd(3.888,-26.268,-47.905,1)
  pt3dadd(7.002,-25.274,-52.163,0.5)
  pt3dadd(9.81,-24.453,-56.464,1)
  pt3dadd(14.716,-19.667,-66.849,0.5)
  pt3dadd(18.956,-18.33,-76.074,0.5)
  pt3dadd(20.3,-17.177,-82.924,0.5)
  pt3dadd(21.699,-16.788,-87.11,1)
  pt3dadd(21,-16.496,-89.123,1)
  pt3dadd(23.868,-17.385,-89.905,0.5)
  pt3dadd(26.251,-19.118,-91.107,0.5)
  pt3dadd(30.884,-20.179,-92.091,0.5)
  pt3dadd(34.16,-21.477,-92.671,0.5)
  pt3dadd(37.695,-24.703,-94.582,0.5)
  pt3dadd(41.948,-26.218,-95.407,0.5)
  pt3dadd(45.962,-26.694,-95.813,1.5)
  pt3dadd(48.913,-28.235,-97.464,0.5)
  pt3dadd(51.568,-29.92,-97.884,1)
  pt3dadd(54.225,-31.592,-99.824,1)
  pt3dadd(53.212,-34.41,-101.62,0.5)
  pt3dadd(54.149,-37.674,-102.387,0.5)
  pt3dadd(55.707,-40.551,-103.313,0.5)
}
create a3_11122
a3_11122 {
  pt3dclear()
  pt3dadd(-2.54,-27.077,-32.597,1)
  pt3dadd(-2.844,-28.211,-34.581,1)
  pt3dadd(-1.582,-32.192,-36.217,1.5)
  pt3dadd(-1.91,-34.384,-38.128,1.5)
  pt3dadd(-1.503,-36.727,-40.286,1.5)
}


create a3_111221
a3_111221 {
  pt3dclear()
  pt3dadd(-1.503,-36.727,-40.286,1.5)
  pt3dadd(-1.965,-37.488,-41.198,1.5)
  pt3dadd(-1.512,-37.729,-41.98,1)
  pt3dadd(-1.83,-41.812,-42.182,0.5)
  pt3dadd(-1.794,-45.541,-44.846,0.5)
  pt3dadd(-1.154,-48.951,-48.698,0.5)
  pt3dadd(-1.507,-52.2,-50.537,0.5)
  pt3dadd(-1.742,-54.041,-51.623,0.5)
  pt3dadd(-2.082,-56.275,-53.288,0.5)
  pt3dadd(-2.124,-60.297,-54.229,0.5)
  pt3dadd(-1.621,-63.25,-57.501,0.5)
  pt3dadd(-0.701,-65.611,-58.877,1)
  pt3dadd(-0.77,-69.731,-62.12,0.5)
  pt3dadd(-1.319,-72.748,-64.944,0.5)
  pt3dadd(-0.425,-75.207,-68.622,0.5)
  pt3dadd(-3.171,-79.66,-73.313,0.5)
  pt3dadd(-4.398,-81.34,-76.702,0.5)
  pt3dadd(-4.745,-83.602,-79.641,1)
  pt3dadd(-1.511,-86.987,-83.117,0.5)
  pt3dadd(-0.445,-90.737,-85.738,0.5)
  pt3dadd(-0.168,-94.53,-88.402,1)
  pt3dadd(1.361,-97.519,-90.11,0.5)
  pt3dadd(1.774,-100.808,-91.413,0.5)
  pt3dadd(2.806,-104.683,-93.296,0.5)
  pt3dadd(3.475,-107.981,-96.365,1)
  pt3dadd(5.26,-112.913,-97.885,0.5)
  pt3dadd(8.436,-115.548,-98.189,0.5)
  pt3dadd(10.955,-117.737,-99.97,1.5)
  pt3dadd(13.916,-120.21,-102.287,0.5)
  pt3dadd(13.204,-120.934,-104.474,1)
  pt3dadd(16.405,-122.512,-104.85,0.5)
  pt3dadd(20.48,-123.724,-105.632,0.5)
  pt3dadd(23.975,-125.17,-105.719,0.5)
  pt3dadd(26.286,-127.169,-108.239,0.5)
  pt3dadd(26.529,-128.194,-110.179,0.5)
  pt3dadd(26.78,-129.191,-110.845,0.5)
}
create a3_111222
a3_111222 {
  pt3dclear()
  pt3dadd(-1.503,-36.727,-40.286,1.5)
  pt3dadd(-0.729,-36.74,-42.791,1)
  pt3dadd(-0.543,-39.909,-45.861,0.5)
  pt3dadd(0.006,-41.721,-49.698,0.5)
  pt3dadd(0.101,-44.265,-53.174,0.5)
  pt3dadd(0.289,-46.46,-55.824,0.5)
  pt3dadd(-0.073,-48.777,-56.996,0.5)
  pt3dadd(-0.747,-51.296,-59.487,0.5)
  pt3dadd(-0.832,-52.577,-60.978,0.5)
  pt3dadd(-1.623,-55.529,-63.802,1)
}

}
proc m3(){
create a3_1112221
a3_1112221 {
  pt3dclear()
  pt3dadd(-1.623,-55.529,-63.802,1)
  pt3dadd(-1.453,-55.86,-65.12,0.5)
  pt3dadd(-2.08,-57.237,-68.175,0.5)
  pt3dadd(-2.626,-58.305,-70.159,0.5)
  pt3dadd(-2.171,-59.507,-72.882,0.5)
  pt3dadd(-2.347,-60.165,-74.779,0.5)
  pt3dadd(-1.948,-62.536,-78.211,0.5)
  pt3dadd(-1.723,-63.631,-81.179,0.5)
  pt3dadd(1.878,-65.647,-86.943,0.5)
  pt3dadd(5.63,-68.062,-90.737,0.5)
  pt3dadd(6.798,-69.5,-93.214,0.5)
  pt3dadd(8.052,-70.616,-96.139,1)
  pt3dadd(7.837,-70.453,-98.152,0.5)
  pt3dadd(11.616,-72.771,-99.643,0.5)
  pt3dadd(15.68,-74.024,-100.179,0.5)
  pt3dadd(16.821,-75.56,-100.642,1)
  pt3dadd(20.238,-75.366,-100.961,0.5)
  pt3dadd(21.705,-77.618,-102.293,0.5)
  pt3dadd(24.9,-78.25,-103.524,0.5)
  pt3dadd(27.36,-78.729,-104.509,0.5)
  pt3dadd(28.872,-80.814,-106.826,0.5)
  pt3dadd(29.155,-85.553,-108.636,0.5)
}

create a3_1112222
a3_1112222 {
  pt3dclear()
  pt3dadd(-1.623,-55.529,-63.802,1)
  pt3dadd(-1.898,-55.591,-63.063,0.5)
  pt3dadd(-2.618,-58.277,-64.569,0.5)
  pt3dadd(-3.904,-63.075,-65.191,0.5)
  pt3dadd(-4.35,-66.674,-67.855,0.5)
  pt3dadd(-4.797,-70.273,-70.52,0.5)
  pt3dadd(-3.288,-75.266,-75.617,0.5)
  pt3dadd(-3.253,-78.034,-80.656,0.5)
  pt3dadd(-2.78,-79.166,-82.35,0.5)
  pt3dadd(-1.108,-79.689,-83.379,1)
  pt3dadd(0.696,-80.682,-83.465,0.5)
  pt3dadd(4.354,-80.553,-83.784,1)
  pt3dadd(6.357,-82.739,-84.827,0.5)
  pt3dadd(11.071,-85.427,-87.1,0.5)
  pt3dadd(14.231,-87.158,-88.012,0.5)
  pt3dadd(17.443,-88.694,-88.635,1)
  pt3dadd(21.361,-90.493,-90.286,0.5)
  pt3dadd(23.584,-91.854,-90.416,1)
  pt3dadd(25.726,-93.522,-91.618,0.5)
  pt3dadd(28.391,-95.166,-92.284,0.5)
  pt3dadd(31.803,-96.92,-93.442,0.5)
  pt3dadd(32.879,-99.667,-94.369,0.5)
}
a3_111222 connect a3_1112221(0),1
a3_111222 connect a3_1112222(0),1
a3_11122 connect a3_111221(0),1
a3_11122 connect a3_111222(0),1
a3_1112 connect a3_11121(0),1
a3_1112 connect a3_11122(0),1
a3_111 connect a3_1111(0),1
a3_111 connect a3_1112(0),1
create a3_112
a3_112 {
  pt3dclear()
  pt3dadd(-5.627,-19.277,-18.97,3.25)
  pt3dadd(-6.556,-20.812,-19.274,1.5)
  pt3dadd(-8.981,-23.101,-19.013,1.5)
  pt3dadd(-9.709,-24.855,-19.853,0.5)
  pt3dadd(-10.08,-26.24,-20.359,1.5)
  pt3dadd(-11.399,-29.23,-22.198,0.5)
  pt3dadd(-11.392,-31.136,-23.284,1.5)
  pt3dadd(-12.765,-33.362,-23.472,1)
  pt3dadd(-13.313,-37.338,-23.92,1)
  pt3dadd(-14.046,-41.04,-25.6,1.5)
  pt3dadd(-15.146,-44.179,-26.946,0.25)
  pt3dadd(-16.592,-49.575,-27,0.25)
}
create a3_1121
a3_1121 {
  pt3dclear()
  pt3dadd(-16.592,-49.575,-27,0.25)
  pt3dadd(-17.075,-49.446,-27,0.25)
  pt3dadd(-19.535,-47.036,-27.887,1.5)
  pt3dadd(-23.453,-51.999,-30.942,1)
  pt3dadd(-26.022,-51.926,-33.331,0.5)
  pt3dadd(-28.531,-53.563,-32.201,0.75)
  pt3dadd(-30.695,-53.912,-32.867,1)
  pt3dadd(-32.085,-55.234,-33.664,0.5)
  pt3dadd(-34.349,-54.028,-34.069,1)
  pt3dadd(-37.229,-55.115,-35.401,1)
  pt3dadd(-40.687,-55.463,-35.618,0.5)
  pt3dadd(-43.101,-57.71,-35.603,0.5)
  pt3dadd(-46.297,-59.013,-36.733,0.5)
  pt3dadd(-48.067,-60.788,-37.37,0.5)
  pt3dadd(-50.424,-62.825,-38.586,0.5)
  pt3dadd(-51.403,-63.582,-38.759,0.5)
  pt3dadd(-53.889,-66.095,-40.062,0.5)
  pt3dadd(-55.797,-68.387,-40.54,0.5)
  pt3dadd(-59.167,-71.308,-41.191,0.5)
  pt3dadd(-60.862,-72.803,-42.031,0.75)
  pt3dadd(-63.748,-74.878,-42.262,0.75)
  pt3dadd(-67.796,-76.463,-43.478,1.5)
  pt3dadd(-70.269,-78.933,-45.027,0.5)
  pt3dadd(-73.329,-80.693,-46.736,1)
  pt3dadd(-77.087,-82.16,-50.458,0.5)
  pt3dadd(-80.502,-83.314,-52.079,1)
  pt3dadd(-82.075,-83.388,-53.687,1)
  pt3dadd(-86.385,-85.952,-56.351,1)
  pt3dadd(-89.032,-86.172,-57.017,0.5)
  pt3dadd(-92.386,-88.062,-59.015,0.5)
  pt3dadd(-96.824,-91.102,-61.766,0.5)
  pt3dadd(-99.43,-93.102,-64.257,0.5)
  pt3dadd(-102.984,-94.774,-65.719,0.5)
  pt3dadd(-106.651,-93.971,-64.734,1)
}
create a3_1122
a3_1122 {
  pt3dclear()
  pt3dadd(-16.592,-49.575,-27,0.25)
  pt3dadd(-15.162,-46.169,-27.54,1.5)
  pt3dadd(-17.788,-58.87,-31.853,1)
  pt3dadd(-18.305,-63.694,-33.46,0.5)
  pt3dadd(-18.182,-65.167,-34.213,1)
  pt3dadd(-18.184,-68.075,-36.993,1)
  pt3dadd(-18.654,-71.758,-39.165,1)
  pt3dadd(-18.892,-75.547,-41.091,0.5)
  pt3dadd(-19.008,-80.809,-43.769,0.5)
  pt3dadd(-18.148,-83.394,-46.709,1)
  pt3dadd(-18.186,-85.468,-46.81,0.5)
  pt3dadd(-17.38,-87.288,-48.098,0.5)
  pt3dadd(-17.317,-90.918,-48.46,0.5)
  pt3dadd(-16.833,-93.942,-48.445,0.5)
  pt3dadd(-14.753,-97.768,-49.256,0.5)
  pt3dadd(-13.765,-101.811,-50.153,0.5)
  pt3dadd(-12.568,-105.07,-49.892,1)
  pt3dadd(-10.673,-110.556,-49.978,0.5)
  pt3dadd(-10.279,-111.981,-49.949,0.5)
  pt3dadd(-9.72,-114.724,-50.137,0.5)
  pt3dadd(-9.829,-118.998,-49.601,0.5)
  pt3dadd(-8.41,-124.326,-48.412,0.5)
  pt3dadd(-5.143,-129.519,-50.671,0.5)
  pt3dadd(-3.706,-133.817,-50.83,0.5)
  pt3dadd(-2.466,-137.883,-51.973,0.5)
  pt3dadd(-2.63,-139.459,-51.741,0.5)
}
a3_112 connect a3_1121(0),1
a3_112 connect a3_1122(0),1
a3_11 connect a3_111(0),1
a3_11 connect a3_112(0),1
create a3_12
a3_12 {
  pt3dclear()
  pt3dadd(-8.061,-15.805,-11.382,3)
  pt3dadd(-8.757,-16.473,-11.02,1.75)
  pt3dadd(-10.156,-16.862,-11.15,1.5)
  pt3dadd(-11.504,-18.031,-11.41,1.5)
  pt3dadd(-13.875,-21.084,-12.8,1.5)
  pt3dadd(-15.379,-21.865,-13.51,0.25)
  pt3dadd(-18.078,-25.175,-14.45,0.5)
  pt3dadd(-19.717,-28.395,-14.566,0.25)
  pt3dadd(-21.366,-29.722,-16.39,0.5)
  pt3dadd(-23.05,-33.109,-15.521,1)
  pt3dadd(-25.205,-34.391,-16.853,1)
  pt3dadd(-26.758,-37.288,-17.417,2)
  pt3dadd(-29.566,-41.004,-17.417,1.5)
  pt3dadd(-32.859,-42.67,-17.851,2)
  pt3dadd(-34.309,-46.15,-18.256,2)
  pt3dadd(-36.848,-47.898,-17.908,1)
  pt3dadd(-37.704,-50.128,-18.834,1.75)
  pt3dadd(-38.276,-51.294,-18.805,2.5)
}


create a3_121
a3_121 {
  pt3dclear()
  pt3dadd(-38.276,-51.294,-18.805,2.5)
  pt3dadd(-37.973,-52.095,-19.182,1)
  pt3dadd(-38.469,-52.982,-19.355,0.5)
  pt3dadd(-37.899,-55.683,-19.789,1)
  pt3dadd(-37.443,-57.845,-20.137,0.25)
  pt3dadd(-38.563,-60.093,-20.571,1)
  pt3dadd(-38.858,-64.093,-21.265,1.5)
  pt3dadd(-41.085,-67.574,-21.96,2)
  pt3dadd(-41.724,-70.926,-22.814,1.5)
  pt3dadd(-44.598,-75.854,-23.277,1.5)
  pt3dadd(-46.319,-79.381,-24.464,1)
  pt3dadd(-48.02,-83.798,-26.563,1)
  pt3dadd(-48.733,-86.456,-26.794,1)
  pt3dadd(-50.432,-89.899,-28.474,0.75)
  pt3dadd(-50.96,-91.872,-29.849,1.5)
  pt3dadd(-52.82,-95.916,-30.877,1)
  pt3dadd(-53.29,-99.599,-33.049,1)
  pt3dadd(-55.159,-102.711,-33.41,1)
  pt3dadd(-57.054,-105.922,-36.074,1)
  pt3dadd(-57.855,-109.876,-36.277,0.5)
  pt3dadd(-59.724,-112.988,-36.638,1.75)
  pt3dadd(-61.453,-114.609,-36.739,1)
  pt3dadd(-64.303,-119.453,-37.694,1)
  pt3dadd(-63.747,-123.17,-38.302,1)
  pt3dadd(-65.095,-124.338,-38.563,1)
  pt3dadd(-65.813,-127.984,-37.693,1.5)
  pt3dadd(-66.092,-129.993,-37.794,2)
  pt3dadd(-66.754,-133.429,-38.156,1.5)
  pt3dadd(-67.908,-135.804,-37.851,1.5)
  pt3dadd(-66.855,-138.635,-38.285,1)
  pt3dadd(-66.942,-142.824,-38.241,1)
  pt3dadd(-66.842,-144.381,-38.502,1)
  pt3dadd(-66.867,-147.372,-36.474,1.5)
  pt3dadd(-67.976,-149.579,-37.154,1.5)
  pt3dadd(-68.059,-151.821,-36.271,1.5)
  pt3dadd(-69.456,-155.105,-36.386,0.5)
  pt3dadd(-69.644,-157.738,-36.081,1.5)
  pt3dadd(-71.045,-159.102,-36.632,0.75)
  pt3dadd(-71.022,-161.912,-37.109,1)
  pt3dadd(-72.705,-165.299,-36.24,1.5)
  pt3dadd(-71.948,-167.301,-35.023,1)
  pt3dadd(-71.378,-170.002,-35.457,0.5)
  pt3dadd(-72.156,-173.872,-36.152,0.25)
  pt3dadd(-74.506,-177.815,-34.138,0.5)
  pt3dadd(-76.335,-177.879,-33.979,1)
}
create a3_122
a3_122 {
  pt3dclear()
  pt3dadd(-38.276,-51.294,-18.805,2.5)
  pt3dadd(-39.253,-51.077,-18.559,1.75)
  pt3dadd(-40.296,-52.072,-18.776,1)
  pt3dadd(-43.107,-53.868,-19.21,1.5)
  pt3dadd(-45.505,-54.125,-18.602,1.5)
  pt3dadd(-45.632,-54.601,-18.689,3)
}
create a3_1221
a3_1221 {
  pt3dclear()
  pt3dadd(-45.632,-54.601,-18.689,3)
  pt3dadd(-46.84,-54.277,-18.689,1.5)
  pt3dadd(-48.891,-54.207,-17.501,1)
  pt3dadd(-52.125,-55.649,-16.371,0.5)
  pt3dadd(-54.482,-55.752,-15.227,1)
  pt3dadd(-58.016,-55.42,-13.301,1.5)
  pt3dadd(-62.198,-55.573,-13.518,1)
  pt3dadd(-66.192,-55.988,-14.025,1)
  pt3dadd(-68.362,-57.325,-13.59,1)
  pt3dadd(-71.122,-59.899,-14.154,1.5)
  pt3dadd(-73.75,-62.943,-13.777,0.5)
  pt3dadd(-74.856,-64.176,-14.038,0.25)
  pt3dadd(-75.63,-66.098,-13.892,0.5)
  pt3dadd(-78.798,-68.263,-14.66,0.5)
  pt3dadd(-79.939,-69.621,-14.182,1)
  pt3dadd(-83.455,-71.153,-13.587,0.5)
  pt3dadd(-86.395,-72.464,-12.168,0.25)
  pt3dadd(-89.32,-75.653,-10.56,1)
  pt3dadd(-93.87,-79.112,-10.849,0.25)
  pt3dadd(-96.536,-79.402,-8.227,1)
  pt3dadd(-101.069,-81.83,-5.548,1.5)
  pt3dadd(-103.611,-83.592,-3.679,1)
  pt3dadd(-106.885,-88.082,-3.07,0.5)
  pt3dadd(-108.716,-89.121,-3.331,1)
  pt3dadd(-110.834,-90.263,-2.606,1)
  pt3dadd(-112.418,-90.378,0.348,1)
  pt3dadd(-113.637,-92.03,2.55,0.5)
  pt3dadd(-116.132,-92.65,3.853,1)
  pt3dadd(-118.713,-94.553,3.665,1)
  pt3dadd(-120.215,-96.295,1.015,1)
  pt3dadd(-122.804,-97.266,-2.822,0.75)
}
create a3_1222
a3_1222 {
  pt3dclear()
  pt3dadd(-45.632,-54.601,-18.689,3)
  pt3dadd(-45.582,-55.379,-18.819,1)
  pt3dadd(-47.973,-57.542,-19.296,1.5)
  pt3dadd(-50.168,-59.937,-18.789,0.5)
  pt3dadd(-51.738,-63.864,-18.007,0.5)
  pt3dadd(-54.529,-68.484,-17.398,0.5)
  pt3dadd(-55.43,-70.881,-17.339,0.25)
  pt3dadd(-57.424,-73.495,-17.368,1.5)
  pt3dadd(-59.797,-75.588,-16.817,2)
  pt3dadd(-60.904,-76.821,-17.078,0.5)
  pt3dadd(-63.012,-78.895,-17.019,0.5)
  pt3dadd(-64.343,-83.861,-16.657,1.5)
  pt3dadd(-66.362,-87.533,-16.613,0.5)
  pt3dadd(-67.874,-90.276,-16.641,0.25)
  pt3dadd(-69.213,-92.376,-17.568,1.5)
  pt3dadd(-69.401,-95.01,-17.263,1.5)
  pt3dadd(-70.648,-97.734,-17.784,0.5)
  pt3dadd(-72.482,-99.747,-18.464,1)
  pt3dadd(-72.913,-103.289,-18.58,1)
  pt3dadd(-74.402,-105.949,-19.101,0.5)
  pt3dadd(-76.122,-108.502,-19.868,0.5)
  pt3dadd(-77.162,-111.417,-19.65,1)
  pt3dadd(-79.516,-115.374,-20.432,1.5)
  pt3dadd(-80.636,-117.623,-20.866,0.5)
  pt3dadd(-81.579,-120.174,-21.343,0.5)
  pt3dadd(-83.465,-122.383,-22.313,0.5)
  pt3dadd(-85.198,-123.058,-23.269,0.75)
  pt3dadd(-85.396,-126.693,-24.659,1)
  pt3dadd(-87.469,-127.667,-24.919,0.5)
  pt3dadd(-90.332,-129.659,-25.643,1)
  pt3dadd(-93.716,-133.595,-26.468,0.5)
  pt3dadd(-96.599,-134.696,-26.279,0.75)
  pt3dadd(-98.288,-137.137,-26.264,0.5)
  pt3dadd(-99.833,-138.073,-27.51,0.25)
  pt3dadd(-102.588,-139.659,-29.175,0.5)
  pt3dadd(-103.225,-142.037,-29.609,1.5)
  pt3dadd(-104.817,-144.115,-30.289,0.5)
  pt3dadd(-105.465,-146.535,-30.477,0.5)
  pt3dadd(-106.125,-148.997,-30.419,0.5)
  pt3dadd(-106.668,-151.025,-30.028,0.5)
  pt3dadd(-106.241,-154.258,-33.097,1)

}
a3_122 connect a3_1221(0),1
a3_122 connect a3_1222(0),1
a3_12 connect a3_121(0),1
a3_12 connect a3_122(0),1
a3_1 connect a3_11(0),1
a3_1 connect a3_12(0),1
create a4_1
a4_1 {
  pt3dclear()
  pt3dadd(-2.29,4.765,-1.522,1.5)
  pt3dadd(-2.063,6.578,-1.711,1.5)
  pt3dadd(-2.066,10.432,-4.101,1)
  pt3dadd(-2.371,12.193,-6.1,0.5)
  pt3dadd(-2.406,14.96,-9.692,2.25)
}
create a4_11
a4_11 {
  pt3dclear()
  pt3dadd(-2.406,14.96,-9.692,2.25)
  pt3dadd(-2.323,15.267,-12.936,1)
  pt3dadd(-6.202,12.382,10.004,0.25)
  pt3dadd(-4.422,12.265,8.035,1)
  pt3dadd(-4.816,15.623,6.05,1)
  pt3dadd(-4.782,15.749,5.312,1.5)
}

}
proc m4(){

create a4_111
a4_111 {
  pt3dclear()
  pt3dadd(-4.782,15.749,5.312,1.5)
  pt3dadd(-4.346,16.412,3.921,0.5)
  pt3dadd(-2.374,18.941,0.127,0.5)
  pt3dadd(-0.588,21.745,-4.899,0.75)
  pt3dadd(2.992,23.514,-9.765,0.5)
  pt3dadd(5.194,25.937,-13.314,1)
  pt3dadd(6.896,27.46,-15.516,1)
  pt3dadd(9.767,29.479,-17.833,1)
  pt3dadd(11.061,31.411,-20.237,1)
  pt3dadd(14.721,32.514,-24.452,0.5)
  pt3dadd(19.821,34.16,-28.001,1)
  pt3dadd(21.076,34.978,-28.565,0.5)
  pt3dadd(25.103,37.452,-30.753,0.5)
  pt3dadd(29.359,38.845,-33.114,0.5)
  pt3dadd(31.905,40.621,-36.503,1)
  pt3dadd(35.037,41.686,-39.733,0.5)
  pt3dadd(37.25,42.217,-41.572,1)
  pt3dadd(41.193,43.409,-45.251,0.25)
  pt3dadd(41.638,43.139,-47.307,0.5)
  pt3dadd(44.289,43.374,-48.162,0.5)

  pt3dadd(43.071,40.76,-56.532,0.5)
  pt3dadd(46.705,41.765,-58.734,1)
  pt3dadd(48.954,41.463,-58.936,0.5)
  pt3dadd(51.73,41.198,-60.124,1)
  pt3dadd(51.151,40.004,-61.369,0.5)
  pt3dadd(53.172,37.888,-61.383,0.5)
  pt3dadd(54.27,35.225,-62.802,0.5)
  pt3dadd(54.358,32.652,-63.237,0.5)
}
create a4_112
a4_112 {
  pt3dclear()
  pt3dadd(-4.782,15.749,5.312,1.5)
  pt3dadd(-5.771,15.924,5.804,1)
  pt3dadd(-7.755,16.246,5.514,1)
  pt3dadd(-9.581,16.195,4.153,0.5)
  pt3dadd(-11.31,17.468,4.037,0.5)
  pt3dadd(-13.697,17.253,4.399,1)
  pt3dadd(-17.207,18.643,1.937,0.5)
  pt3dadd(-21.166,20.288,-1.263,1)
  pt3dadd(-22.783,21.98,-3.841,0.5)
  pt3dadd(-23.413,24.457,-9.287,1)
  pt3dadd(-24.708,27.353,-13.168,0.5)
  pt3dadd(-25.188,30.39,-14.704,0.5)
  pt3dadd(-25.894,32.588,-15.631,0.5)
  pt3dadd(-26.477,36.207,-17.326,1)
  pt3dadd(-28.588,37.987,-19.658,0.5)
  pt3dadd(-30.971,39.719,-22.771,0.5)
  pt3dadd(-33.455,41.074,-27.985,0.5)
  pt3dadd(-37.713,43.534,-32.33,0.5)
  pt3dadd(-39.592,46.181,-33.996,1)
  pt3dadd(-41.107,47.291,-36.414,0.5)
  pt3dadd(-43.094,49.533,-37.139,0.5)
  pt3dadd(-44.428,51.314,-39.181,0.5)
  pt3dadd(-46.871,52.823,-39.543,0.5)
  pt3dadd(-49.288,54.43,-41.918,1)
  pt3dadd(-53.075,54.785,-44.061,0.5)
  pt3dadd(-56.957,55.75,-45.09,0.5)
  pt3dadd(-60.92,57.381,-46.77,0.25)
  pt3dadd(-64.773,58.458,-47.016,0.5)
  pt3dadd(-68.459,59.191,-47.059,0.5)
}
a4_11 connect a4_111(0),1
a4_11 connect a4_112(0),1
create a4_12
a4_12 {
  pt3dclear()
  pt3dadd(-2.406,14.96,-9.692,2.25)
  pt3dadd(-1.881,14.985,-9.156,1)
  pt3dadd(-2.171,16.802,-8.606,0.5)
  pt3dadd(-1.295,18.141,-8.592,0.5)
  pt3dadd(-0.141,20.516,-8.896,0.5)
  pt3dadd(-0.862,23.617,-10.432,0.5)
  pt3dadd(-2.32,26.871,-11.721,0.25)
  pt3dadd(-2.157,28.447,-11.953,0.5)
  pt3dadd(4.688,35.638,-12.446,0.5)
  pt3dadd(6.533,37.693,-12.012,0.5)
  pt3dadd(7.958,40.115,-11.535,0.5)
  pt3dadd(9.675,41.694,-11.187,0.5)
  pt3dadd(11.101,44.116,-10.71,0.5)
  pt3dadd(11.277,46.707,-10.768,0.5)
  pt3dadd(12.167,49.062,-10.58,0.5)
  pt3dadd(13.748,53.032,-11.609,0.5)
  pt3dadd(13.684,55.688,-11.667,0.5)
  pt3dadd(15.124,58.165,-12.957,0.5)
  pt3dadd(18.184,61.858,-13.203,0.5)
  pt3dadd(22.895,65.918,-13.566,0.5)
  pt3dadd(27.481,70.477,-13.596,0.5)
  pt3dadd(33.374,78.943,-13.916,0.5)
  pt3dadd(36.689,85.521,-15.944,0.5)
  pt3dadd(41.097,90.382,-15.931,0.5)
  pt3dadd(48.04,95.043,-17.105,0.5)
  pt3dadd(52.02,99.269,-18.742,0.5)
  pt3dadd(55.051,99.956,-19.756,0.5)
  pt3dadd(57.369,100.879,-21.016,0.5)
  pt3dadd(60.666,102.56,-22.102,0.5)
  pt3dadd(61.973,105.507,-24.333,0.5)
  pt3dadd(64.073,108.513,-23.725,0.5)
  pt3dadd(66.106,110.307,-23.581,1)
  pt3dadd(68.049,112.725,-23.842,0.5)
  pt3dadd(70.706,115.882,-23.437,0.5)
}


a4_1 connect a4_11(0),1
a4_1 connect a4_12(0),1
create a5_1
a5_1 {
  pt3dclear()
  pt3dadd(1.869,0.969,11.729,4.5)
  pt3dadd(2.682,2.071,16.016,3.75)
  pt3dadd(3.931,3.836,23.227,3)
}
create a5_11
a5_11 {
  pt3dclear()
  pt3dadd(3.931,3.836,23.227,3)
  pt3dadd(2.422,4.001,25.979,2)
  pt3dadd(1.593,3.804,29.715,1.5)
  pt3dadd(0.178,4.319,33.293,2)
  pt3dadd(1.363,3.911,33.785,2.25)
}
create a5_111
a5_111 {
  pt3dclear()
  pt3dadd(1.363,3.911,33.785,2.25)
  pt3dadd(2.756,3.313,35.016,2)
  pt3dadd(3.149,2.849,36.986,2)
  pt3dadd(3.654,0.87,42.764,1.5)
}
create a5_1111
a5_1111 {
  pt3dclear()
  pt3dadd(3.654,0.87,42.764,1.5)
  pt3dadd(3.051,0.552,43.952,2)
  pt3dadd(1.422,-1.665,45.531,0.5)
  pt3dadd(0.236,-3.191,46.994,0.75)
  pt3dadd(-2.189,-7.414,49.21,1)
  pt3dadd(-3.657,-9.029,50.137,2)
  pt3dadd(-5.023,-11.227,51.224,1.5)
}
create a5_11111
a5_11111 {
  pt3dclear()
  pt3dadd(-5.023,-11.227,51.224,1.5)
  pt3dadd(-6.116,-11.444,51.137,0.5)
  pt3dadd(-8.767,-11.678,51.991,1)
  pt3dadd(-12.647,-14.567,53.353,0.75)
  pt3dadd(-15.738,-17.411,54.758,0.5)
  pt3dadd(-18.978,-19.841,56.989,1)
  pt3dadd(-20.687,-21.392,57.916,1)
  pt3dadd(-25.554,-25.065,62.146,0.75)
  pt3dadd(-29.596,-27.595,66.1,0.5)
  pt3dadd(-31.602,-30.25,70.633,1.5)
  pt3dadd(-32.295,-32.838,71.43,1)
  pt3dadd(-34.056,-35.544,74.443,1)
  pt3dadd(-35.538,-40.11,77.152,0.5)
  pt3dadd(-38.63,-44.888,80.512,1)
  pt3dadd(-42.111,-47.253,82.743,1)
  pt3dadd(-46.95,-48.895,87.32,1)
  pt3dadd(-50.373,-52.01,90.695,0.5)
  pt3dadd(-52.508,-54.182,92.766,1)
  pt3dadd(-55.863,-55.111,97.024,0.5)
  pt3dadd(-56.868,-55.966,98.863,1)
  pt3dadd(-59.731,-56.023,100.5,0.5)
  pt3dadd(-62.763,-55.75,103.454,1)
  pt3dadd(-64.616,-54.938,106.046,0.5)
  pt3dadd(-67.17,-54.808,110.522,1)
  pt3dadd(-69.076,-56.126,114.779,0.5)
  pt3dadd(-70.983,-56.484,120.978,0.5)
  pt3dadd(-71.186,-57.238,125.41,0.5)
}
create a5_11112
a5_11112 {
  pt3dclear()
  pt3dadd(-5.023,-11.227,51.224,1.5)
  pt3dadd(-4.351,-11.617,50.934,1)
  pt3dadd(-5.019,-13.147,51.658,0.5)
  pt3dadd(-6.035,-16.938,53.759,0.5)
  pt3dadd(-6.562,-19.87,54.758,0.75)
  pt3dadd(-6.259,-22.605,56.337,1)
  pt3dadd(-6.663,-27.009,56.584,1)
  pt3dadd(-8.309,-35.084,57.165,0.5)
  pt3dadd(-9.103,-42.878,57.832,1)
  pt3dadd(-11.914,-51.435,61.323,1)
  pt3dadd(-12.008,-60.479,66.379,0.5)
  pt3dadd(-9.504,-69.485,74.606,1)
  pt3dadd(-8.232,-74.399,76.619,0.5)
  pt3dadd(-8.695,-77.093,77.662,0.5)
  pt3dadd(-9.794,-83.125,80.647,1)
  pt3dadd(-9.116,-89.289,83.182,1.5)
  pt3dadd(-9.116,-89.289,83.182,0.5)
  pt3dadd(-7.46,-93.735,83.515,1)
  pt3dadd(-7.134,-97.346,82.661,0.5)
  pt3dadd(-6.511,-99.852,82.517,0.5)
  pt3dadd(-6.332,-103.049,82.488,0.5)
  pt3dadd(-7.097,-105.902,81.967,1)
  pt3dadd(-7.718,-115.946,81.752,0.5)
  pt3dadd(-8.382,-120.356,80.97,0.5)
  pt3dadd(-7.814,-124.032,80.116,0.5)
  pt3dadd(-7.694,-130.346,78.539,0.5)
  pt3dadd(-5.621,-136.134,78.409,0.5)
  pt3dadd(-5.192,-140.328,77.714,0.5)
}
a5_1111 connect a5_11111(0),1
a5_1111 connect a5_11112(0),1
create a5_1112
a5_1112 {
  pt3dclear()
  pt3dadd(3.654,0.87,42.764,1.5)
  pt3dadd(4.042,1.351,43.879,1.5)
  pt3dadd(3.533,1.383,45.892,1.5)
  pt3dadd(4.145,0.769,48.354,1.5)
}
create a5_11121
a5_11121 {
  pt3dclear()
  pt3dadd(4.145,0.769,48.354,1.5)
  pt3dadd(3.678,-0.005,48.963,0.5)
  pt3dadd(2.04,-1.29,51.208,1)
  pt3dadd(1.495,-2.358,53.539,1.5)
  pt3dadd(0.821,-2.942,57.725,1)
  pt3dadd(0.173,-3.427,59.897,1)
  pt3dadd(-0.229,-3.964,64.865,1)
  pt3dadd(0.056,-2.9,70.136,1)
  pt3dadd(-0.159,-2.737,72.439,1)
  pt3dadd(-0.822,-3.278,76.378,1)
  pt3dadd(-1.094,-3.325,79.911,0.5)
  pt3dadd(-0.848,-3.375,82.707,1)
  pt3dadd(0.067,-4.79,84.792,0.5)
  pt3dadd(1.75,-5.27,87.833,0.5)
  pt3dadd(2.817,-5.151,89.933,1)
  pt3dadd(6.247,-5.875,91.743,1)
  pt3dadd(8.742,-5.254,94.756,1)
  pt3dadd(10.145,-4.85,97.681,1)
  pt3dadd(11.223,-4.688,99.534,0.5)
  pt3dadd(12.96,-5.933,100.925,1)
  pt3dadd(13.969,-6.998,103.836,0.5)
  pt3dadd(14.032,-8.694,105.835,0.5)
  pt3dadd(15.442,-10.196,107.674,0.5)
  pt3dadd(16.911,-11.473,111.077,1)
  pt3dadd(17.448,-12.367,113.742,0.5)
  pt3dadd(17.028,-13.933,115.741,0.5)
  pt3dadd(18.487,-15.253,119.391,1)
  pt3dadd(19.888,-18.716,121.911,0.5)
  pt3dadd(20.442,-20.514,125.184,0.5)
  pt3dadd(20.615,-22.764,128.617,0.5)
  pt3dadd(19.37,-24.513,132.831,0.5)
  pt3dadd(20.89,-26.569,136.104,0.5)
  pt3dadd(20.85,-27.683,137.944,0.5)
  pt3dadd(24.144,-30.844,140.348,0.5)
  pt3dadd(26.435,-33.887,140.696,0.5)
  pt3dadd(28.531,-35.723,140.479,0.5)
  pt3dadd(29.231,-36.975,140.552,0.5)
}
create a5_11122
a5_11122 {
  pt3dclear()
  pt3dadd(4.145,0.769,48.354,1.5)
  pt3dadd(4.974,0.967,48.933,1)
  pt3dadd(6.391,1.427,50.092,1)
  pt3dadd(8.144,2.172,52.076,1.5)
  pt3dadd(9.591,2.744,54.016,1.5)
  pt3dadd(10.284,3.398,55.175,1)
}
create a5_111221
a5_111221 {
  pt3dclear()
  pt3dadd(10.284,3.398,55.175,1)
  pt3dadd(11.499,3.103,56.449,0.5)
  pt3dadd(13.415,3.49,60.156,0.75)
  pt3dadd(15.491,4.478,63.212,1)
  pt3dadd(17.943,6.865,65.254,0.5)
  pt3dadd(21.751,7.554,68.845,0.5)
  pt3dadd(23.735,5.299,71.09,0.5)
  pt3dadd(25.685,4.851,72.118,0.5)
  pt3dadd(27.679,5.532,74.102,0.5)
  pt3dadd(30.575,3.781,73.682,0.5)
  pt3dadd(31.286,2.571,73.508,0.5)
  pt3dadd(30.89,0.128,73.074,0.5)
  pt3dadd(31.857,-3.024,73.089,0.5)
  pt3dadd(31.982,-5.457,74.712,0.5)
  pt3dadd(33.619,-8.039,76.377,0.5)
  pt3dadd(34.482,-9.649,78.173,0.5)
  pt3dadd(35.082,-12.239,78.521,0.5)
  pt3dadd(35.619,-15.066,78.826,0.5)
  pt3dadd(36.219,-17.656,79.173,0.5)
  pt3dadd(36.274,-19.38,79.898,1)
  pt3dadd(37.498,-22.541,82.462,0.5)
  pt3dadd(37.476,-22.625,82.954,0.5)
  pt3dadd(37.654,-25.821,82.925,0.5)
  pt3dadd(37.865,-27.932,84.099,1)
  pt3dadd(39.003,-29.481,85.156,1)
  pt3dadd(42.198,-33.98,87.836,0.5)
  pt3dadd(42.034,-35.555,88.068,0.5)
  pt3dadd(44.99,-37.082,89.212,0.5)
  pt3dadd(46.867,-40.703,90.458,0.5)
  pt3dadd(50.374,-43.067,92.5,1)
  pt3dadd(52.589,-43.495,93.036,1)
  pt3dadd(55.878,-45.711,94.586,1)
  pt3dadd(61.763,-46.927,96.932,1)
  pt3dadd(65.931,-46.829,98.915,0.5)
  pt3dadd(71.142,-46.697,99.176,0.5)
  pt3dadd(77.06,-46.828,98.408,1)
}
create a5_111222
a5_111222 {
  pt3dclear()
  pt3dadd(10.284,3.398,55.175,1)
  pt3dadd(10.011,4.311,56.333,0.5)
  pt3dadd(10.853,6.485,59.027,0.5)
  pt3dadd(11.641,8.463,61.43,0.5)
  pt3dadd(12.393,10.301,61.778,0.5)
  pt3dadd(13.655,13.081,64.847,0.5)
  pt3dadd(15.051,15.392,68.859,0.5)
  pt3dadd(17.852,18.12,74.274,0.5)
  pt3dadd(18.619,20.014,77.171,0.5)
  pt3dadd(20.634,21.739,80.602,0.5)
  pt3dadd(23.407,23.395,83.296,0.5)
  pt3dadd(24.346,25.932,85.294,0.5)
  pt3dadd(27.076,28.395,89.392,0.5)
  pt3dadd(30.649,30.137,91.883,1)
  pt3dadd(33.516,32.143,95.401,0.5)
  pt3dadd(35.696,36.417,99.021,0.5)
  pt3dadd(37.547,39.46,102.67,0.5)
  pt3dadd(38.317,43.302,106.406,1)
  pt3dadd(40.741,48.485,110.446,0.5)
  pt3dadd(41.49,52.243,114.674,0.5)
}
a5_11122 connect a5_111221(0),1
a5_11122 connect a5_111222(0),1
a5_1112 connect a5_11121(0),1
a5_1112 connect a5_11122(0),1
a5_111 connect a5_1111(0),1
a5_111 connect a5_1112(0),1
create a5_112
a5_112 {
  pt3dclear()
  pt3dadd(1.363,3.911,33.785,2.25)
  pt3dadd(0.813,3.789,35.262,2.25)
  pt3dadd(-0.704,3.926,36.739,2.25)
  pt3dadd(-2.762,5.902,39.013,1.5)
  pt3dadd(-3.415,6.362,40.331,1.5)
  pt3dadd(-4.207,6.305,41.808,1.75)
}
create a5_1121
a5_1121 {
  pt3dclear()
  pt3dadd(-4.207,6.305,41.808,1.75)
  pt3dadd(-5.173,6.563,41.808,1.5)
  pt3dadd(-6.731,6.546,42.749,1)
  pt3dadd(-7.753,6.595,43.98,1)
  pt3dadd(-10.13,7.382,46.037,0.5)
  pt3dadd(-15.862,7.24,48.035,1.5)
  pt3dadd(-22.098,8.116,50.946,0.75)
  pt3dadd(-26.409,8.447,52.583,0.5)
  pt3dadd(-29,8.437,55.002,0.5)
  pt3dadd(-31.482,8.832,56.479,1.5)
}
create a5_11211
a5_11211 {
  pt3dclear()
  pt3dadd(-31.482,8.832,56.479,1.5)
  pt3dadd(-31.464,8.902,57.507,1.5)
  pt3dadd(-33.266,10.87,58.014,0.5)
  pt3dadd(-34.788,11.952,58.636,1)
  pt3dadd(-38.003,13.474,60.78,1)
  pt3dadd(-40.592,16.371,61.663,1)
  pt3dadd(-44.577,17.92,64.791,0.75)
  pt3dadd(-46.87,18.054,65.978,0.5)
  pt3dadd(-49.713,20.001,66.688,0.5)
  pt3dadd(-53.592,20.98,68.455,1)
  pt3dadd(-57.008,22.721,71.134,0.5)
  pt3dadd(-61.403,23.704,73.639,1)
  pt3dadd(-65.448,25.028,75.203,1)
  pt3dadd(-68.714,27.328,77.477,0.5)
  pt3dadd(-70.548,30.143,79.142,0.5)
  pt3dadd(-72.481,31.621,81.082,1)
  pt3dadd(-76.278,35.802,83.906,0.5)
  pt3dadd(-80.471,37.541,86.295,1)
  pt3dadd(-83.926,40.101,88.859,0.5)
  pt3dadd(-85.189,42.149,92.45,0.5)
  pt3dadd(-87.611,44.703,93.536,0.5)
  pt3dadd(-93.956,48.068,97.373,1)
  pt3dadd(-97.628,51.751,99.864,0.5)
  pt3dadd(-100.284,54.397,102.224,0.5)
  pt3dadd(-104.7,54.336,103.282,1)
}
}
proc m5(){
create a5_11212
a5_11212 {
  pt3dclear()
  pt3dadd(-31.482,8.832,56.479,1.5)
  pt3dadd(-31.236,7.822,57.333,1.5)
  pt3dadd(-32.615,7.502,58.231,1)
  pt3dadd(-35.454,6.569,61.751,1)
  pt3dadd(-37.874,6.228,62.852,1.5)
  pt3dadd(-43.152,4.884,66.444,1)
  pt3dadd(-50.141,2.949,68.587,1)
  pt3dadd(-52.642,1.34,70.992,1)
  pt3dadd(-55.03,-0.808,73.309,1)
}
create a5_112121
a5_112121 {
  pt3dclear()
  pt3dadd(-55.03,-0.808,73.309,1)
  pt3dadd(-55.468,-0.511,72.324,0.5)
  pt3dadd(-60.65,-0.531,77.162,0.5)
  pt3dadd(-63.921,-2.113,80.551,0.5)
  pt3dadd(-67.686,-3.608,84.186,0.5)
  pt3dadd(-71.17,-4.053,90.298,0.5)
  pt3dadd(-72.31,-5.411,90.776,0.5)
  pt3dadd(-70.199,-7.191,93.108,0.5)
}
create a5_112122
a5_112122 {
  pt3dclear()
  pt3dadd(-55.03,-0.808,73.309,1)
  pt3dadd(-54.996,-0.682,72.571,1)
  pt3dadd(-59.02,-3.142,73.237,0.5)
  pt3dadd(-61.589,-5.003,72.803,0.5)
  pt3dadd(-66.426,-8.565,73.499,0.75)
  pt3dadd(-68.027,-9.71,73.485,0.5)
  pt3dadd(-71.5,-12.048,72.674,0.5)
  pt3dadd(-75.972,-17.147,72.617,1)
  pt3dadd(-79.807,-19.867,72.994,0.5)
  pt3dadd(-81.307,-22.569,72.719,1)
  pt3dadd(-84.41,-25.455,74.371,0.5)
  pt3dadd(-90.014,-28.017,76.471,1)
  pt3dadd(-95.52,-30.214,77.877,1)
  pt3dadd(-97.374,-31.337,78.108,1)
  pt3dadd(-104.949,-34.494,82.048,0.5)
  pt3dadd(-107.468,-35.198,83.844,1)
  pt3dadd(-113.906,-37.011,84.511,1)
  pt3dadd(-118.89,-38.225,84.077,0.5)
  pt3dadd(-121.665,-38.921,83.324,0.5)
  pt3dadd(-128.71,-36.238,84.729,1.5)
  pt3dadd(-134.682,-33.409,85.192,0.5)
  pt3dadd(-137.036,-32.538,86.756,1)
  pt3dadd(-139.582,-32.38,88.19,1)
}
a5_11212 connect a5_112121(0),1
a5_11212 connect a5_112122(0),1
a5_1121 connect a5_11211(0),1
a5_1121 connect a5_11212(0),1
create a5_1122
a5_1122 {
  pt3dclear()
  pt3dadd(-4.207,6.305,41.808,1.75)
  pt3dadd(-3.786,6.911,42.184,0.5)
  pt3dadd(-3.278,7.84,42.112,0.25)
  pt3dadd(-3.51,8.907,43.806,1)
  pt3dadd(-4.489,10.084,45.993,0.5)
  pt3dadd(-5.112,10.656,48.093,1)
  pt3dadd(-6.256,14.112,52.437,1)
  pt3dadd(-6.853,16.716,54.884,0.5)
  pt3dadd(-7.073,17.825,56.332,0.75)
  pt3dadd(-7.524,19.04,57.534,0.5)
  pt3dadd(-6.932,21.25,58.953,1)
  pt3dadd(-6.246,23.811,61.197,0.5)
  pt3dadd(-6.423,26.047,63.601,1)
  pt3dadd(-5.887,28.048,66.251,0.5)
  pt3dadd(-4.937,30.628,68.003,0.5)
  pt3dadd(-4.539,34.044,68.857,0.5)
  pt3dadd(-3.994,35.113,70.841,0.5)
  pt3dadd(-3.281,37.772,75.388,1)
  pt3dadd(-2.839,39.422,77.212,0.5)
  pt3dadd(-2.151,42.957,79.876,1)
  pt3dadd(-1.556,46.141,81.715,0.5)
  pt3dadd(-1.078,48.892,83.221,0.5)
  pt3dadd(-0.508,51.018,85.132,0.5)
  pt3dadd(-0.708,53.171,88.028,1.5)
  pt3dadd(-0.797,56.704,90.403,0.5)
  pt3dadd(-1.294,60.645,92.575,0.5)
  pt3dadd(-0.605,64.18,95.239,0.5)
  pt3dadd(-0.179,68.669,98.815,0.5)
  pt3dadd(0.277,71.336,100.814,0.5)
  pt3dadd(0.508,75.097,101.465,1)
  pt3dadd(0.257,80.922,104.476,1)
  pt3dadd(-0.909,86.228,107.358,0.5)
  pt3dadd(-3.255,90.995,110.601,0.5)
  pt3dadd(-5.169,96.411,113.975,0.5)
  pt3dadd(-7.528,100.162,117.044,0.5)
}
a5_112 connect a5_1121(0),1
a5_112 connect a5_1122(0),1
a5_11 connect a5_111(0),1
a5_11 connect a5_112(0),1
create a5_12
a5_12 {
  pt3dclear()
  pt3dadd(3.931,3.836,23.227,3)
  pt3dadd(4.414,3.707,23.227,2)
  pt3dadd(5.088,4.291,23.358,1.5)
  pt3dadd(7.433,5.312,24.4,1)
  pt3dadd(8.264,6.484,25.399,1)
  pt3dadd(10.839,7.399,26.688,1)
  pt3dadd(12.303,9,27.281,2)
}
create a5_121
a5_121 {
  pt3dclear()
  pt3dadd(12.303,9,27.281,2)
  pt3dadd(13.327,7.991,28.426,1)
  pt3dadd(17.423,7.824,29.092,1)
  pt3dadd(21.568,7.838,31.568,1)
  pt3dadd(26.005,7.009,33.914,0.5)
  pt3dadd(28.442,6.446,33.422,0.5)
  pt3dadd(29.887,6.044,34.942,1)
  pt3dadd(30.992,6.303,34.783,1.5)
}
create a5_1211
a5_1211 {
  pt3dclear()
  pt3dadd(30.992,6.303,34.783,1)

  pt3dadd(40.476,6.179,35.359,.5)
}
create a5_1212
a5_1212 {
  pt3dclear()
  pt3dadd(30.992,6.303,34.783,1.5)
  pt3dadd(30.83,5.701,35.435,1)
  pt3dadd(34.215,4.809,33.914,0.5)
  pt3dadd(37.921,3.186,33.045,1)
  pt3dadd(41.864,2.445,31.322,1)
  pt3dadd(45.603,0.947,29.714,0.5)
  pt3dadd(47.58,0.598,28.729,0.5)
  pt3dadd(51.043,-1.935,27.441,1)
  pt3dadd(56.215,-2.916,25.225,1)
  pt3dadd(58.937,-4.35,23.328,0.5)
  pt3dadd(62.704,-6.709,22.083,1)
  pt3dadd(69.788,-9.253,18.419,1.5)
  pt3dadd(72.229,-9.802,16.406,1)
  pt3dadd(76.811,-10.086,15.551,0.5)
  pt3dadd(79.479,-10.755,15.305,0.75)
  pt3dadd(80.922,-10.198,14.45,1)
  pt3dadd(84.28,-13.122,12.582,0.5)
  pt3dadd(87.088,-14.234,10.236,1)
  pt3dadd(91.491,-15.189,9.005,1)
  pt3dadd(96.455,-15.98,6.051,1)
  pt3dadd(102.305,-16.364,2.445,0.5)
  pt3dadd(108.212,-19.432,-2.378,0.75)
  pt3dadd(111.576,-21.368,-5.346,0.5)
  pt3dadd(112.949,-23.97,-7.504,0.5)
  pt3dadd(113.856,-27.347,-9.053,1)
  pt3dadd(113.369,-29.165,-9.893,0.5)
  pt3dadd(111.306,-29.138,-12.775,0.5)
  pt3dadd(115.351,-30.462,-14.339,1)
  pt3dadd(116.337,-31.611,-15.251,0.5)
  pt3dadd(119.953,-35.503,-16.51,0.5)
  pt3dadd(122.113,-37.102,-16.684,0.5)
  pt3dadd(122.41,-38.89,-15.96,1)
  pt3dadd(122.014,-41.333,-16.394,0.5)
  pt3dadd(121.332,-43.879,-15.843,0.5)
  pt3dadd(121.937,-47.415,-14.641,0.5)
}
a5_121 connect a5_1211(0),1
a5_121 connect a5_1212(0),1
create a5_122
a5_122 {
  pt3dclear()
  pt3dadd(12.303,9,27.281,2)
  pt3dadd(12.249,9.765,28.932,1)
  pt3dadd(13.231,11.496,29.526,1)
  pt3dadd(15.547,13.379,30.206,0.5)
  pt3dadd(16.667,15.628,30.64,0.5)
  pt3dadd(17.04,17.987,31.567,1)
  pt3dadd(18.894,19.109,31.335,0.25)
  pt3dadd(20.003,21.316,32.015,1)
  pt3dadd(20.146,23.782,32.695,1)
  pt3dadd(21.166,27.587,33.39,1)
  pt3dadd(22.976,29.515,34.563,0.5)
  pt3dadd(23.457,33.24,36.488,1.5)
  pt3dadd(24.474,36.071,36.763,0.25)
  pt3dadd(24,40.097,38.442,1)
  pt3dadd(25.075,42.178,39.861,1)
  pt3dadd(26.15,44.259,41.28,1)
  pt3dadd(27.639,46.918,41.801,0.5)
  pt3dadd(29.385,49.57,44.871,0.5)
  pt3dadd(30.592,52.14,44.856,0.75)
  pt3dadd(33.011,55.375,48.056,0.5)
  pt3dadd(33.407,57.818,48.49,1)
  pt3dadd(34.194,58.822,50.474,1)
  pt3dadd(35.378,63.243,53.312,1)
  pt3dadd(34.969,64.612,55.05,1.5)
  pt3dadd(36.723,66.331,57.453,1)
  pt3dadd(36.359,67.868,58.206,0.5)
  pt3dadd(36.983,71.165,60.827,0.5)
  pt3dadd(37.633,72.625,63.39,0.5)
  pt3dadd(37.578,76.284,65.026,0.5)
  pt3dadd(36.135,80.554,68.226,0.5)
  pt3dadd(37.008,83.814,72.122,0.5)
  pt3dadd(36.166,86.469,76.089,0.5)
  pt3dadd(34.649,89.499,77.552,0.5)
  pt3dadd(31.842,92.546,82.258,0.5)
  pt3dadd(31.738,96.023,86.399,0.5)
  pt3dadd(33.303,98.963,91.033,0.5)
}

a5_12 connect a5_121(0),1
a5_12 connect a5_122(0),1
a5_1 connect a5_11(0),1
a5_1 connect a5_12(0),1
create a6_1
a6_1 {
  pt3dclear()
  pt3dadd(-2.461,7.99,4.096,2)
  pt3dadd(-2.279,9.636,4.892,1.5)
  pt3dadd(-2.803,11.546,6.717,1)
  pt3dadd(-2.946,13.908,8.382,1.5)
  pt3dadd(-3.034,16.48,8.816,1)
  pt3dadd(-2.64,17.949,8.83,2)
  pt3dadd(-2.529,21.263,10.669,1.5)
  pt3dadd(-2.982,24.398,11.436,1)
  pt3dadd(-1.769,26.997,12.696,1)
  pt3dadd(-1.764,28.945,13.536,1)
  pt3dadd(-1.878,29.485,13.622,2.5)
}
create a6_11
a6_11 {
  pt3dclear()
  pt3dadd(-1.878,29.485,13.622,2.5)
  pt3dadd(-2.095,30.608,13.55,1.5)
  pt3dadd(-1.239,32.838,14.476,1)
  pt3dadd(-1.315,35.452,14.664,1.5)
  pt3dadd(-1.174,36.943,14.925,1)
}
create a6_111
a6_111 {
  pt3dclear()
  pt3dadd(-1.174,36.943,14.925,1)
  pt3dadd(-0.519,37.457,14.027,1)
  pt3dadd(-0.436,39.699,13.143,1)
  pt3dadd(-1.193,41.701,11.926,1.5)
  pt3dadd(0.605,44.547,10.97,1.5)
  pt3dadd(1.665,46.572,9.84,1.5)
  pt3dadd(2.695,48.485,7.928,1.5)
  pt3dadd(5.069,49.617,5.437,1.5)
  pt3dadd(6.78,50.208,2.57,1)
  pt3dadd(11.465,52.236,-2.456,0.75)
  pt3dadd(16.881,54.097,-6.208,1)
  pt3dadd(19.804,56.312,-8.235,0.75)
  pt3dadd(21.45,57.625,-9.206,0.5)
  pt3dadd(25.175,58.006,-11.002,0.5)
  pt3dadd(30.1,60.929,-14.087,0.5)
  pt3dadd(31.399,61.915,-15.637,0.5)
  pt3dadd(34.727,65.641,-17.897,1)
  pt3dadd(37.322,67.599,-19.476,0.5)
  pt3dadd(39.85,71.239,-21.533,0.5)
  pt3dadd(42.627,72.909,-24.676,0.5)
  pt3dadd(47.687,73.441,-35.016,1)
  pt3dadd(49.702,75.164,-40.216,1)
  pt3dadd(51.012,76.192,-42.011,0.5)
  pt3dadd(54.577,77.905,-45.111,0.5)
  pt3dadd(58.669,80.617,-47.255,1)
  pt3dadd(61.32,82.784,-50.065,0.5)
  pt3dadd(63.745,85.073,-50.326,0.5)
  pt3dadd(65.573,88.032,-50.5,0.5)
  pt3dadd(67.781,91.443,-50.834,0.5)
  pt3dadd(68.969,93.943,-51.877,0.5)
  pt3dadd(68.998,96.949,-51.11,0.5)
}
create a6_112
a6_112 {
  pt3dclear()
  pt3dadd(-1.174,36.943,14.925,1)
  pt3dadd(-1.106,39.13,20.124,0.25)
  pt3dadd(-0.84,40.123,20.051,2)
  pt3dadd(-0.404,43.68,22.961,2)
  pt3dadd(1.017,46.088,24.96,1.5)
  pt3dadd(2.037,47.959,27.61,0.5)
  pt3dadd(2.123,50.215,29.521,0.5)
  pt3dadd(3.972,52.284,32.75,1.5)
  pt3dadd(4.794,54.388,34.415,0.5)
  pt3dadd(6.025,56.083,36.283,1)
  pt3dadd(7.636,58.23,37.992,1)
  pt3dadd(8.7,60.269,39.657,0.25)
  pt3dadd(11.572,63.263,42.075,0.25)
  pt3dadd(13.475,64.568,43.653,1.5)
  pt3dadd(14.559,65.716,44.406,1.75)
}
create a6_1121
a6_1121 {
  pt3dclear()
  pt3dadd(14.559,65.716,44.406,1.75)
  pt3dadd(15.261,65.438,44.898,1.5)
  pt3dadd(18.081,66.302,44.666,1)
  pt3dadd(23.136,67.782,46.418,1)
  pt3dadd(25.605,68.304,47.128,0.75)
  pt3dadd(28.178,68.245,47.997,1)
  pt3dadd(30.966,69.957,48.923,1)
  pt3dadd(33.604,71.109,50.255,0.5)
  pt3dadd(35.77,72.433,51.341,1)
  pt3dadd(39.548,73.01,54.151,1)
  pt3dadd(44.525,74.196,57.626,1.5)
  pt3dadd(45.783,75.029,59.856,1)
  pt3dadd(48.826,75.758,62.912,1)
  pt3dadd(50.313,77.444,63.013,0.5)
  pt3dadd(52.547,79.02,66.937,0.5)
  pt3dadd(56.177,80.012,70.572,1)
  pt3dadd(58.317,81.238,73.671,0.5)
  pt3dadd(58.382,83.41,76.074,1)
  pt3dadd(60.163,85.227,80.781,0.5)
  pt3dadd(62.716,85.098,84.937,0.5)
  pt3dadd(63.038,84.368,89.905,0.5)
  pt3dadd(63.488,84.113,90.643,0.5)
}
create a6_1122
a6_1122 {
  pt3dclear()
  pt3dadd(14.559,65.716,44.406,1.75)
  pt3dadd(14.423,66.173,44.985,1)
  pt3dadd(14.377,70.833,48.315,0.5)
  pt3dadd(14.877,76.562,53.63,1.5)
  pt3dadd(14.767,79.051,54.556,1.5)
  pt3dadd(14.266,81.044,55.888,2)
  pt3dadd(13.788,83.122,56.728,1)
  pt3dadd(14.78,84.895,57.075,1)
  pt3dadd(14.948,88.418,57.683,1.5)
  pt3dadd(14.724,91.447,58.696,0.5)
  pt3dadd(14.606,94.868,60.289,1.5)
  pt3dadd(13.033,101.556,63.387,0.5)
  pt3dadd(11.464,106.325,66.92,0.5)
  pt3dadd(10.934,110.141,69.831,0.5)
  pt3dadd(11.324,113.531,73.726,0.5)
  pt3dadd(9.072,118.648,77.795,0.5)
}
a6_112 connect a6_1121(0),1
a6_112 connect a6_1122(0),1
a6_11 connect a6_111(0),1
a6_11 connect a6_112(0),1
create a6_12
a6_12 {
  pt3dclear()
  pt3dadd(-1.878,29.485,13.622,2.5)
  pt3dadd(-4.598,29.959,13.579,0.5)
  pt3dadd(-5.38,32.838,14.795,1)
  pt3dadd(-6.962,38.524,16.199,1)
  pt3dadd(-9.215,41.707,17.908,1)
  pt3dadd(-13.08,45.637,22.209,0.5)
  pt3dadd(-13.639,48.38,22.397,0.25)
  pt3dadd(-15.4,50.502,23.439,0.75)
  pt3dadd(-18.954,51.724,26.277,1)
  pt3dadd(-22.499,55.883,28.855,1)
  pt3dadd(-23.745,58.961,31.099,1)
  pt3dadd(-28.061,62.172,34.242,1.5)
  pt3dadd(-31.135,65.185,36.645,1)
  pt3dadd(-34.779,68.006,39.498,0.5)
  pt3dadd(-39.174,70.923,40.048,1)
  pt3dadd(-41.929,74.165,40.728,1)
  pt3dadd(-45.601,77.848,43.219,1)
  pt3dadd(-46.824,81.01,44.971,0.25)
  pt3dadd(-50.051,82.489,47.36,1)
  pt3dadd(-56.075,85.124,51.85,0.5)
  pt3dadd(-59.549,85.68,55.34,1)
  pt3dadd(-60.528,86.857,57.527,1)
  pt3dadd(-66.766,91.588,62.363,0.5)
  pt3dadd(-69.588,94.579,64.521,0.5)
  pt3dadd(-75.265,97.54,69.589,1)
  pt3dadd(-76.075,101.28,70.443,0.5)
  pt3dadd(-75.602,104.977,71.094,0.5)
  pt3dadd(-77.966,106.779,69.009,0.5)
  pt3dadd(-80.961,107.192,69.704,0.5)
  pt3dadd(-82.957,107.472,69.661,0.5)
  pt3dadd(-84.592,109.095,70.37,0.5)
}
a6_1 connect a6_11(0),1
a6_1 connect a6_12(0),1
create soma
access soma
pt3dclear()
pt3dadd(0,0.1,0,10)
pt3dadd(0,0,10.4946,10)
// Soma as sphere: radius = 5


access soma
connect a1_1(0),1
connect a2_1(0),1
connect a3_1(0),1
connect a4_1(0),1
connect a5_1(0),1
connect a6_1(0),1
define_shape()
has_ais = 0
}

//  spine area adjustment.
//  
//  Stratford, K. and Mason, A. and Larkman, A. and Major, G. and Jack, J.J.B.
//  The modelling of pyramidal neurones in the visual cortex
//  in: The Computing Neuron
//  Addison-Wessley, London,1989
//
//  F=(area(shafts)+area(spines))/area(shaft)
//  orig. area:14237.052 (w/out soma)
//  nof spines assumed: 2000
//  spine area: 1mu^2
//  => F=1.1404785, F^(2/3)=1.0915863, F^(1/3)= 1.0447901
//  L=L*F^(2/3), diam=diam*F^(1/3)

proc adjust_for_spines(){
        a1_1 { L=34.390147 diam=1.819205}
        a1_11 { L=68.483703 diam=0.997934}
       // a1_111 { L=62.535396 diam=0.696510}
        a1_112 { L=61.669519 diam=0.632935}
        a1_12 { L=14.368626 diam=1.416220}
        a1_121 { L=8.177001 diam=1.641090}
        a1_1211 { L=133.240552 diam=0.666859}
        a1_1212 { L=148.813174 diam=0.847775}
        a1_122 { L=28.782990 diam=1.166198}
        a1_1221 { L=89.338622 diam=0.706548}
        a1_1222 { L=136.433770 diam=0.878420}
        a2_1 { L=17.100449 diam=2.195357}
        a2_11 { L=17.156943 diam=1.634364}
        a2_111 { L=149.477843 diam=0.833264}
        a2_112 { L=25.848190 diam=1.192623}
        a2_1121 { L=45.472266 diam=1.014417}
        a2_11211 { L=90.803134 diam=0.829245}
        a2_11212 { L=0.472587 diam=0.914191}
        a2_1122 { L=4.926266 diam=1.890565}
        a2_11221 { L=129.078262 diam=0.692439}
        a2_11222 { L=139.902779 diam=0.810705}
        a2_12 { L=22.292680 diam=1.699071}
        a2_121 { L=184.847341 diam=0.689598}
        a2_122 { L=9.074902 diam=1.465595}
        a2_1221 { L=165.525230 diam=0.811253}
        a2_1222 { L=155.351865 diam=0.632135}
        a3_1 { L=16.607333 diam=2.807134}
        a3_11 { L=9.980110 diam=2.921392}
        a3_111 { L=17.595634 diam=1.966757}
        a3_1111 { L=126.370449 diam=0.767816}
        a3_1112 { L=6.361833 diam=1.305988}
        a3_11121 { L=123.452911 diam=0.732198}
        a3_11122 { L=14.112429 diam=1.383416}
        a3_111221 { L=148.188587 diam=0.658382}
        a3_111222 { L=34.306294 diam=0.659052}
        a3_1112221 { L=79.704822 diam=0.565962}
        a3_1112222 { L=84.832306 diam=0.608136}
        a3_112 { L=60.696733 diam=0.772810}
        a3_1121 { L=154.393086 diam=0.788591}
        a3_1122 { L=142.068702 diam=0.771678}
        a3_12 { L=54.800488 diam=1.316529}
        a3_121 { L=158.006912 diam=1.154380}
        a3_122 { L=9.649263 diam=1.566729}
        a3_1221 { L=113.530285 diam=0.931563}
        a3_1222 { L=137.782564 diam=0.836840}
        a4_1 { L=14.832008 diam=1.281789}
        a4_11 { L=37.147109 diam=0.812587}
        a4_111 { L=129.399290 diam=0.707799}
        a4_112 { L=114.670626 diam=0.658302}
        a4_12 { L=148.454640 diam=0.538586}
        a5_1 { L=13.130268 diam=3.819342}
        a5_11 { L=13.320815 diam=2.073422}
        a5_111 { L=11.071810 diam=1.956908}
        a5_1111 { L=19.096291 diam=1.255808}
        a5_11111 { L=130.633861 diam=0.828932}
        a5_11112 { L=153.867169 diam=0.766397}
        a5_1112 { L=6.507576 diam=1.567185}
        a5_11121 { L=130.638751 diam=0.786940}
        a5_11122 { L=10.539854 diam=1.322201}
        a5_111221 { L=130.232168 diam=0.684420}
        a5_111222 { L=93.850676 diam=0.594004}
        a5_112 { L=11.536949 diam=1.997661}
        a5_1121 { L=34.661888 diam=0.966842}
        a5_11211 { L=112.201944 diam=0.783928}
        a5_11212 { L=35.139205 diam=1.154912}
        a5_112121 { L=33.968985 diam=0.531780}
        a5_112122 { L=111.568374 diam=0.830948}
        a5_1122 { L=138.183518 diam=0.712056}
        a5_12 { L=12.207728 diam=1.347562}
        a5_121 { L=23.727630 diam=0.954680}
        a5_1211 { L=145.285949 diam=0.869737}
        a5_1212 { L=149.127617 diam=0.811201}
        a5_122 { L=135.856439 diam=0.743729}
        a6_1 { L=26.654631 diam=1.398432}
        a6_11 { L=8.568921 diam=1.420386}
        a6_111 { L=137.065073 diam=0.830436}
        a6_112 { L=50.564019 diam=1.024597}
        a6_1121 { L=84.821278 diam=0.891053}
        a6_1122 { L=70.867878 diam=0.924500}
        a6_12 { L=153.180765 diam=0.849273}
}
proc init(){
	objref all,dends,segdends,ccsyn,tcsyn

	all=new SectionList()
	dends = new SectionList()
	segdends = new SectionList()
	ccsyn=new List()
	tcsyn=new List()
	ccnetcon=new List()
	tcnetcon=new List()
 	Isyn=new List()
	Inetcon=new List()
	//access axon
	//objref nil
	//fire=new NetCon(&v(.5),nil)
	m1()
	m2()
	m3()
	m4()
	m5()
	access a2_11221 {segdends.append()}
	access a3_121 {segdends.append()}
	access a2_1221 {segdends.append()}
	//access a6_12 {segdends.append()}
	//access a1_1222 {segdends.append()}
	access soma
	distance()
	forall{
		dends.append()
		if (distance(0)>10){all.append()}
		for i=0,n3d()-1{
			pt3dchange(i,x3d(i)+$1,y3d(i)+$2,z3d(i),diam3d(i))	
		}
		
		nseg=3
		insert pas
		e_pas=-60
		g_pas=1/30000//1/16000
		cm=1.5
		Ra=70
	}
	soma dends.remove()
	
	forsec dends{diam=diam/1.2}
	objref apcounter,apvec,nil
	apvec=new Vector()
	access soma
	apcounter=new NetCon(&v(.5), nil)
	apcounter.threshold = -20 
	apcounter.record(apvec)
}

endtemplate l4



Loading data, please wait...