#include "library.h"

void one_degree_arc(const double length)
{ draw_distance(length);
  turn_right_by_degrees(1); }

void five_degree_arc(const double length)
{ one_degree_arc(length/5.0);
  one_degree_arc(length/5.0);
  one_degree_arc(length/5.0);
  one_degree_arc(length/5.0);
  one_degree_arc(length/5.0); }

void forty_five_degree_arc(const double length)
{ five_degree_arc(length/9.0);
  five_degree_arc(length/9.0);
  five_degree_arc(length/9.0);
  five_degree_arc(length/9.0);
  five_degree_arc(length/9.0);
  five_degree_arc(length/9.0);
  five_degree_arc(length/9.0);
  five_degree_arc(length/9.0);
  five_degree_arc(length/9.0); }

void circle(const double circumference)
{ forty_five_degree_arc(circumference/8.0);
  forty_five_degree_arc(circumference/8.0);
  forty_five_degree_arc(circumference/8.0);
  forty_five_degree_arc(circumference/8.0);
  forty_five_degree_arc(circumference/8.0);
  forty_five_degree_arc(circumference/8.0);
  forty_five_degree_arc(circumference/8.0);
  forty_five_degree_arc(circumference/8.0); }

void main()
{ make_window(500, 500);
  set_pen_width(3);
  circle(300);
  set_pen_color(color::blue);
  circle(350);
  set_pen_color(color::red);
  circle(400);
  move_to(100, 100);
  circle(100); }