Mathematica code:

Animate[
  Graphics[
    Rotate[
     Table[
       {Thickness[.0134],
        Circle[{23*Cos[i*Pi/2], 23*Sin[i*Pi/2]},
        t + (44 - n) (1 + Sign[44 - n])/2]}, {n, 0, 100, 1}, 
     {i, 0, 3, 1}], 
     Pi/4],
    PlotRange -> 16.5, ImageSize -> 500],
{t, 0, 1}]
Notes: 153 1/24/12 — 3:21pm Filed under: #GIF  #Mathematica  #photoset 
 
  1. apiphile reblogged this from bruise-dpur-ple
  2. rigidridgesofdipsydrowsy reblogged this from thepatterns
  3. reb36g reblogged this from intothecontinuum
  4. greenpurpleorange reblogged this from intothecontinuum
  5. nicotinechloride reblogged this from rumblingbumbler
  6. rumblingbumbler reblogged this from thesleeplessthewondering
  7. thesleeplessthewondering reblogged this from intothecontinuum
  8. eggsandmilkgetouttahere reblogged this from wolframalpha
  9. uglyuglyemptiness reblogged this from intothecontinuum
  10. cautionuseonlyasdirected reblogged this from proofmathisbeautiful
  11. bruise-dpur-ple reblogged this from wolframalpha
  12. drscranto reblogged this from intothecontinuum
  13. mew-licious reblogged this from isometries
  14. isometries reblogged this from intothecontinuum
  15. raveqween reblogged this from proofmathisbeautiful
  16. takuma-uematsu reblogged this from proofmathisbeautiful
  17. vivalagif reblogged this from proofmathisbeautiful
  18. mr-andre reblogged this from proofmathisbeautiful
  19. tonyt reblogged this from proofmathisbeautiful
  20. logicianmagician reblogged this from wolframalpha
  21. slave2music reblogged this from proofmathisbeautiful
  22. intrinsica reblogged this from proofmathisbeautiful
  23. anthlc reblogged this from proofmathisbeautiful
  24. the-girl-next-dooor reblogged this from wolframalpha
  25. stealing-fat reblogged this from proofmathisbeautiful