File:Blue 7 5 Knot Animated.gif

#include "colors.inc"

background { color White }

global_settings { assumed_gamma 1.0}

camera
  {
  location <0, 0, -25>
  right <1,0,0> up <0,1,0>
  look_at  <0, 0, 0>
  angle 5
  }

light_source
  {
  <0, 20, -50>
  color White
  area_light <5, 0, 0>, <0, 5, 0>, 10, 10  /* very slow, decrease 10 to 2 for experiments */
  adaptive 3
  }

#declare r_tube = 0.07;  // thickness (radius) of tube

sphere_sweep
  {
  cubic_spline 105,
  <-0.535565667, -0.144219833, -0.021004333>, r_tube
  <-0.513303583, -0.224567917, -0.074528167>, r_tube
  <-0.477429917, -0.30249775, -0.124611667>, r_tube
  <-0.4255265, -0.376837833, -0.166343833>, r_tube
  <-0.355997833, -0.444197583, -0.193168083>, r_tube
  <-0.27068875, -0.49866875, -0.1976305>, r_tube
  <-0.1773025, -0.53357025, -0.173648167>, r_tube
  <-0.08852825, -0.546359083, -0.119974833>, r_tube
  <-0.013315667, -0.545536417, -0.04261825>, r_tube
  <0.055639583, -0.5455115, 0.042117417>, r_tube
  <0.13401825, -0.54169725, 0.11299225>, r_tube
  <0.224014083, -0.521953, 0.157940333>, r_tube
  <0.3159295, -0.483711, 0.173970083>, r_tube
  <0.399692917, -0.4304115, 0.164147833>, r_tube
  <0.469396083, -0.366492, 0.13460625>, r_tube
  <0.522770333, -0.295467667, 0.091901833>, r_tube
  <0.559491667, -0.219407417, 0.041693667>, r_tube
  <0.579884083, -0.13963275, -0.011556>, r_tube
  <0.58442125, -0.057066, -0.064082667>, r_tube
  <0.573527, 0.027345667, -0.112595667>, r_tube
  <0.54777475, 0.11258, -0.1537045>, r_tube
  <0.507962167, 0.197315583, -0.18362>, r_tube
  <0.455410583, 0.27960825, -0.1979795>, r_tube
  <0.39268775, 0.35644125, -0.192170917>, r_tube
  <0.324455417, 0.424025417, -0.162729083>, r_tube
  <0.2574945, 0.480166833, -0.110002917>, r_tube
  <0.19723975, 0.528904167, -0.041072667>, r_tube
  <0.141596833, 0.579835333, 0.029877>, r_tube
  <0.080768667, 0.637173417, 0.088262083>, r_tube
  <0.0071765, 0.69550875, 0.124734083>, r_tube
  <-0.079104833, 0.745068667, 0.135379083>, r_tube
  <-0.172516, 0.776878917, 0.120770333>, r_tube
  <-0.264979917, 0.784731667, 0.084821833>, r_tube
  <-0.34807025, 0.7656855, 0.033666333>, r_tube
  <-0.413859417, 0.719964583, -0.025067833>, r_tube
  <-0.455990417, 0.65085975, -0.082655167>, r_tube
  <-0.470349833, 0.564653167, -0.130046333>, r_tube
  <-0.456214833, 0.470244917, -0.158640583>, r_tube
  <-0.417150167, 0.378204833, -0.161607167>, r_tube
  <-0.361108417, 0.298679333, -0.135481>, r_tube
  <-0.298859167, 0.23887325, -0.08155825>, r_tube
  <-0.239053083, 0.200157667, -0.0071185>, r_tube
  <-0.179321833, 0.17497875, 0.0743265>, r_tube
  <-0.106527417, 0.148129583, 0.143506083>, r_tube
  <-0.0169055, 0.109787833, 0.18010275>, r_tube
  <0.076406, 0.061923, 0.170130917>, r_tube
  <0.15226675, 0.0129115, 0.112069833>, r_tube
  <0.189287167, -0.032186167, 0.019730667>, r_tube
  <0.175052417, -0.07765775, -0.079289667>, r_tube
  <0.113576, -0.129336833, -0.153131167>, r_tube
  <0.025350167, -0.186226167, -0.178185417>, r_tube
  <-0.062277333, -0.240747167, -0.149790583>, r_tube
  <-0.129911333, -0.2898585, -0.0825305>, r_tube
  <-0.175781833, -0.345626, -0.002930333>, r_tube
  <-0.205472917, -0.422234583, 0.063905917>, r_tube
  <-0.215045917, -0.517989167, 0.103992667>, r_tube
  <-0.19809375, -0.619402833, 0.112792833>, r_tube
  <-0.153818833, -0.709647917, 0.09227575>, r_tube
  <-0.08728175, -0.774066, 0.049147583>, r_tube
  <-0.007457167, -0.802984333, -0.00704375>, r_tube
  <0.074835417, -0.792464, -0.065578417>, r_tube
  <0.14855225, -0.744300083, -0.115612083>, r_tube
  <0.2036715, -0.665672083, -0.14724775>, r_tube
  <0.232614833, -0.568970167, -0.152582667>, r_tube
  <0.232240833, -0.470623, -0.1278775>, r_tube
  <0.205341833, -0.386311083, -0.076148583>, r_tube
  <0.15775125, -0.320696417, -0.010259667>, r_tube
  <0.093058917, -0.258123083, 0.04448575>, r_tube
  <0.022209083, -0.180841333, 0.058969833>, r_tube
  <-0.028796917, -0.09254075, 0.02466675>, r_tube
  <-0.03380775, -0.00134825, -0.032646417>, r_tube
  <0.006328917, 0.089096333, -0.071187583>, r_tube
  <0.072167917, 0.168347417, -0.06704925>, r_tube
  <0.145585583, 0.223641333, -0.023547083>, r_tube
  <0.217183417, 0.260063417, 0.03862725>, r_tube
  <0.288656583, 0.29907825, 0.097286583>, r_tube
  <0.359257167, 0.356167, 0.136949583>, r_tube
  <0.420284833, 0.432601167, 0.148865917>, r_tube
  <0.461069583, 0.520328333, 0.13158975>, r_tube
  <0.474531583, 0.608230167, 0.089708>, r_tube
  <0.458601583, 0.685860833, 0.031347833>, r_tube
  <0.415298833, 0.745367917, -0.034366583>, r_tube
  <0.349360083, 0.781740083, -0.098585167>, r_tube
  <0.267192167, 0.792509667, -0.153330583>, r_tube
  <0.176249, 0.777851167, -0.191472833>, r_tube
  <0.08463275, 0.74078075, -0.207353>, r_tube
  <-0.00000325, 0.687431417, -0.197331333>, r_tube
  <-0.07224925, 0.626703, -0.16088425>, r_tube
  <-0.131606583, 0.56854225, -0.101452083>, r_tube
  <-0.1850805, 0.519779917, -0.0273115>, r_tube
  <-0.243814667, 0.478097667, 0.048424583>, r_tube
  <-0.312346083, 0.431379667, 0.111122583>, r_tube
  <-0.383794333, 0.369080583, 0.150760583>, r_tube
  <-0.447514417, 0.291001083, 0.164097917>, r_tube
  <-0.496276667, 0.20347325, 0.15335325>, r_tube
  <-0.527887417, 0.113228167, 0.12396125>, r_tube
  <-0.543618, 0.024428917, 0.08193>, r_tube
  <-0.545687083, -0.06137875, 0.032295167>, r_tube
  <-0.535565667, -0.144219833, -0.021004333>, r_tube
  <-0.513303583, -0.224567917, -0.074528167>, r_tube
  <-0.477429917, -0.30249775, -0.124611667>, r_tube
  <-0.4255265, -0.376837833, -0.166343833>, r_tube
  <-0.355997833, -0.444197583, -0.193168083>, r_tube
  <-0.27068875, -0.49866875, -0.1976305>, r_tube
  <-0.1773025, -0.53357025, -0.173648167>, r_tube
  pigment { color rgb <0,0.25,1> }
  finish          
    {
    ambient 0.15
    diffuse 0.85
    brilliance 2
    phong 0.25
    phong_size 7.5
    }
  rotate <0,360*clock,0>
  }

plane
  {
  <0,0,-1>, -2.33
  pigment { color White }
  finish
    {
    ambient 0.35
    diffuse 0.65
    }
  }