// POV-Ray scene description file illustrating gear coupling
// Released into public domain
// Author: Petteri Aimonen <jpa at wp.mail.kapsi.fi>
// Date: 2009-09-03

#declare Core  = 
texture {
    pigment { rgb <0.45, 0.5, 0.45> }
    finish {
        phong 1
        crand 0.02
    }
}

#declare Axle  = 
texture {
    pigment { rgb <0.5, 0.5, 0.4> }
    finish {
        phong 1
        crand 0.02
    }
}

#declare gear = prism {
    linear_sweep
            bezier_spline
            1.0, //top
            0.0, //bottom
            768 //nr points
    /*   0*/ <0.92187077, 0.53395353>, <0.92187077, 0.53395353>, <0.93246432, 0.53480933>, <0.93246432, 0.53480933>,
    /*   1*/ <0.93246432, 0.53480933>, <0.93246432, 0.53480933>, <0.96072506, 0.53018221>, <0.96072506, 0.53018221>,
    /*   2*/ <0.96072506, 0.53018221>, <0.96072506, 0.53018221>, <1.00000000, 0.51374794>, <1.00000000, 0.51374794>,
    /*   3*/ <1.00000000, 0.51374794>, <1.00000000, 0.51374794>, <1.00000000, 0.48621729>, <1.00000000, 0.48621729>,
    /*   4*/ <1.00000000, 0.48621729>, <1.00000000, 0.48621729>, <0.96072506, 0.46978303>, <0.96072506, 0.46978303>,
    /*   5*/ <0.96072506, 0.46978303>, <0.96072506, 0.46978303>, <0.93246432, 0.46515590>, <0.93246432, 0.46515590>,
    /*   6*/ <0.93246432, 0.46515590>, <0.93246432, 0.46515590>, <0.92187077, 0.46601170>, <0.92187077, 0.46601170>,
    /*   7*/ <0.92187077, 0.46601170>, <0.92187077, 0.46601170>, <0.91628631, 0.42360850>, <0.91628631, 0.42360850>,
    /*   8*/ <0.91628631, 0.42360850>, <0.91628631, 0.42360850>, <0.92674448, 0.42168900>, <0.92674448, 0.42168900>,
    /*   9*/ <0.92674448, 0.42168900>, <0.92674448, 0.42168900>, <0.95283913, 0.40990603>, <0.95283913, 0.40990603>,
    /*  10*/ <0.95283913, 0.40990603>, <0.95283913, 0.40990603>, <0.98652477, 0.38386940>, <0.98652477, 0.38386940>,
    /*  11*/ <0.98652477, 0.38386940>, <0.98652477, 0.38386940>, <0.97939794, 0.35727674>, <0.97939794, 0.35727674>,
    /*  12*/ <0.97939794, 0.35727674>, <0.97939794, 0.35727674>, <0.93720748, 0.35157141>, <0.93720748, 0.35157141>,
    /*  13*/ <0.93720748, 0.35157141>, <0.93720748, 0.35157141>, <0.90871949, 0.35441441>, <0.90871949, 0.35441441>,
    /*  14*/ <0.90871949, 0.35441441>, <0.90871949, 0.35441441>, <0.89870131, 0.35797782>, <0.89870131, 0.35797782>,
    /*  15*/ <0.89870131, 0.35797782>, <0.89870131, 0.35797782>, <0.88233474, 0.31847080>, <0.88233474, 0.31847080>,
    /*  16*/ <0.88233474, 0.31847080>, <0.88233474, 0.31847080>, <0.89194194, 0.31391137>, <0.89194194, 0.31391137>,
    /*  17*/ <0.89194194, 0.31391137>, <0.89194194, 0.31391137>, <0.91409604, 0.29577518>, <0.91409604, 0.29577518>,
    /*  18*/ <0.91409604, 0.29577518>, <0.91409604, 0.29577518>, <0.93989092, 0.26190580>, <0.93989092, 0.26190580>,
    /*  19*/ <0.93989092, 0.26190580>, <0.93989092, 0.26190580>, <0.92613043, 0.23806427>, <0.92613043, 0.23806427>,
    /*  20*/ <0.92613043, 0.23806427>, <0.92613043, 0.23806427>, <0.88389645, 0.24346983>, <0.88389645, 0.24346983>,
    /*  21*/ <0.88389645, 0.24346983>, <0.88389645, 0.24346983>, <0.85711523, 0.25358955>, <0.85711523, 0.25358955>,
    /*  22*/ <0.85711523, 0.25358955>, <0.85711523, 0.25358955>, <0.84836383, 0.25962850>, <0.84836383, 0.25962850>,
    /*  23*/ <0.84836383, 0.25962850>, <0.84836383, 0.25962850>, <0.82232719, 0.22569627>, <0.82232719, 0.22569627>,
    /*  24*/ <0.82232719, 0.22569627>, <0.82232719, 0.22569627>, <0.83042587, 0.21880635>, <0.83042587, 0.21880635>,
    /*  25*/ <0.83042587, 0.21880635>, <0.83042587, 0.21880635>, <0.84713089, 0.19555470>, <0.84713089, 0.19555470>,
    /*  26*/ <0.84713089, 0.19555470>, <0.84713089, 0.19555470>, <0.86328472, 0.15616372>, <0.86328472, 0.15616372>,
    /*  27*/ <0.86328472, 0.15616372>, <0.86328472, 0.15616372>, <0.84381890, 0.13669789>, <0.84381890, 0.13669789>,
    /*  28*/ <0.84381890, 0.13669789>, <0.84381890, 0.13669789>, <0.80442792, 0.15285172>, <0.80442792, 0.15285172>,
    /*  29*/ <0.80442792, 0.15285172>, <0.80442792, 0.15285172>, <0.78117626, 0.16955675>, <0.78117626, 0.16955675>,
    /*  30*/ <0.78117626, 0.16955675>, <0.78117626, 0.16955675>, <0.77428635, 0.17765542>, <0.77428635, 0.17765542>,
    /*  31*/ <0.77428635, 0.17765542>, <0.77428635, 0.17765542>, <0.74035412, 0.15161879>, <0.74035412, 0.15161879>,
    /*  32*/ <0.74035412, 0.15161879>, <0.74035412, 0.15161879>, <0.74639307, 0.14286739>, <0.74639307, 0.14286739>,
    /*  33*/ <0.74639307, 0.14286739>, <0.74639307, 0.14286739>, <0.75651278, 0.11608617>, <0.75651278, 0.11608617>,
    /*  34*/ <0.75651278, 0.11608617>, <0.75651278, 0.11608617>, <0.76191835, 0.07385219>, <0.76191835, 0.07385219>,
    /*  35*/ <0.76191835, 0.07385219>, <0.76191835, 0.07385219>, <0.73807682, 0.06009170>, <0.73807682, 0.06009170>,
    /*  36*/ <0.73807682, 0.06009170>, <0.73807682, 0.06009170>, <0.70420744, 0.08588658>, <0.70420744, 0.08588658>,
    /*  37*/ <0.70420744, 0.08588658>, <0.70420744, 0.08588658>, <0.68607125, 0.10804068>, <0.68607125, 0.10804068>,
    /*  38*/ <0.68607125, 0.10804068>, <0.68607125, 0.10804068>, <0.68151182, 0.11764788>, <0.68151182, 0.11764788>,
    /*  39*/ <0.68151182, 0.11764788>, <0.68151182, 0.11764788>, <0.64200480, 0.10128131>, <0.64200480, 0.10128131>,
    /*  40*/ <0.64200480, 0.10128131>, <0.64200480, 0.10128131>, <0.64556821, 0.09126313>, <0.64556821, 0.09126313>,
    /*  41*/ <0.64556821, 0.09126313>, <0.64556821, 0.09126313>, <0.64841121, 0.06277514>, <0.64841121, 0.06277514>,
    /*  42*/ <0.64841121, 0.06277514>, <0.64841121, 0.06277514>, <0.64270588, 0.02058468>, <0.64270588, 0.02058468>,
    /*  43*/ <0.64270588, 0.02058468>, <0.64270588, 0.02058468>, <0.61611322, 0.01345784>, <0.61611322, 0.01345784>,
    /*  44*/ <0.61611322, 0.01345784>, <0.61611322, 0.01345784>, <0.59007659, 0.04714349>, <0.59007659, 0.04714349>,
    /*  45*/ <0.59007659, 0.04714349>, <0.59007659, 0.04714349>, <0.57829362, 0.07323814>, <0.57829362, 0.07323814>,
    /*  46*/ <0.57829362, 0.07323814>, <0.57829362, 0.07323814>, <0.57637411, 0.08369631>, <0.57637411, 0.08369631>,
    /*  47*/ <0.57637411, 0.08369631>, <0.57637411, 0.08369631>, <0.53397091, 0.07811185>, <0.53397091, 0.07811185>,
    /*  48*/ <0.53397091, 0.07811185>, <0.53397091, 0.07811185>, <0.53482671, 0.06751830>, <0.53482671, 0.06751830>,
    /*  49*/ <0.53482671, 0.06751830>, <0.53482671, 0.06751830>, <0.53019959, 0.03925756>, <0.53019959, 0.03925756>,
    /*  50*/ <0.53019959, 0.03925756>, <0.53019959, 0.03925756>, <0.51376533, -0.00001738>, <0.51376533, -0.00001738>,
    /*  51*/ <0.51376533, -0.00001738>, <0.51376533, -0.00001738>, <0.48623467, -0.00001738>, <0.48623467, -0.00001738>,
    /*  52*/ <0.48623467, -0.00001738>, <0.48623467, -0.00001738>, <0.46980041, 0.03925756>, <0.46980041, 0.03925756>,
    /*  53*/ <0.46980041, 0.03925756>, <0.46980041, 0.03925756>, <0.46517329, 0.06751830>, <0.46517329, 0.06751830>,
    /*  54*/ <0.46517329, 0.06751830>, <0.46517329, 0.06751830>, <0.46602909, 0.07811185>, <0.46602909, 0.07811185>,
    /*  55*/ <0.46602909, 0.07811185>, <0.46602909, 0.07811185>, <0.42362589, 0.08369631>, <0.42362589, 0.08369631>,
    /*  56*/ <0.42362589, 0.08369631>, <0.42362589, 0.08369631>, <0.42170638, 0.07323814>, <0.42170638, 0.07323814>,
    /*  57*/ <0.42170638, 0.07323814>, <0.42170638, 0.07323814>, <0.40992341, 0.04714349>, <0.40992341, 0.04714349>,
    /*  58*/ <0.40992341, 0.04714349>, <0.40992341, 0.04714349>, <0.38388678, 0.01345784>, <0.38388678, 0.01345784>,
    /*  59*/ <0.38388678, 0.01345784>, <0.38388678, 0.01345784>, <0.35729412, 0.02058468>, <0.35729412, 0.02058468>,
    /*  60*/ <0.35729412, 0.02058468>, <0.35729412, 0.02058468>, <0.35158879, 0.06277514>, <0.35158879, 0.06277514>,
    /*  61*/ <0.35158879, 0.06277514>, <0.35158879, 0.06277514>, <0.35443179, 0.09126313>, <0.35443179, 0.09126313>,
    /*  62*/ <0.35443179, 0.09126313>, <0.35443179, 0.09126313>, <0.35799520, 0.10128131>, <0.35799520, 0.10128131>,
    /*  63*/ <0.35799520, 0.10128131>, <0.35799520, 0.10128131>, <0.31848818, 0.11764788>, <0.31848818, 0.11764788>,
    /*  64*/ <0.31848818, 0.11764788>, <0.31848818, 0.11764788>, <0.31392875, 0.10804068>, <0.31392875, 0.10804068>,
    /*  65*/ <0.31392875, 0.10804068>, <0.31392875, 0.10804068>, <0.29579256, 0.08588658>, <0.29579256, 0.08588658>,
    /*  66*/ <0.29579256, 0.08588658>, <0.29579256, 0.08588658>, <0.26192318, 0.06009170>, <0.26192318, 0.06009170>,
    /*  67*/ <0.26192318, 0.06009170>, <0.26192318, 0.06009170>, <0.23808165, 0.07385219>, <0.23808165, 0.07385219>,
    /*  68*/ <0.23808165, 0.07385219>, <0.23808165, 0.07385219>, <0.24348722, 0.11608617>, <0.24348722, 0.11608617>,
    /*  69*/ <0.24348722, 0.11608617>, <0.24348722, 0.11608617>, <0.25360693, 0.14286739>, <0.25360693, 0.14286739>,
    /*  70*/ <0.25360693, 0.14286739>, <0.25360693, 0.14286739>, <0.25964588, 0.15161879>, <0.25964588, 0.15161879>,
    /*  71*/ <0.25964588, 0.15161879>, <0.25964588, 0.15161879>, <0.22571365, 0.17765542>, <0.22571365, 0.17765542>,
    /*  72*/ <0.22571365, 0.17765542>, <0.22571365, 0.17765542>, <0.21882374, 0.16955675>, <0.21882374, 0.16955675>,
    /*  73*/ <0.21882374, 0.16955675>, <0.21882374, 0.16955675>, <0.19557208, 0.15285172>, <0.19557208, 0.15285172>,
    /*  74*/ <0.19557208, 0.15285172>, <0.19557208, 0.15285172>, <0.15618110, 0.13669789>, <0.15618110, 0.13669789>,
    /*  75*/ <0.15618110, 0.13669789>, <0.15618110, 0.13669789>, <0.13671528, 0.15616372>, <0.13671528, 0.15616372>,
    /*  76*/ <0.13671528, 0.15616372>, <0.13671528, 0.15616372>, <0.15286911, 0.19555470>, <0.15286911, 0.19555470>,
    /*  77*/ <0.15286911, 0.19555470>, <0.15286911, 0.19555470>, <0.16957413, 0.21880635>, <0.16957413, 0.21880635>,
    /*  78*/ <0.16957413, 0.21880635>, <0.16957413, 0.21880635>, <0.17767281, 0.22569627>, <0.17767281, 0.22569627>,
    /*  79*/ <0.17767281, 0.22569627>, <0.17767281, 0.22569627>, <0.15163617, 0.25962850>, <0.15163617, 0.25962850>,
    /*  80*/ <0.15163617, 0.25962850>, <0.15163617, 0.25962850>, <0.14288477, 0.25358955>, <0.14288477, 0.25358955>,
    /*  81*/ <0.14288477, 0.25358955>, <0.14288477, 0.25358955>, <0.11610355, 0.24346983>, <0.11610355, 0.24346983>,
    /*  82*/ <0.11610355, 0.24346983>, <0.11610355, 0.24346983>, <0.07386957, 0.23806427>, <0.07386957, 0.23806427>,
    /*  83*/ <0.07386957, 0.23806427>, <0.07386957, 0.23806427>, <0.06010908, 0.26190580>, <0.06010908, 0.26190580>,
    /*  84*/ <0.06010908, 0.26190580>, <0.06010908, 0.26190580>, <0.08590396, 0.29577518>, <0.08590396, 0.29577518>,
    /*  85*/ <0.08590396, 0.29577518>, <0.08590396, 0.29577518>, <0.10805806, 0.31391137>, <0.10805806, 0.31391137>,
    /*  86*/ <0.10805806, 0.31391137>, <0.10805806, 0.31391137>, <0.11766526, 0.31847080>, <0.11766526, 0.31847080>,
    /*  87*/ <0.11766526, 0.31847080>, <0.11766526, 0.31847080>, <0.10129869, 0.35797782>, <0.10129869, 0.35797782>,
    /*  88*/ <0.10129869, 0.35797782>, <0.10129869, 0.35797782>, <0.09128051, 0.35441441>, <0.09128051, 0.35441441>,
    /*  89*/ <0.09128051, 0.35441441>, <0.09128051, 0.35441441>, <0.06279252, 0.35157141>, <0.06279252, 0.35157141>,
    /*  90*/ <0.06279252, 0.35157141>, <0.06279252, 0.35157141>, <0.02060206, 0.35727674>, <0.02060206, 0.35727674>,
    /*  91*/ <0.02060206, 0.35727674>, <0.02060206, 0.35727674>, <0.01347523, 0.38386940>, <0.01347523, 0.38386940>,
    /*  92*/ <0.01347523, 0.38386940>, <0.01347523, 0.38386940>, <0.04716087, 0.40990603>, <0.04716087, 0.40990603>,
    /*  93*/ <0.04716087, 0.40990603>, <0.04716087, 0.40990603>, <0.07325552, 0.42168900>, <0.07325552, 0.42168900>,
    /*  94*/ <0.07325552, 0.42168900>, <0.07325552, 0.42168900>, <0.08371369, 0.42360850>, <0.08371369, 0.42360850>,
    /*  95*/ <0.08371369, 0.42360850>, <0.08371369, 0.42360850>, <0.07812923, 0.46601170>, <0.07812923, 0.46601170>,
    /*  96*/ <0.07812923, 0.46601170>, <0.07812923, 0.46601170>, <0.06753568, 0.46515590>, <0.06753568, 0.46515590>,
    /*  97*/ <0.06753568, 0.46515590>, <0.06753568, 0.46515590>, <0.03927494, 0.46978303>, <0.03927494, 0.46978303>,
    /*  98*/ <0.03927494, 0.46978303>, <0.03927494, 0.46978303>, <0.00000000, 0.48621729>, <0.00000000, 0.48621729>,
    /*  99*/ <0.00000000, 0.48621729>, <0.00000000, 0.48621729>, <0.00000000, 0.51374794>, <0.00000000, 0.51374794>,
    /* 100*/ <0.00000000, 0.51374794>, <0.00000000, 0.51374794>, <0.03927494, 0.53018221>, <0.03927494, 0.53018221>,
    /* 101*/ <0.03927494, 0.53018221>, <0.03927494, 0.53018221>, <0.06753568, 0.53480933>, <0.06753568, 0.53480933>,
    /* 102*/ <0.06753568, 0.53480933>, <0.06753568, 0.53480933>, <0.07812923, 0.53395353>, <0.07812923, 0.53395353>,
    /* 103*/ <0.07812923, 0.53395353>, <0.07812923, 0.53395353>, <0.08371369, 0.57635673>, <0.08371369, 0.57635673>,
    /* 104*/ <0.08371369, 0.57635673>, <0.08371369, 0.57635673>, <0.07325552, 0.57827624>, <0.07325552, 0.57827624>,
    /* 105*/ <0.07325552, 0.57827624>, <0.07325552, 0.57827624>, <0.04716087, 0.59005920>, <0.04716087, 0.59005920>,
    /* 106*/ <0.04716087, 0.59005920>, <0.04716087, 0.59005920>, <0.01347523, 0.61609583>, <0.01347523, 0.61609583>,
    /* 107*/ <0.01347523, 0.61609583>, <0.01347523, 0.61609583>, <0.02060206, 0.64268849>, <0.02060206, 0.64268849>,
    /* 108*/ <0.02060206, 0.64268849>, <0.02060206, 0.64268849>, <0.06279252, 0.64839383>, <0.06279252, 0.64839383>,
    /* 109*/ <0.06279252, 0.64839383>, <0.06279252, 0.64839383>, <0.09128051, 0.64555083>, <0.09128051, 0.64555083>,
    /* 110*/ <0.09128051, 0.64555083>, <0.09128051, 0.64555083>, <0.10129869, 0.64198741>, <0.10129869, 0.64198741>,
    /* 111*/ <0.10129869, 0.64198741>, <0.10129869, 0.64198741>, <0.11766526, 0.68149443>, <0.11766526, 0.68149443>,
    /* 112*/ <0.11766526, 0.68149443>, <0.11766526, 0.68149443>, <0.10805806, 0.68605387>, <0.10805806, 0.68605387>,
    /* 113*/ <0.10805806, 0.68605387>, <0.10805806, 0.68605387>, <0.08590396, 0.70419006>, <0.08590396, 0.70419006>,
    /* 114*/ <0.08590396, 0.70419006>, <0.08590396, 0.70419006>, <0.06010908, 0.73805944>, <0.06010908, 0.73805944>,
    /* 115*/ <0.06010908, 0.73805944>, <0.06010908, 0.73805944>, <0.07386957, 0.76190096>, <0.07386957, 0.76190096>,
    /* 116*/ <0.07386957, 0.76190096>, <0.07386957, 0.76190096>, <0.11610355, 0.75649540>, <0.11610355, 0.75649540>,
    /* 117*/ <0.11610355, 0.75649540>, <0.11610355, 0.75649540>, <0.14288477, 0.74637568>, <0.14288477, 0.74637568>,
    /* 118*/ <0.14288477, 0.74637568>, <0.14288477, 0.74637568>, <0.15163617, 0.74033673>, <0.15163617, 0.74033673>,
    /* 119*/ <0.15163617, 0.74033673>, <0.15163617, 0.74033673>, <0.17767281, 0.77426897>, <0.17767281, 0.77426897>,
    /* 120*/ <0.17767281, 0.77426897>, <0.17767281, 0.77426897>, <0.16957413, 0.78115888>, <0.16957413, 0.78115888>,
    /* 121*/ <0.16957413, 0.78115888>, <0.16957413, 0.78115888>, <0.15286911, 0.80441054>, <0.15286911, 0.80441054>,
    /* 122*/ <0.15286911, 0.80441054>, <0.15286911, 0.80441054>, <0.13671528, 0.84380152>, <0.13671528, 0.84380152>,
    /* 123*/ <0.13671528, 0.84380152>, <0.13671528, 0.84380152>, <0.15618110, 0.86326734>, <0.15618110, 0.86326734>,
    /* 124*/ <0.15618110, 0.86326734>, <0.15618110, 0.86326734>, <0.19557208, 0.84711351>, <0.19557208, 0.84711351>,
    /* 125*/ <0.19557208, 0.84711351>, <0.19557208, 0.84711351>, <0.21882374, 0.83040849>, <0.21882374, 0.83040849>,
    /* 126*/ <0.21882374, 0.83040849>, <0.21882374, 0.83040849>, <0.22571365, 0.82230981>, <0.22571365, 0.82230981>,
    /* 127*/ <0.22571365, 0.82230981>, <0.22571365, 0.82230981>, <0.25964588, 0.84834644>, <0.25964588, 0.84834644>,
    /* 128*/ <0.25964588, 0.84834644>, <0.25964588, 0.84834644>, <0.25360693, 0.85709784>, <0.25360693, 0.85709784>,
    /* 129*/ <0.25360693, 0.85709784>, <0.25360693, 0.85709784>, <0.24348722, 0.88387907>, <0.24348722, 0.88387907>,
    /* 130*/ <0.24348722, 0.88387907>, <0.24348722, 0.88387907>, <0.23808165, 0.92611305>, <0.23808165, 0.92611305>,
    /* 131*/ <0.23808165, 0.92611305>, <0.23808165, 0.92611305>, <0.26192318, 0.93987354>, <0.26192318, 0.93987354>,
    /* 132*/ <0.26192318, 0.93987354>, <0.26192318, 0.93987354>, <0.29579256, 0.91407866>, <0.29579256, 0.91407866>,
    /* 133*/ <0.29579256, 0.91407866>, <0.29579256, 0.91407866>, <0.31392875, 0.89192456>, <0.31392875, 0.89192456>,
    /* 134*/ <0.31392875, 0.89192456>, <0.31392875, 0.89192456>, <0.31848818, 0.88231735>, <0.31848818, 0.88231735>,
    /* 135*/ <0.31848818, 0.88231735>, <0.31848818, 0.88231735>, <0.35799520, 0.89868393>, <0.35799520, 0.89868393>,
    /* 136*/ <0.35799520, 0.89868393>, <0.35799520, 0.89868393>, <0.35443179, 0.90870211>, <0.35443179, 0.90870211>,
    /* 137*/ <0.35443179, 0.90870211>, <0.35443179, 0.90870211>, <0.35158879, 0.93719010>, <0.35158879, 0.93719010>,
    /* 138*/ <0.35158879, 0.93719010>, <0.35158879, 0.93719010>, <0.35729412, 0.97938056>, <0.35729412, 0.97938056>,
    /* 139*/ <0.35729412, 0.97938056>, <0.35729412, 0.97938056>, <0.38388678, 0.98650739>, <0.38388678, 0.98650739>,
    /* 140*/ <0.38388678, 0.98650739>, <0.38388678, 0.98650739>, <0.40992341, 0.95282174>, <0.40992341, 0.95282174>,
    /* 141*/ <0.40992341, 0.95282174>, <0.40992341, 0.95282174>, <0.42170638, 0.92672709>, <0.42170638, 0.92672709>,
    /* 142*/ <0.42170638, 0.92672709>, <0.42170638, 0.92672709>, <0.42362589, 0.91626893>, <0.42362589, 0.91626893>,
    /* 143*/ <0.42362589, 0.91626893>, <0.42362589, 0.91626893>, <0.46602909, 0.92185339>, <0.46602909, 0.92185339>,
    /* 144*/ <0.46602909, 0.92185339>, <0.46602909, 0.92185339>, <0.46517329, 0.93244693>, <0.46517329, 0.93244693>,
    /* 145*/ <0.46517329, 0.93244693>, <0.46517329, 0.93244693>, <0.46980041, 0.96070768>, <0.46980041, 0.96070768>,
    /* 146*/ <0.46980041, 0.96070768>, <0.46980041, 0.96070768>, <0.48623467, 0.99998262>, <0.48623467, 0.99998262>,
    /* 147*/ <0.48623467, 0.99998262>, <0.48623467, 0.99998262>, <0.51376533, 0.99998262>, <0.51376533, 0.99998262>,
    /* 148*/ <0.51376533, 0.99998262>, <0.51376533, 0.99998262>, <0.53019959, 0.96070768>, <0.53019959, 0.96070768>,
    /* 149*/ <0.53019959, 0.96070768>, <0.53019959, 0.96070768>, <0.53482671, 0.93244693>, <0.53482671, 0.93244693>,
    /* 150*/ <0.53482671, 0.93244693>, <0.53482671, 0.93244693>, <0.53397091, 0.92185339>, <0.53397091, 0.92185339>,
    /* 151*/ <0.53397091, 0.92185339>, <0.53397091, 0.92185339>, <0.57637411, 0.91626893>, <0.57637411, 0.91626893>,
    /* 152*/ <0.57637411, 0.91626893>, <0.57637411, 0.91626893>, <0.57829362, 0.92672709>, <0.57829362, 0.92672709>,
    /* 153*/ <0.57829362, 0.92672709>, <0.57829362, 0.92672709>, <0.59007659, 0.95282174>, <0.59007659, 0.95282174>,
    /* 154*/ <0.59007659, 0.95282174>, <0.59007659, 0.95282174>, <0.61611322, 0.98650739>, <0.61611322, 0.98650739>,
    /* 155*/ <0.61611322, 0.98650739>, <0.61611322, 0.98650739>, <0.64270588, 0.97938056>, <0.64270588, 0.97938056>,
    /* 156*/ <0.64270588, 0.97938056>, <0.64270588, 0.97938056>, <0.64841121, 0.93719010>, <0.64841121, 0.93719010>,
    /* 157*/ <0.64841121, 0.93719010>, <0.64841121, 0.93719010>, <0.64556821, 0.90870211>, <0.64556821, 0.90870211>,
    /* 158*/ <0.64556821, 0.90870211>, <0.64556821, 0.90870211>, <0.64200480, 0.89868393>, <0.64200480, 0.89868393>,
    /* 159*/ <0.64200480, 0.89868393>, <0.64200480, 0.89868393>, <0.68151182, 0.88231735>, <0.68151182, 0.88231735>,
    /* 160*/ <0.68151182, 0.88231735>, <0.68151182, 0.88231735>, <0.68607125, 0.89192456>, <0.68607125, 0.89192456>,
    /* 161*/ <0.68607125, 0.89192456>, <0.68607125, 0.89192456>, <0.70420744, 0.91407866>, <0.70420744, 0.91407866>,
    /* 162*/ <0.70420744, 0.91407866>, <0.70420744, 0.91407866>, <0.73807682, 0.93987354>, <0.73807682, 0.93987354>,
    /* 163*/ <0.73807682, 0.93987354>, <0.73807682, 0.93987354>, <0.76191835, 0.92611305>, <0.76191835, 0.92611305>,
    /* 164*/ <0.76191835, 0.92611305>, <0.76191835, 0.92611305>, <0.75651278, 0.88387907>, <0.75651278, 0.88387907>,
    /* 165*/ <0.75651278, 0.88387907>, <0.75651278, 0.88387907>, <0.74639307, 0.85709784>, <0.74639307, 0.85709784>,
    /* 166*/ <0.74639307, 0.85709784>, <0.74639307, 0.85709784>, <0.74035412, 0.84834644>, <0.74035412, 0.84834644>,
    /* 167*/ <0.74035412, 0.84834644>, <0.74035412, 0.84834644>, <0.77428635, 0.82230981>, <0.77428635, 0.82230981>,
    /* 168*/ <0.77428635, 0.82230981>, <0.77428635, 0.82230981>, <0.78117626, 0.83040849>, <0.78117626, 0.83040849>,
    /* 169*/ <0.78117626, 0.83040849>, <0.78117626, 0.83040849>, <0.80442792, 0.84711351>, <0.80442792, 0.84711351>,
    /* 170*/ <0.80442792, 0.84711351>, <0.80442792, 0.84711351>, <0.84381890, 0.86326734>, <0.84381890, 0.86326734>,
    /* 171*/ <0.84381890, 0.86326734>, <0.84381890, 0.86326734>, <0.86328472, 0.84380152>, <0.86328472, 0.84380152>,
    /* 172*/ <0.86328472, 0.84380152>, <0.86328472, 0.84380152>, <0.84713089, 0.80441054>, <0.84713089, 0.80441054>,
    /* 173*/ <0.84713089, 0.80441054>, <0.84713089, 0.80441054>, <0.83042587, 0.78115888>, <0.83042587, 0.78115888>,
    /* 174*/ <0.83042587, 0.78115888>, <0.83042587, 0.78115888>, <0.82232719, 0.77426897>, <0.82232719, 0.77426897>,
    /* 175*/ <0.82232719, 0.77426897>, <0.82232719, 0.77426897>, <0.84836383, 0.74033673>, <0.84836383, 0.74033673>,
    /* 176*/ <0.84836383, 0.74033673>, <0.84836383, 0.74033673>, <0.85711523, 0.74637568>, <0.85711523, 0.74637568>,
    /* 177*/ <0.85711523, 0.74637568>, <0.85711523, 0.74637568>, <0.88389645, 0.75649540>, <0.88389645, 0.75649540>,
    /* 178*/ <0.88389645, 0.75649540>, <0.88389645, 0.75649540>, <0.92613043, 0.76190096>, <0.92613043, 0.76190096>,
    /* 179*/ <0.92613043, 0.76190096>, <0.92613043, 0.76190096>, <0.93989092, 0.73805944>, <0.93989092, 0.73805944>,
    /* 180*/ <0.93989092, 0.73805944>, <0.93989092, 0.73805944>, <0.91409604, 0.70419006>, <0.91409604, 0.70419006>,
    /* 181*/ <0.91409604, 0.70419006>, <0.91409604, 0.70419006>, <0.89194194, 0.68605387>, <0.89194194, 0.68605387>,
    /* 182*/ <0.89194194, 0.68605387>, <0.89194194, 0.68605387>, <0.88233474, 0.68149443>, <0.88233474, 0.68149443>,
    /* 183*/ <0.88233474, 0.68149443>, <0.88233474, 0.68149443>, <0.89870131, 0.64198741>, <0.89870131, 0.64198741>,
    /* 184*/ <0.89870131, 0.64198741>, <0.89870131, 0.64198741>, <0.90871949, 0.64555083>, <0.90871949, 0.64555083>,
    /* 185*/ <0.90871949, 0.64555083>, <0.90871949, 0.64555083>, <0.93720748, 0.64839383>, <0.93720748, 0.64839383>,
    /* 186*/ <0.93720748, 0.64839383>, <0.93720748, 0.64839383>, <0.97939794, 0.64268849>, <0.97939794, 0.64268849>,
    /* 187*/ <0.97939794, 0.64268849>, <0.97939794, 0.64268849>, <0.98652477, 0.61609583>, <0.98652477, 0.61609583>,
    /* 188*/ <0.98652477, 0.61609583>, <0.98652477, 0.61609583>, <0.95283913, 0.59005920>, <0.95283913, 0.59005920>,
    /* 189*/ <0.95283913, 0.59005920>, <0.95283913, 0.59005920>, <0.92674448, 0.57827624>, <0.92674448, 0.57827624>,
    /* 190*/ <0.92674448, 0.57827624>, <0.92674448, 0.57827624>, <0.91628631, 0.57635673>, <0.91628631, 0.57635673>,
    /* 191*/ <0.91628631, 0.57635673>, <0.91628631, 0.57635673>, <0.92187077, 0.53395353>, <0.92187077, 0.53395353>
    
    translate <-0.5, 0, -0.5>
    scale <2, 1, 2>
}

#declare core_oneside =
difference {
    union {
        // Main cylinder (with beveled ends)
        lathe {
            linear_spline
            6,
            <0, 0>, <0.95, 0>, <1, 0.05>, <1, 1.45>, <0.95, 1.5>, <0, 1.5>
        }
        
        // Flange
        cylinder {
            <0, 0, 0>, <0, 0.15, 0>, 1.5
        }
    }
    union {
        // Inner gear
        object {
            gear
            scale <0.9, 1.5, 0.9>
            translate <0, -0.2, 0>
        }
        
        // Axle hole
        cylinder {
            <0, -0.1, 0>, <0, 1.6, 0>, 0.7
        }
        
        // Flange holes
        cylinder {
            <1.25, -0.1, 0>, <1.25, 0.3, 0>, 0.15
        }
        cylinder {
            <1.25, -0.1, 0>, <1.25, 0.3, 0>, 0.15
            rotate <0, 60, 0>
        }
        cylinder {
            <1.25, -0.1, 0>, <1.25, 0.3, 0>, 0.15
            rotate <0, 120, 0>
        }
        cylinder {
            <1.25, -0.1, 0>, <1.25, 0.3, 0>, 0.15
            rotate <0, 180, 0>
        }
        cylinder {
            <1.25, -0.1, 0>, <1.25, 0.3, 0>, 0.15
            rotate <0, -60, 0>
        }
        cylinder {
            <1.25, -0.1, 0>, <1.25, 0.3, 0>, 0.15
            rotate <0, -120, 0>
        }
    }
}

#declare axle_oneside =
union {
    union {
        // Large cylinder (with beveled ends)
        lathe {
            linear_spline
            6,
            <0, 0>, <0.55, 0>, <0.6, 0.05>, <0.6, 1.45>, <0.55, 1.5>, <0, 1.5>
        }
        
        intersection {
            object {
                gear
                scale <0.8, 0.5, 0.8>
            }
            sphere {
                <0, 0.25, 0>, 0.8
            }
            
            translate <0, 0.1, 0>
        }
    }
    cylinder {
        <0, 0.1, 0>, <0, 15, 0>, 0.3
    }
}

union {
    difference {
        object { core_oneside }
        
        // Cutaway
        box {
            <0, -0.001, 0>, <5, 5, 5>
        }
        
        texture {Core}
    }
    
    difference {
        object {
            core_oneside
            rotate <180, 0, 0>
            translate <0, -0.05, 0>
        }
        
        box {
            <0, 0.001, 0>, <5, -0.4, 5>
        }
        
        texture {Core}
    }
    
    object {
        axle_oneside
        translate <0, 0.15, 0>
        
        texture {Axle}
    }
    object {
        axle_oneside
        rotate <180, 0, 0>
        translate <0, -0.15, 0>
        
        texture {Axle}
    }
    
    rotate <90, 0, 90>
}

camera {
    location <3, 1.5, 1>
    look_at <0, 0, 0>
}

light_source {
    <10, 3, 10>
    color rgb <1, 1, 1>
    area_light
    <0, 0, 1> <0, 1, 0> 4 4
    adaptive 2
}

light_source {
    <8, 3, -8>
    color rgb <1, 1, 1>
    shadowless
}

light_source {
    <2, 10, 1>
    color rgb <1, 1, 1>
    shadowless
}