grammar =
  [
      Follow "b"
    , Var    "B"
    , Scale  "r"  0.6
    , Turn   "<"  0.14285714285714
    , Turn   ">"  (-0.14285714285714)
    , Seed   "s"  ((0, 0), (0, 1))
    , Rule   "R1" "b r [ B < ] [ B > ]"
  ]
grammar =
  [
      Follow "b"
    , Var    "B"
    , Scale  "r"  0.6
    , Turn   "<"  0.14285714285714
    , Turn   ">"  (-0.14285714285714)
    , Seed   "s"  ((0, 0), (0, 1))
    , Rule   "R1" "b r [ B < ] [ B > ]"
  ]
grammar =
  [
      Follow "b"
    , Var    "B"
    , Scale  "r"  0.6
    , Turn   "<"  0.14285714285714
    , Turn   ">"  (-0.14285714285714)
    , Seed   "s"  ((0, 0), (0, 1))
    , Rule   "R1" "b r [ B < ] [ B > ]"
  ]