File:Blue Granny 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,15/18,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 59,
  <-0.746128,-0.289449,-0.190238>, r_tube
  <-0.85005,-0.183882,-0.0867797>, r_tube
  <-0.892772,-0.0468425,0.0217547>, r_tube
  <-0.883997,0.101404,0.121022>, r_tube
  <-0.82717,0.24539,0.206972>, r_tube
  <-0.718298,0.366103,0.272602>, r_tube
  <-0.562866,0.439467,0.300291>, r_tube
  <-0.391177,0.448861,0.267145>, r_tube
  <-0.253547,0.400387,0.159989>, r_tube
  <-0.199786,0.316533,-0.00462659>, r_tube
  <-0.255263,0.206367,-0.155686>, r_tube
  <-0.384567,0.07304,-0.194808>, r_tube
  <-0.480952,-0.0742081,-0.0973547>, r_tube
  <-0.474019,-0.233185,0.0341719>, r_tube
  <-0.383484,-0.38776,0.0974391>, r_tube
  <-0.250102,-0.509893,0.0818578>, r_tube
  <-0.10035,-0.584368,0.0153141>, r_tube
  <0.057614,-0.605503,-0.0672328>, r_tube
  <0.219994,-0.568716,-0.13237>, r_tube
  <0.368803,-0.471572,-0.152564>, r_tube
  <0.466889,-0.32341,-0.113906>, r_tube
  <0.473175,-0.151819,-0.02835>, r_tube
  <0.377944,0.0103216,0.0401625>, r_tube
  <0.250383,0.154617,0.0059625>, r_tube
  <0.195848,0.292261,-0.12292>, r_tube
  <0.2529,0.424561,-0.248667>, r_tube
  <0.390277,0.531703,-0.299503>, r_tube
  <0.556608,0.583706,-0.266428>, r_tube
  <0.707203,0.564468,-0.177202>, r_tube
  <0.816314,0.480178,-0.0684844>, r_tube
  <0.878273,0.350761,0.0321047>, r_tube
  <0.898945,0.19769,0.114061>, r_tube
  <0.882464,0.0374763,0.180689>, r_tube
  <0.82388,-0.1153972,0.237769>, r_tube
  <0.715247,-0.241721,0.281855>, r_tube
  <0.561642,-0.318136,0.295945>, r_tube
  <0.392414,-0.32985,0.256753>, r_tube
  <0.254377,-0.284175,0.149667>, r_tube
  <0.193036,-0.203724,-0.0132047>, r_tube
  <0.233648,-0.0959206,-0.17062>, r_tube
  <0.349355,0.041006,-0.234281>, r_tube
  <0.448987,0.193275,-0.168117>, r_tube
  <0.452137,0.347456,-0.036464>, r_tube
  <0.363277,0.495464,0.0572766>, r_tube
  <0.227391,0.619509,0.0689063>, r_tube
  <0.0734344,0.698695,0.0167765>, r_tube
  <-0.0873281,0.720112,-0.0603844>, r_tube
  <-0.248991,0.677109,-0.121345>, r_tube
  <-0.390811,0.570656,-0.132736>, r_tube
  <-0.47257,0.415743,-0.0807469>, r_tube
  <-0.454486,0.241664,0.0126141>, r_tube
  <-0.344784,0.07439,0.0572063>, r_tube
  <-0.248977,-0.080466,-0.020925>, r_tube
  <-0.270717,-0.216788,-0.161058>, r_tube
  <-0.404845,-0.311175,-0.254236>, r_tube
  <-0.585436,-0.337782,-0.258202>, r_tube
  <-0.746128,-0.289449,-0.190238>, r_tube
  <-0.85005,-0.183882,-0.0867797>, r_tube
  <-0.892772,-0.0468425,0.0217547>, 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
    }
  }