scruss · December 19, 2022 21:29 · scruss · Dec 19, 2022
diff --git a/hootnanny-cleaned_up.py b/hootnanny-cleaned_up.py
 #!/usr/bin/env python3
 # hootnanny.py - simulate Hoot-Nanny / Magic Designer drawing toy
 # Currently hard-coded to output figure "25KM" in HP-GL,
 #  a simple but somewhat obsolete plotting language.
 # Output figures as close to actual sizes as I could manage.
 # All dimensions in inches, unfortunately, but HP-GL is bilingual.
 # scruss, 2022-02 - code cleanup - 2022-12
 # Licence: CC-BY-SA - share freely, but credit me and make your
 #                     improvements freely available for all
 # -*- coding: utf-8 -*-

 from math import sin, cos, sqrt, radians, degrees, atan2


 def arm_length(letter):
    """
    each metal arm has pivot holes marked A - R, at 1/4" spacing
    from 5.75 to 1.5". The perpendicular distance from the pivot holes
    to the pencil is 5/16". This doesn't add much to the overall arm
    length, but it's easy to take into account
    """
    if len(letter) > 1 or letter > "R" or letter < "A":
        # wrong input
        return None
    return sqrt(
        (5.75 - (ord(letter) - ord("A")) / 4.0) ** 2 + (5 / 16) ** 2
    )


 def angle_setting(deg):
    """
    the hoot-nanny has two smaller gears: one fixed, the other on a movable
    track with a scale 10 to 70 degrees. The indicator isn't the same as the
    angle between the gears: when 40 degrees is indicated, the gears are
    60 degrees apart. So the actual range is 30 to 90 degrees.

    The smaller gears are 1" in diameter (32 teeth) on a 7" PCD
    Each smaller gear has a pivot point for the arms at 3/8" radius
    The large gear is 6" in diameter (192 teeth)
    """
    return 20 + deg


 def distance(p1, p2):
    """
    return Euclidean distance between two points in 2d space
    Note that I'm using a two element list to represent [x, y]
    """
    return sqrt((p1[0] - p2[0]) ** 2 + (p1[1] - p2[1]) ** 2)


 def epitrochoid(r1, r2, d, theta):
    """
    If you held the paper on the Hoot-Nanny fixed, the smaller
    gears would describe epitrochoids around the larger
    """
    return [
        (r1 + r2) * cos(theta) - d * cos(((r1 + r2) / r2) * theta),
        (r1 + r2) * sin(theta) - d * sin(((r1 + r2) / r2) * theta),
    ]


 def nearest_circle_intersection(p0, p1, r0, r1):
    """
    return the intersection point of two circles nearer the origin
    if equidistant, may not return the point you expect
    """
    d = distance(p0, p1)
    a = (r0**2 - r1**2 + d**2) / (2 * d)
    h = sqrt(r0**2 - a**2)
    x2 = p0[0] + a * (p1[0] - p0[0]) / d
    y2 = p0[1] + a * (p1[1] - p0[1]) / d
    p3 = [x2 + h * (p1[1] - p0[1]) / d, y2 - h * (p1[0] - p0[0]) / d]
    p4 = [x2 - h * (p1[1] - p0[1]) / d, y2 + h * (p1[0] - p0[0]) / d]
    if distance(p3, [0, 0]) <= distance(p4, [0, 0]):
        return p3
    else:
        return p4


 # this is where I hard-code the "25KM" setting
 arm1 = arm_length("K")
 arm2 = arm_length("M")
 t = angle_setting(25)

 # output the figure in HP-GL: it may be old, but it's very simple
 # the path steps around a circle once in full degrees
 for i in range(360):
    """
    p is the fixed smaller gear path:
     * large radius   = 3"
     * small radius   = 1/2"
     * cam arm length = 3/8"
    """
    p = epitrochoid(3, 1 / 2, 3 / 8, radians(i))
    # q is the movable smaller gear path
    q = epitrochoid(3, 1 / 2, 3 / 8, radians(i - t))
    # pencil holder is where the two arms intersect
    # coordinates of ph are [x, y] in inches (blecch)
    ph = nearest_circle_intersection(p, q, arm1, arm2)
    # scale to HP-GL units: 40 units / mm == 1016 units / inch
    # thanks, Carl Edvard Johansson!
    x = int(1016 * ph[0])
    y = int(1016 * ph[1])
    if i == 0:
        # initialize and plot first point
        print("IN;")  # HP-GL INitialize plotter
        print("SP1;")  # HP-GL Select Pen 1
        print("PU", x, ",", y, ";")  # HP-GL Pen Up (= move) to x, y
        print("PD;")  # HP-GL Pen Down (= plot)
        # save first point to close figure
        first = [x, y]
    else:
        print("PD", x, ",", y, ";")  # HP-GL Pen Down (= plot) to x, y
 # close figure
 print("PD", first[0], ",", first[1], ";")
 # plot is now finished, so pick up pen and put it away
 print("PU;")  # HP-GL Pen Up (= pick up pen, if no coordinates)
 print("SP0;")  # HP-GL Select Pen 0 (= put the pen away)
diff --git a/km25.hpgl b/km25.hpgl
 IN;
 SP1;
 PU 29 , -1052 ;
 PD;
 PD 55 , -1107 ;
 PD 87 , -1158 ;
 PD 124 , -1203 ;
 PD 164 , -1244 ;
 PD 209 , -1278 ;
 PD 256 , -1305 ;
 PD 306 , -1325 ;
 PD 358 , -1338 ;
 PD 411 , -1342 ;
 PD 464 , -1337 ;
 PD 516 , -1324 ;
 PD 568 , -1302 ;
 PD 617 , -1272 ;
 PD 664 , -1233 ;
 PD 708 , -1186 ;
 PD 748 , -1131 ;
 PD 783 , -1069 ;
 PD 814 , -1001 ;
 PD 839 , -927 ;
 PD 859 , -848 ;
 PD 874 , -765 ;
 PD 883 , -680 ;
 PD 886 , -593 ;
 PD 883 , -506 ;
 PD 875 , -420 ;
 PD 863 , -335 ;
 PD 845 , -254 ;
 PD 823 , -177 ;
 PD 797 , -105 ;
 PD 768 , -38 ;
 PD 736 , 20 ;
 PD 702 , 72 ;
 PD 667 , 116 ;
 PD 630 , 153 ;
 PD 594 , 181 ;
 PD 558 , 200 ;
 PD 523 , 212 ;
 PD 490 , 215 ;
 PD 460 , 211 ;
 PD 433 , 200 ;
 PD 410 , 181 ;
 PD 391 , 156 ;
 PD 376 , 126 ;
 PD 367 , 91 ;
 PD 363 , 51 ;
 PD 365 , 9 ;
 PD 372 , -36 ;
 PD 386 , -83 ;
 PD 406 , -131 ;
 PD 431 , -178 ;
 PD 462 , -226 ;
 PD 498 , -271 ;
 PD 540 , -315 ;
 PD 586 , -355 ;
 PD 636 , -392 ;
 PD 689 , -424 ;
 PD 746 , -451 ;
 PD 805 , -474 ;
 PD 865 , -490 ;
 PD 926 , -501 ;
 PD 986 , -505 ;
 PD 1046 , -503 ;
 PD 1104 , -494 ;
 PD 1160 , -479 ;
 PD 1211 , -458 ;
 PD 1259 , -430 ;
 PD 1301 , -397 ;
 PD 1338 , -358 ;
 PD 1367 , -314 ;
 PD 1390 , -266 ;
 PD 1405 , -214 ;
 PD 1412 , -159 ;
 PD 1410 , -101 ;
 PD 1400 , -41 ;
 PD 1381 , 20 ;
 PD 1354 , 82 ;
 PD 1318 , 143 ;
 PD 1274 , 204 ;
 PD 1222 , 263 ;
 PD 1164 , 320 ;
 PD 1100 , 374 ;
 PD 1030 , 424 ;
 PD 957 , 470 ;
 PD 880 , 512 ;
 PD 801 , 548 ;
 PD 722 , 579 ;
 PD 643 , 605 ;
 PD 565 , 624 ;
 PD 489 , 638 ;
 PD 418 , 646 ;
 PD 350 , 648 ;
 PD 288 , 644 ;
 PD 232 , 636 ;
 PD 182 , 623 ;
 PD 140 , 605 ;
 PD 105 , 584 ;
 PD 77 , 559 ;
 PD 58 , 533 ;
 PD 47 , 504 ;
 PD 43 , 475 ;
 PD 47 , 445 ;
 PD 59 , 417 ;
 PD 78 , 389 ;
 PD 104 , 363 ;
 PD 136 , 340 ;
 PD 174 , 320 ;
 PD 217 , 304 ;
 PD 265 , 293 ;
 PD 316 , 286 ;
 PD 370 , 284 ;
 PD 427 , 287 ;
 PD 484 , 296 ;
 PD 542 , 310 ;
 PD 600 , 329 ;
 PD 657 , 354 ;
 PD 712 , 385 ;
 PD 764 , 420 ;
 PD 813 , 460 ;
 PD 857 , 504 ;
 PD 896 , 551 ;
 PD 931 , 602 ;
 PD 959 , 654 ;
 PD 980 , 709 ;
 PD 995 , 764 ;
 PD 1002 , 820 ;
 PD 1002 , 875 ;
 PD 994 , 928 ;
 PD 979 , 979 ;
 PD 956 , 1027 ;
 PD 926 , 1070 ;
 PD 888 , 1109 ;
 PD 844 , 1143 ;
 PD 793 , 1171 ;
 PD 735 , 1192 ;
 PD 673 , 1206 ;
 PD 605 , 1213 ;
 PD 534 , 1213 ;
 PD 460 , 1205 ;
 PD 383 , 1190 ;
 PD 304 , 1168 ;
 PD 226 , 1140 ;
 PD 147 , 1105 ;
 PD 71 , 1064 ;
 PD -3 , 1018 ;
 PD -74 , 968 ;
 PD -140 , 915 ;
 PD -202 , 859 ;
 PD -258 , 801 ;
 PD -307 , 743 ;
 PD -350 , 685 ;
 PD -386 , 627 ;
 PD -414 , 572 ;
 PD -434 , 519 ;
 PD -448 , 469 ;
 PD -454 , 424 ;
 PD -453 , 383 ;
 PD -445 , 347 ;
 PD -432 , 317 ;
 PD -413 , 293 ;
 PD -389 , 275 ;
 PD -362 , 264 ;
 PD -331 , 260 ;
 PD -297 , 262 ;
 PD -262 , 272 ;
 PD -226 , 288 ;
 PD -190 , 311 ;
 PD -155 , 341 ;
 PD -121 , 376 ;
 PD -89 , 417 ;
 PD -60 , 463 ;
 PD -35 , 513 ;
 PD -13 , 567 ;
 PD 2 , 625 ;
 PD 14 , 685 ;
 PD 21 , 746 ;
 PD 22 , 809 ;
 PD 18 , 872 ;
 PD 7 , 934 ;
 PD -7 , 994 ;
 PD -29 , 1052 ;
 PD -55 , 1107 ;
 PD -87 , 1158 ;
 PD -124 , 1203 ;
 PD -164 , 1244 ;
 PD -209 , 1278 ;
 PD -256 , 1305 ;
 PD -306 , 1325 ;
 PD -358 , 1338 ;
 PD -411 , 1342 ;
 PD -464 , 1337 ;
 PD -516 , 1324 ;
 PD -568 , 1302 ;
 PD -617 , 1272 ;
 PD -664 , 1233 ;
 PD -708 , 1186 ;
 PD -748 , 1131 ;
 PD -783 , 1069 ;
 PD -814 , 1001 ;
 PD -839 , 927 ;
 PD -859 , 848 ;
 PD -874 , 765 ;
 PD -883 , 680 ;
 PD -886 , 593 ;
 PD -883 , 506 ;
 PD -875 , 420 ;
 PD -863 , 335 ;
 PD -845 , 254 ;
 PD -823 , 177 ;
 PD -797 , 105 ;
 PD -768 , 38 ;
 PD -736 , -20 ;
 PD -702 , -72 ;
 PD -667 , -116 ;
 PD -630 , -153 ;
 PD -594 , -181 ;
 PD -558 , -200 ;
 PD -523 , -212 ;
 PD -490 , -215 ;
 PD -460 , -211 ;
 PD -433 , -200 ;
 PD -410 , -181 ;
 PD -391 , -156 ;
 PD -376 , -126 ;
 PD -367 , -91 ;
 PD -363 , -51 ;
 PD -365 , -9 ;
 PD -372 , 36 ;
 PD -386 , 83 ;
 PD -406 , 131 ;
 PD -431 , 178 ;
 PD -462 , 226 ;
 PD -498 , 271 ;
 PD -540 , 315 ;
 PD -586 , 355 ;
 PD -636 , 392 ;
 PD -689 , 424 ;
 PD -746 , 451 ;
 PD -805 , 474 ;
 PD -865 , 490 ;
 PD -926 , 501 ;
 PD -986 , 505 ;
 PD -1046 , 503 ;
 PD -1104 , 494 ;
 PD -1160 , 479 ;
 PD -1211 , 458 ;
 PD -1259 , 430 ;
 PD -1301 , 397 ;
 PD -1338 , 358 ;
 PD -1367 , 314 ;
 PD -1390 , 266 ;
 PD -1405 , 214 ;
 PD -1412 , 159 ;
 PD -1410 , 101 ;
 PD -1400 , 41 ;
 PD -1381 , -20 ;
 PD -1354 , -82 ;
 PD -1318 , -143 ;
 PD -1274 , -204 ;
 PD -1222 , -263 ;
 PD -1164 , -320 ;
 PD -1100 , -374 ;
 PD -1030 , -424 ;
 PD -957 , -470 ;
 PD -880 , -512 ;
 PD -801 , -548 ;
 PD -722 , -579 ;
 PD -643 , -605 ;
 PD -565 , -624 ;
 PD -489 , -638 ;
 PD -418 , -646 ;
 PD -350 , -648 ;
 PD -288 , -644 ;
 PD -232 , -636 ;
 PD -182 , -623 ;
 PD -140 , -605 ;
 PD -105 , -584 ;
 PD -77 , -559 ;
 PD -58 , -533 ;
 PD -47 , -504 ;
 PD -43 , -475 ;
 PD -47 , -445 ;
 PD -59 , -417 ;
 PD -78 , -389 ;
 PD -104 , -363 ;
 PD -136 , -340 ;
 PD -174 , -320 ;
 PD -217 , -304 ;
 PD -265 , -293 ;
 PD -316 , -286 ;
 PD -370 , -284 ;
 PD -427 , -287 ;
 PD -484 , -296 ;
 PD -542 , -310 ;
 PD -600 , -329 ;
 PD -657 , -354 ;
 PD -712 , -385 ;
 PD -764 , -420 ;
 PD -813 , -460 ;
 PD -857 , -504 ;
 PD -896 , -551 ;
 PD -931 , -602 ;
 PD -959 , -654 ;
 PD -980 , -709 ;
 PD -995 , -764 ;
 PD -1002 , -820 ;
 PD -1002 , -875 ;
 PD -994 , -928 ;
 PD -979 , -979 ;
 PD -956 , -1027 ;
 PD -926 , -1070 ;
 PD -888 , -1109 ;
 PD -844 , -1143 ;
 PD -793 , -1171 ;
 PD -735 , -1192 ;
 PD -673 , -1206 ;
 PD -605 , -1213 ;
 PD -534 , -1213 ;
 PD -460 , -1205 ;
 PD -383 , -1190 ;
 PD -304 , -1168 ;
 PD -226 , -1140 ;
 PD -147 , -1105 ;
 PD -71 , -1064 ;
 PD 3 , -1018 ;
 PD 74 , -968 ;
 PD 140 , -915 ;
 PD 202 , -859 ;
 PD 258 , -801 ;
 PD 307 , -743 ;
 PD 350 , -685 ;
 PD 386 , -627 ;
 PD 414 , -572 ;
 PD 434 , -519 ;
 PD 448 , -469 ;
 PD 454 , -424 ;
 PD 453 , -383 ;
 PD 445 , -347 ;
 PD 432 , -317 ;
 PD 413 , -293 ;
 PD 389 , -275 ;
 PD 362 , -264 ;
 PD 331 , -260 ;
 PD 297 , -262 ;
 PD 262 , -272 ;
 PD 226 , -288 ;
 PD 190 , -311 ;
 PD 155 , -341 ;
 PD 121 , -376 ;
 PD 89 , -417 ;
 PD 60 , -463 ;
 PD 35 , -513 ;
 PD 13 , -567 ;
 PD -2 , -625 ;
 PD -14 , -685 ;
 PD -21 , -746 ;
 PD -22 , -809 ;
 PD -18 , -872 ;
 PD -7 , -934 ;
 PD 7 , -994 ;
 PD 29 , -1052 ;
 PU;
 SP0;
diff --git a/km25.svg b/km25.svg
 <?xml version="1.0" encoding="UTF-8" standalone="no"?>
 <!-- Created with Inkscape (http://www.inkscape.org/) -->

 <svg
   width="72.800003mm"
   height="69.300003mm"
   viewBox="0 0 72.800003 69.300003"
   version="1.1"
   id="svg5"
   xml:space="preserve"
   inkscape:version="1.2.1 (9c6d41e4, 2022-07-14)"
   sodipodi:docname="km25.svg"
   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
   xmlns="http://www.w3.org/2000/svg"
   xmlns:svg="http://www.w3.org/2000/svg"><sodipodi:namedview
     id="namedview7"
     pagecolor="#ffffff"
     bordercolor="#000000"
     borderopacity="0.25"
     inkscape:showpageshadow="2"
     inkscape:pageopacity="0.0"
     inkscape:pagecheckerboard="0"
     inkscape:deskcolor="#d1d1d1"
     inkscape:document-units="mm"
     showgrid="false"
     inkscape:zoom="4.478445"
     inkscape:cx="137.65939"
     inkscape:cy="130.96064"
     inkscape:current-layer="layer1" /><defs
     id="defs2" /><g
     inkscape:label="Layer 1"
     inkscape:groupmode="layer"
     id="layer1"
     transform="translate(0.0999406,4.100859)"><g
       inkscape:label="Pen 1"
       id="g870"
       transform="translate(36.300061,-266.45086)"><path
         d="m 0.725,323.3 0.65,1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path150" /><path
         d="m 1.375,324.675 0.8,1.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path152" /><path
         d="M 2.175,325.95 3.1,327.075"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path154" /><path
         d="m 3.1,327.075 1,1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path156" /><path
         d="m 4.1,328.1 1.125,0.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path158" /><path
         d="M 5.225,328.95 6.4,329.625"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path160" /><path
         d="m 6.4,329.625 1.25,0.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path162" /><path
         d="m 7.65,330.125 1.3,0.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path164" /><path
         d="m 8.95,330.45 1.325,0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path166" /><path
         d="M 10.275,330.55 11.6,330.425"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path168" /><path
         d="M 11.6,330.425 12.9,330.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path170" /><path
         d="m 12.9,330.1 1.3,-0.55"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path172" /><path
         d="m 14.2,329.55 1.225,-0.75"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path174" /><path
         d="M 15.425,328.8 16.6,327.825"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path176" /><path
         d="m 16.6,327.825 1.1,-1.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path178" /><path
         d="m 17.7,326.65 1,-1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path180" /><path
         d="m 18.7,325.275 0.875,-1.55"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path182" /><path
         d="m 19.575,323.725 0.775,-1.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path184" /><path
         d="m 20.35,322.025 0.625,-1.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path186" /><path
         d="m 20.975,320.175 0.5,-1.975"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path188" /><path
         d="m 21.475,318.2 0.375,-2.075"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path190" /><path
         d="M 21.85,316.125 22.075,314"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path192" /><path
         d="m 22.075,314 0.075,-2.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path194" /><path
         d="M 22.15,311.825 22.075,309.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path196" /><path
         d="m 22.075,309.65 -0.2,-2.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path198" /><path
         d="m 21.875,307.5 -0.3,-2.125"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path200" /><path
         d="m 21.575,305.375 -0.45,-2.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path202" /><path
         d="m 21.125,303.35 -0.55,-1.925"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path204" /><path
         d="m 20.575,301.425 -0.65,-1.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path206" /><path
         d="M 19.925,299.625 19.2,297.95"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path208" /><path
         d="M 19.2,297.95 18.4,296.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path210" /><path
         d="m 18.4,296.5 -0.85,-1.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path212" /><path
         d="m 17.55,295.2 -0.875,-1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path214" /><path
         d="M 16.675,294.1 15.75,293.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path216" /><path
         d="m 15.75,293.175 -0.9,-0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path218" /><path
         d="M 14.85,292.475 13.95,292"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path220" /><path
         d="m 13.95,292 -0.875,-0.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path222" /><path
         d="M 13.075,291.7 12.25,291.625"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path224" /><path
         d="m 12.25,291.625 -0.75,0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path226" /><path
         d="M 11.5,291.725 10.825,292"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path228" /><path
         d="m 10.825,292 -0.575,0.475"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path230" /><path
         d="M 10.25,292.475 9.775,293.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path232" /><path
         d="M 9.775,293.1 9.4,293.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path234" /><path
         d="m 9.4,293.85 -0.225,0.875"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path236" /><path
         d="m 9.175,294.725 -0.1,1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path238" /><path
         d="m 9.075,295.725 0.05,1.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path240" /><path
         d="M 9.125,296.775 9.3,297.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path242" /><path
         d="m 9.3,297.9 0.35,1.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path244" /><path
         d="m 9.65,299.075 0.5,1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path246" /><path
         d="m 10.15,300.275 0.625,1.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path248" /><path
         d="m 10.775,301.45 0.775,1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path250" /><path
         d="m 11.55,302.65 0.9,1.125"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path252" /><path
         d="m 12.45,303.775 1.05,1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path254" /><path
         d="m 13.5,304.875 1.15,1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path256" /><path
         d="M 14.65,305.875 15.9,306.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path258" /><path
         d="m 15.9,306.8 1.325,0.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path260" /><path
         d="m 17.225,307.6 1.425,0.675"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path262" /><path
         d="m 18.65,308.275 1.475,0.575"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path264" /><path
         d="m 20.125,308.85 1.5,0.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path266" /><path
         d="m 21.625,309.25 1.525,0.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path268" /><path
         d="m 23.15,309.525 1.5,0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path270" /><path
         d="m 24.65,309.625 1.5,-0.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path272" /><path
         d="M 26.15,309.575 27.6,309.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path274" /><path
         d="M 27.6,309.35 29,308.975"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path276" /><path
         d="m 29,308.975 1.275,-0.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path278" /><path
         d="m 30.275,308.45 1.2,-0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path280" /><path
         d="m 31.475,307.75 1.05,-0.825"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path282" /><path
         d="M 32.525,306.925 33.45,305.95"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path284" /><path
         d="m 33.45,305.95 0.725,-1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path286" /><path
         d="m 34.175,304.85 0.575,-1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path288" /><path
         d="m 34.75,303.65 0.375,-1.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path290" /><path
         d="M 35.125,302.35 35.3,300.975"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path292" /><path
         d="m 35.3,300.975 -0.05,-1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path294" /><path
         d="M 35.25,299.525 35,298.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path296" /><path
         d="M 35,298.025 34.525,296.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path298" /><path
         d="M 34.525,296.5 33.85,294.95"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path300" /><path
         d="m 33.85,294.95 -0.9,-1.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path302" /><path
         d="M 32.95,293.425 31.85,291.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path304" /><path
         d="m 31.85,291.9 -1.3,-1.475"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path306" /><path
         d="M 30.55,290.425 29.1,289"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path308" /><path
         d="m 29.1,289 -1.6,-1.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path310" /><path
         d="M 27.5,287.65 25.75,286.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path312" /><path
         d="m 25.75,286.4 -1.825,-1.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path314" /><path
         d="M 23.925,285.25 22,284.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path316" /><path
         d="m 22,284.2 -1.975,-0.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path318" /><path
         d="M 20.025,283.3 18.05,282.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path320" /><path
         d="m 18.05,282.525 -1.975,-0.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path322" /><path
         d="M 16.075,281.875 14.125,281.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path324" /><path
         d="m 14.125,281.4 -1.9,-0.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path326" /><path
         d="m 12.225,281.05 -1.775,-0.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path328" /><path
         d="M 10.45,280.85 8.75,280.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path330" /><path
         d="M 8.75,280.8 7.2,280.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path332" /><path
         d="m 7.2,280.9 -1.4,0.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path334" /><path
         d="m 5.8,281.1 -1.25,0.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path336" /><path
         d="m 4.55,281.425 -1.05,0.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path338" /><path
         d="M 3.5,281.875 2.625,282.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path340" /><path
         d="m 2.625,282.4 -0.7,0.625"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path342" /><path
         d="m 1.925,283.025 -0.475,0.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path344" /><path
         d="M 1.45,283.675 1.175,284.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path346" /><path
         d="m 1.175,284.4 -0.1,0.725"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path348" /><path
         d="m 1.075,285.125 0.1,0.75"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path350" /><path
         d="m 1.175,285.875 0.3,0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path352" /><path
         d="m 1.475,286.575 0.475,0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path354" /><path
         d="m 1.95,287.275 0.65,0.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path356" /><path
         d="M 2.6,287.925 3.4,288.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path358" /><path
         d="M 3.4,288.5 4.35,289"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path360" /><path
         d="m 4.35,289 1.075,0.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path362" /><path
         d="m 5.425,289.4 1.2,0.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path364" /><path
         d="M 6.625,289.675 7.9,289.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path366" /><path
         d="m 7.9,289.85 1.35,0.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path368" /><path
         d="m 9.25,289.9 1.425,-0.075"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path370" /><path
         d="M 10.675,289.825 12.1,289.6"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path372" /><path
         d="m 12.1,289.6 1.45,-0.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path374" /><path
         d="M 13.55,289.25 15,288.775"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path376" /><path
         d="m 15,288.775 1.425,-0.625"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path378" /><path
         d="M 16.425,288.15 17.8,287.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path380" /><path
         d="M 17.8,287.375 19.1,286.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path382" /><path
         d="m 19.1,286.5 1.225,-1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path384" /><path
         d="m 20.325,285.5 1.1,-1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path386" /><path
         d="M 21.425,284.4 22.4,283.225"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path388" /><path
         d="m 22.4,283.225 0.875,-1.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path390" /><path
         d="m 23.275,281.95 0.7,-1.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path392" /><path
         d="M 23.975,280.65 24.5,279.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path394" /><path
         d="M 24.5,279.275 24.875,277.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path396" /><path
         d="m 24.875,277.9 0.175,-1.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path398" /><path
         d="m 25.05,276.5 v -1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path400" /><path
         d="M 25.05,275.125 24.85,273.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path402" /><path
         d="m 24.85,273.8 -0.375,-1.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path404" /><path
         d="m 24.475,272.525 -0.575,-1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path406" /><path
         d="M 23.9,271.325 23.15,270.25"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path408" /><path
         d="M 23.15,270.25 22.2,269.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path410" /><path
         d="m 22.2,269.275 -1.1,-0.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path412" /><path
         d="m 21.1,268.425 -1.275,-0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path414" /><path
         d="M 19.825,267.725 18.375,267.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path416" /><path
         d="m 18.375,267.2 -1.55,-0.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path418" /><path
         d="m 16.825,266.85 -1.7,-0.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path420" /><path
         d="M 15.125,266.675 H 13.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path422" /><path
         d="m 13.35,266.675 -1.85,0.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path424" /><path
         d="M 11.5,266.875 9.575,267.25"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path426" /><path
         d="M 9.575,267.25 7.6,267.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path428" /><path
         d="m 7.6,267.8 -1.95,0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path430" /><path
         d="m 5.65,268.5 -1.975,0.875"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path432" /><path
         d="m 3.675,269.375 -1.9,1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path434" /><path
         d="m 1.775,270.4 -1.85,1.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path436" /><path
         d="M -0.075,271.55 -1.85,272.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path438" /><path
         d="m -1.85,272.8 -1.65,1.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path440" /><path
         d="m -3.5,274.125 -1.55,1.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path442" /><path
         d="m -5.05,275.525 -1.4,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path444" /><path
         d="m -6.45,276.975 -1.225,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path446" /><path
         d="m -7.675,278.425 -1.075,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path448" /><path
         d="m -8.75,279.875 -0.9,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path450" /><path
         d="m -9.65,281.325 -0.7,1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path452" /><path
         d="m -10.35,282.7 -0.5,1.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path454" /><path
         d="m -10.85,284.025 -0.35,1.25"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path456" /><path
         d="m -11.2,285.275 -0.15,1.125"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path458" /><path
         d="m -11.35,286.4 0.025,1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path460" /><path
         d="m -11.325,287.425 0.2,0.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path462" /><path
         d="m -11.125,288.325 0.325,0.75"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path464" /><path
         d="m -10.8,289.075 0.475,0.6"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path466" /><path
         d="m -10.325,289.675 0.6,0.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path468" /><path
         d="M -9.725,290.125 -9.05,290.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path470" /><path
         d="m -9.05,290.4 0.775,0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path472" /><path
         d="m -8.275,290.5 0.85,-0.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path474" /><path
         d="M -7.425,290.45 -6.55,290.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path476" /><path
         d="m -6.55,290.2 0.9,-0.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path478" /><path
         d="m -5.65,289.8 0.9,-0.575"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path480" /><path
         d="m -4.75,289.225 0.875,-0.75"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path482" /><path
         d="m -3.875,288.475 0.85,-0.875"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path484" /><path
         d="m -3.025,287.6 0.8,-1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path486" /><path
         d="m -2.225,286.575 0.725,-1.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path488" /><path
         d="m -1.5,285.425 0.625,-1.25"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path490" /><path
         d="m -0.875,284.175 0.55,-1.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path492" /><path
         d="m -0.325,282.825 0.375,-1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path494" /><path
         d="m 0.05,281.375 0.3,-1.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path496" /><path
         d="M 0.35,279.875 0.525,278.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path498" /><path
         d="M 0.525,278.35 0.55,276.775"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path500" /><path
         d="M 0.55,276.775 0.45,275.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path502" /><path
         d="M 0.45,275.2 0.175,273.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path504" /><path
         d="m 0.175,273.65 -0.35,-1.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path506" /><path
         d="m -0.175,272.15 -0.55,-1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path508" /><path
         d="m -0.725,270.7 -0.65,-1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path510" /><path
         d="m -1.375,269.325 -0.8,-1.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path512" /><path
         d="M -2.175,268.05 -3.1,266.925"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path514" /><path
         d="m -3.1,266.925 -1,-1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path516" /><path
         d="m -4.1,265.9 -1.125,-0.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path518" /><path
         d="M -5.225,265.05 -6.4,264.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path520" /><path
         d="m -6.4,264.375 -1.25,-0.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path522" /><path
         d="m -7.65,263.875 -1.3,-0.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path524" /><path
         d="m -8.95,263.55 -1.325,-0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path526" /><path
         d="m -10.275,263.45 -1.325,0.125"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path528" /><path
         d="m -11.6,263.575 -1.3,0.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path530" /><path
         d="m -12.9,263.9 -1.3,0.55"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path532" /><path
         d="m -14.2,264.45 -1.225,0.75"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path534" /><path
         d="m -15.425,265.2 -1.175,0.975"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path536" /><path
         d="m -16.6,266.175 -1.1,1.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path538" /><path
         d="m -17.7,267.35 -1,1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path540" /><path
         d="m -18.7,268.725 -0.875,1.55"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path542" /><path
         d="m -19.575,270.275 -0.775,1.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path544" /><path
         d="m -20.35,271.975 -0.625,1.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path546" /><path
         d="m -20.975,273.825 -0.5,1.975"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path548" /><path
         d="m -21.475,275.8 -0.375,2.075"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path550" /><path
         d="M -21.85,277.875 -22.075,280"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path552" /><path
         d="m -22.075,280 -0.075,2.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path554" /><path
         d="m -22.15,282.175 0.075,2.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path556" /><path
         d="m -22.075,284.35 0.2,2.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path558" /><path
         d="m -21.875,286.5 0.3,2.125"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path560" /><path
         d="m -21.575,288.625 0.45,2.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path562" /><path
         d="m -21.125,290.65 0.55,1.925"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path564" /><path
         d="m -20.575,292.575 0.65,1.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path566" /><path
         d="m -19.925,294.375 0.725,1.675"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path568" /><path
         d="m -19.2,296.05 0.8,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path570" /><path
         d="m -18.4,297.5 0.85,1.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path572" /><path
         d="m -17.55,298.8 0.875,1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path574" /><path
         d="m -16.675,299.9 0.925,0.925"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path576" /><path
         d="m -15.75,300.825 0.9,0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path578" /><path
         d="m -14.85,301.525 0.9,0.475"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path580" /><path
         d="m -13.95,302 0.875,0.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path582" /><path
         d="m -13.075,302.3 0.825,0.075"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path584" /><path
         d="m -12.25,302.375 0.75,-0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path586" /><path
         d="M -11.5,302.275 -10.825,302"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path588" /><path
         d="m -10.825,302 0.575,-0.475"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path590" /><path
         d="M -10.25,301.525 -9.775,300.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path592" /><path
         d="M -9.775,300.9 -9.4,300.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path594" /><path
         d="m -9.4,300.15 0.225,-0.875"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path596" /><path
         d="m -9.175,299.275 0.1,-1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path598" /><path
         d="m -9.075,298.275 -0.05,-1.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path600" /><path
         d="M -9.125,297.225 -9.3,296.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path602" /><path
         d="m -9.3,296.1 -0.35,-1.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path604" /><path
         d="m -9.65,294.925 -0.5,-1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path606" /><path
         d="m -10.15,293.725 -0.625,-1.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path608" /><path
         d="m -10.775,292.55 -0.775,-1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path610" /><path
         d="m -11.55,291.35 -0.9,-1.125"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path612" /><path
         d="m -12.45,290.225 -1.05,-1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path614" /><path
         d="m -13.5,289.125 -1.15,-1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path616" /><path
         d="M -14.65,288.125 -15.9,287.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path618" /><path
         d="m -15.9,287.2 -1.325,-0.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path620" /><path
         d="m -17.225,286.4 -1.425,-0.675"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path622" /><path
         d="m -18.65,285.725 -1.475,-0.575"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path624" /><path
         d="m -20.125,285.15 -1.5,-0.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path626" /><path
         d="m -21.625,284.75 -1.525,-0.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path628" /><path
         d="m -23.15,284.475 -1.5,-0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path630" /><path
         d="m -24.65,284.375 -1.5,0.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path632" /><path
         d="m -26.15,284.425 -1.45,0.225"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path634" /><path
         d="m -27.6,284.65 -1.4,0.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path636" /><path
         d="m -29,285.025 -1.275,0.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path638" /><path
         d="m -30.275,285.55 -1.2,0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path640" /><path
         d="m -31.475,286.25 -1.05,0.825"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path642" /><path
         d="m -32.525,287.075 -0.925,0.975"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path644" /><path
         d="m -33.45,288.05 -0.725,1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path646" /><path
         d="m -34.175,289.15 -0.575,1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path648" /><path
         d="m -34.75,290.35 -0.375,1.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path650" /><path
         d="m -35.125,291.65 -0.175,1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path652" /><path
         d="m -35.3,293.025 0.05,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path654" /><path
         d="m -35.25,294.475 0.25,1.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path656" /><path
         d="m -35,295.975 0.475,1.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path658" /><path
         d="m -34.525,297.5 0.675,1.55"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path660" /><path
         d="m -33.85,299.05 0.9,1.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path662" /><path
         d="m -32.95,300.575 1.1,1.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path664" /><path
         d="m -31.85,302.1 1.3,1.475"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path666" /><path
         d="M -30.55,303.575 -29.1,305"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path668" /><path
         d="m -29.1,305 1.6,1.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path670" /><path
         d="m -27.5,306.35 1.75,1.25"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path672" /><path
         d="m -25.75,307.6 1.825,1.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path674" /><path
         d="M -23.925,308.75 -22,309.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path676" /><path
         d="m -22,309.8 1.975,0.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path678" /><path
         d="m -20.025,310.7 1.975,0.775"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path680" /><path
         d="m -18.05,311.475 1.975,0.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path682" /><path
         d="m -16.075,312.125 1.95,0.475"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path684" /><path
         d="m -14.125,312.6 1.9,0.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path686" /><path
         d="m -12.225,312.95 1.775,0.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path688" /><path
         d="m -10.45,313.15 1.7,0.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path690" /><path
         d="m -8.75,313.2 1.55,-0.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path692" /><path
         d="m -7.2,313.1 1.4,-0.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path694" /><path
         d="m -5.8,312.9 1.25,-0.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path696" /><path
         d="m -4.55,312.575 1.05,-0.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path698" /><path
         d="M -3.5,312.125 -2.625,311.6"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path700" /><path
         d="m -2.625,311.6 0.7,-0.625"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path702" /><path
         d="m -1.925,310.975 0.475,-0.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path704" /><path
         d="M -1.45,310.325 -1.175,309.6"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path706" /><path
         d="m -1.175,309.6 0.1,-0.725"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path708" /><path
         d="m -1.075,308.875 -0.1,-0.75"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path710" /><path
         d="m -1.175,308.125 -0.3,-0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path712" /><path
         d="m -1.475,307.425 -0.475,-0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path714" /><path
         d="m -1.95,306.725 -0.65,-0.65"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path716" /><path
         d="M -2.6,306.075 -3.4,305.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path718" /><path
         d="M -3.4,305.5 -4.35,305"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path720" /><path
         d="m -4.35,305 -1.075,-0.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path722" /><path
         d="m -5.425,304.6 -1.2,-0.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path724" /><path
         d="M -6.625,304.325 -7.9,304.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path726" /><path
         d="M -7.9,304.15 -9.25,304.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path728" /><path
         d="m -9.25,304.1 -1.425,0.075"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path730" /><path
         d="M -10.675,304.175 -12.1,304.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path732" /><path
         d="m -12.1,304.4 -1.45,0.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path734" /><path
         d="M -13.55,304.75 -15,305.225"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path736" /><path
         d="m -15,305.225 -1.425,0.625"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path738" /><path
         d="m -16.425,305.85 -1.375,0.775"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path740" /><path
         d="m -17.8,306.625 -1.3,0.875"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path742" /><path
         d="m -19.1,307.5 -1.225,1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path744" /><path
         d="m -20.325,308.5 -1.1,1.1"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path746" /><path
         d="m -21.425,309.6 -0.975,1.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path748" /><path
         d="m -22.4,310.775 -0.875,1.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path750" /><path
         d="m -23.275,312.05 -0.7,1.3"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path752" /><path
         d="m -23.975,313.35 -0.525,1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path754" /><path
         d="m -24.5,314.725 -0.375,1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path756" /><path
         d="m -24.875,316.1 -0.175,1.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path758" /><path
         d="m -25.05,317.5 v 1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path760" /><path
         d="m -25.05,318.875 0.2,1.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path762" /><path
         d="m -24.85,320.2 0.375,1.275"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path764" /><path
         d="m -24.475,321.475 0.575,1.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path766" /><path
         d="m -23.9,322.675 0.75,1.075"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path768" /><path
         d="m -23.15,323.75 0.95,0.975"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path770" /><path
         d="m -22.2,324.725 1.1,0.85"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path772" /><path
         d="m -21.1,325.575 1.275,0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path774" /><path
         d="m -19.825,326.275 1.45,0.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path776" /><path
         d="m -18.375,326.8 1.55,0.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path778" /><path
         d="m -16.825,327.15 1.7,0.175"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path780" /><path
         d="m -15.125,327.325 h 1.775"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path782" /><path
         d="m -13.35,327.325 1.85,-0.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path784" /><path
         d="m -11.5,327.125 1.925,-0.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path786" /><path
         d="M -9.575,326.75 -7.6,326.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path788" /><path
         d="m -7.6,326.2 1.95,-0.7"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path790" /><path
         d="m -5.65,325.5 1.975,-0.875"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path792" /><path
         d="m -3.675,324.625 1.9,-1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path794" /><path
         d="m -1.775,323.6 1.85,-1.15"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path796" /><path
         d="M 0.075,322.45 1.85,321.2"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path798" /><path
         d="M 1.85,321.2 3.5,319.875"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path800" /><path
         d="m 3.5,319.875 1.55,-1.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path802" /><path
         d="m 5.05,318.475 1.4,-1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path804" /><path
         d="m 6.45,317.025 1.225,-1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path806" /><path
         d="m 7.675,315.575 1.075,-1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path808" /><path
         d="m 8.75,314.125 0.9,-1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path810" /><path
         d="m 9.65,312.675 0.7,-1.375"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path812" /><path
         d="m 10.35,311.3 0.5,-1.325"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path814" /><path
         d="m 10.85,309.975 0.35,-1.25"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path816" /><path
         d="M 11.2,308.725 11.35,307.6"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path818" /><path
         d="m 11.35,307.6 -0.025,-1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path820" /><path
         d="m 11.325,306.575 -0.2,-0.9"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path822" /><path
         d="M 11.125,305.675 10.8,304.925"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path824" /><path
         d="m 10.8,304.925 -0.475,-0.6"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path826" /><path
         d="m 10.325,304.325 -0.6,-0.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path828" /><path
         d="M 9.725,303.875 9.05,303.6"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path830" /><path
         d="M 9.05,303.6 8.275,303.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path832" /><path
         d="m 8.275,303.5 -0.85,0.05"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path834" /><path
         d="M 7.425,303.55 6.55,303.8"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path836" /><path
         d="m 6.55,303.8 -0.9,0.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path838" /><path
         d="m 5.65,304.2 -0.9,0.575"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path840" /><path
         d="m 4.75,304.775 -0.875,0.75"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path842" /><path
         d="M 3.875,305.525 3.025,306.4"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path844" /><path
         d="m 3.025,306.4 -0.8,1.025"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path846" /><path
         d="M 2.225,307.425 1.5,308.575"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path848" /><path
         d="m 1.5,308.575 -0.625,1.25"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path850" /><path
         d="m 0.875,309.825 -0.55,1.35"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path852" /><path
         d="m 0.325,311.175 -0.375,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path854" /><path
         d="m -0.05,312.625 -0.3,1.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path856" /><path
         d="m -0.35,314.125 -0.175,1.525"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path858" /><path
         d="m -0.525,315.65 -0.025,1.575"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path860" /><path
         d="m -0.55,317.225 0.1,1.575"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path862" /><path
         d="m -0.45,318.8 0.275,1.55"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path864" /><path
         d="m -0.175,320.35 0.35,1.5"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path866" /><path
         d="m 0.175,321.85 0.55,1.45"
         style="fill:none;stroke:#000000;stroke-width:0.2"
         id="path868" /></g></g></svg>
	#!/usr/bin/env python3
	# hootnanny.py - simulate Hoot-Nanny / Magic Designer drawing toy
	# Currently hard-coded to output figure "25KM" in HP-GL,
	# a simple but somewhat obsolete plotting language.
	# Output figures as close to actual sizes as I could manage.
	# All dimensions in inches, unfortunately, but HP-GL is bilingual.
	# scruss, 2022-02 - code cleanup - 2022-12
	# Licence: CC-BY-SA - share freely, but credit me and make your
	# improvements freely available for all
	# -- coding: utf-8 --

	from math import sin, cos, sqrt, radians, degrees, atan2


	def arm_length(letter):
	"""
	each metal arm has pivot holes marked A - R, at 1/4" spacing
	from 5.75 to 1.5". The perpendicular distance from the pivot holes
	to the pencil is 5/16". This doesn't add much to the overall arm
	length, but it's easy to take into account
	"""
	if len(letter) > 1 or letter > "R" or letter < "A":
	# wrong input
	return None
	return sqrt(
	(5.75 - (ord(letter) - ord("A")) / 4.0) 2 + (5 / 16) 2
	)


	def angle_setting(deg):
	"""
	the hoot-nanny has two smaller gears: one fixed, the other on a movable
	track with a scale 10 to 70 degrees. The indicator isn't the same as the
	angle between the gears: when 40 degrees is indicated, the gears are
	60 degrees apart. So the actual range is 30 to 90 degrees.

	The smaller gears are 1" in diameter (32 teeth) on a 7" PCD
	Each smaller gear has a pivot point for the arms at 3/8" radius
	The large gear is 6" in diameter (192 teeth)
	"""
	return 20 + deg


	def distance(p1, p2):
	"""
	return Euclidean distance between two points in 2d space
	Note that I'm using a two element list to represent [x, y]
	"""
	return sqrt((p1[0] - p2[0]) 2 + (p1[1] - p2[1]) 2)


	def epitrochoid(r1, r2, d, theta):
	"""
	If you held the paper on the Hoot-Nanny fixed, the smaller
	gears would describe epitrochoids around the larger
	"""
	return [
	(r1 + r2) * cos(theta) - d * cos(((r1 + r2) / r2) * theta),
	(r1 + r2) * sin(theta) - d * sin(((r1 + r2) / r2) * theta),
	]


	def nearest_circle_intersection(p0, p1, r0, r1):
	"""
	return the intersection point of two circles nearer the origin
	if equidistant, may not return the point you expect
	"""
	d = distance(p0, p1)
	a = (r02 - r12 + d*2) / (2 d)
	h = sqrt(r02 - a2)
	x2 = p0[0] + a * (p1[0] - p0[0]) / d
	y2 = p0[1] + a * (p1[1] - p0[1]) / d
	p3 = [x2 + h * (p1[1] - p0[1]) / d, y2 - h * (p1[0] - p0[0]) / d]
	p4 = [x2 - h * (p1[1] - p0[1]) / d, y2 + h * (p1[0] - p0[0]) / d]
	if distance(p3, [0, 0]) <= distance(p4, [0, 0]):
	return p3
	else:
	return p4


	# this is where I hard-code the "25KM" setting
	arm1 = arm_length("K")
	arm2 = arm_length("M")
	t = angle_setting(25)

	# output the figure in HP-GL: it may be old, but it's very simple
	# the path steps around a circle once in full degrees
	for i in range(360):
	"""
	p is the fixed smaller gear path:
	* large radius = 3"
	* small radius = 1/2"
	* cam arm length = 3/8"
	"""
	p = epitrochoid(3, 1 / 2, 3 / 8, radians(i))
	# q is the movable smaller gear path
	q = epitrochoid(3, 1 / 2, 3 / 8, radians(i - t))
	# pencil holder is where the two arms intersect
	# coordinates of ph are [x, y] in inches (blecch)
	ph = nearest_circle_intersection(p, q, arm1, arm2)
	# scale to HP-GL units: 40 units / mm == 1016 units / inch
	# thanks, Carl Edvard Johansson!
	x = int(1016 * ph[0])
	y = int(1016 * ph[1])
	if i == 0:
	# initialize and plot first point
	print("IN;") # HP-GL INitialize plotter
	print("SP1;") # HP-GL Select Pen 1
	print("PU", x, ",", y, ";") # HP-GL Pen Up (= move) to x, y
	print("PD;") # HP-GL Pen Down (= plot)
	# save first point to close figure
	first = [x, y]
	else:
	print("PD", x, ",", y, ";") # HP-GL Pen Down (= plot) to x, y
	# close figure
	print("PD", first[0], ",", first[1], ";")
	# plot is now finished, so pick up pen and put it away
	print("PU;") # HP-GL Pen Up (= pick up pen, if no coordinates)
	print("SP0;") # HP-GL Select Pen 0 (= put the pen away)
	IN;
	SP1;
	PU 29 , -1052 ;
	PD;
	PD 55 , -1107 ;
	PD 87 , -1158 ;
	PD 124 , -1203 ;
	PD 164 , -1244 ;
	PD 209 , -1278 ;
	PD 256 , -1305 ;
	PD 306 , -1325 ;
	PD 358 , -1338 ;
	PD 411 , -1342 ;
	PD 464 , -1337 ;
	PD 516 , -1324 ;
	PD 568 , -1302 ;
	PD 617 , -1272 ;
	PD 664 , -1233 ;
	PD 708 , -1186 ;
	PD 748 , -1131 ;
	PD 783 , -1069 ;
	PD 814 , -1001 ;
	PD 839 , -927 ;
	PD 859 , -848 ;
	PD 874 , -765 ;
	PD 883 , -680 ;
	PD 886 , -593 ;
	PD 883 , -506 ;
	PD 875 , -420 ;
	PD 863 , -335 ;
	PD 845 , -254 ;
	PD 823 , -177 ;
	PD 797 , -105 ;
	PD 768 , -38 ;
	PD 736 , 20 ;
	PD 702 , 72 ;
	PD 667 , 116 ;
	PD 630 , 153 ;
	PD 594 , 181 ;
	PD 558 , 200 ;
	PD 523 , 212 ;
	PD 490 , 215 ;
	PD 460 , 211 ;
	PD 433 , 200 ;
	PD 410 , 181 ;
	PD 391 , 156 ;
	PD 376 , 126 ;
	PD 367 , 91 ;
	PD 363 , 51 ;
	PD 365 , 9 ;
	PD 372 , -36 ;
	PD 386 , -83 ;
	PD 406 , -131 ;
	PD 431 , -178 ;
	PD 462 , -226 ;
	PD 498 , -271 ;
	PD 540 , -315 ;
	PD 586 , -355 ;
	PD 636 , -392 ;
	PD 689 , -424 ;
	PD 746 , -451 ;
	PD 805 , -474 ;
	PD 865 , -490 ;
	PD 926 , -501 ;
	PD 986 , -505 ;
	PD 1046 , -503 ;
	PD 1104 , -494 ;
	PD 1160 , -479 ;
	PD 1211 , -458 ;
	PD 1259 , -430 ;
	PD 1301 , -397 ;
	PD 1338 , -358 ;
	PD 1367 , -314 ;
	PD 1390 , -266 ;
	PD 1405 , -214 ;
	PD 1412 , -159 ;
	PD 1410 , -101 ;
	PD 1400 , -41 ;
	PD 1381 , 20 ;
	PD 1354 , 82 ;
	PD 1318 , 143 ;
	PD 1274 , 204 ;
	PD 1222 , 263 ;
	PD 1164 , 320 ;
	PD 1100 , 374 ;
	PD 1030 , 424 ;
	PD 957 , 470 ;
	PD 880 , 512 ;
	PD 801 , 548 ;
	PD 722 , 579 ;
	PD 643 , 605 ;
	PD 565 , 624 ;
	PD 489 , 638 ;
	PD 418 , 646 ;
	PD 350 , 648 ;
	PD 288 , 644 ;
	PD 232 , 636 ;
	PD 182 , 623 ;
	PD 140 , 605 ;
	PD 105 , 584 ;
	PD 77 , 559 ;
	PD 58 , 533 ;
	PD 47 , 504 ;
	PD 43 , 475 ;
	PD 47 , 445 ;
	PD 59 , 417 ;
	PD 78 , 389 ;
	PD 104 , 363 ;
	PD 136 , 340 ;
	PD 174 , 320 ;
	PD 217 , 304 ;
	PD 265 , 293 ;
	PD 316 , 286 ;
	PD 370 , 284 ;
	PD 427 , 287 ;
	PD 484 , 296 ;
	PD 542 , 310 ;
	PD 600 , 329 ;
	PD 657 , 354 ;
	PD 712 , 385 ;
	PD 764 , 420 ;
	PD 813 , 460 ;
	PD 857 , 504 ;
	PD 896 , 551 ;
	PD 931 , 602 ;
	PD 959 , 654 ;
	PD 980 , 709 ;
	PD 995 , 764 ;
	PD 1002 , 820 ;
	PD 1002 , 875 ;
	PD 994 , 928 ;
	PD 979 , 979 ;
	PD 956 , 1027 ;
	PD 926 , 1070 ;
	PD 888 , 1109 ;
	PD 844 , 1143 ;
	PD 793 , 1171 ;
	PD 735 , 1192 ;
	PD 673 , 1206 ;
	PD 605 , 1213 ;
	PD 534 , 1213 ;
	PD 460 , 1205 ;
	PD 383 , 1190 ;
	PD 304 , 1168 ;
	PD 226 , 1140 ;
	PD 147 , 1105 ;
	PD 71 , 1064 ;
	PD -3 , 1018 ;
	PD -74 , 968 ;
	PD -140 , 915 ;
	PD -202 , 859 ;
	PD -258 , 801 ;
	PD -307 , 743 ;
	PD -350 , 685 ;
	PD -386 , 627 ;
	PD -414 , 572 ;
	PD -434 , 519 ;
	PD -448 , 469 ;
	PD -454 , 424 ;
	PD -453 , 383 ;
	PD -445 , 347 ;
	PD -432 , 317 ;
	PD -413 , 293 ;
	PD -389 , 275 ;
	PD -362 , 264 ;
	PD -331 , 260 ;
	PD -297 , 262 ;
	PD -262 , 272 ;
	PD -226 , 288 ;
	PD -190 , 311 ;
	PD -155 , 341 ;
	PD -121 , 376 ;
	PD -89 , 417 ;
	PD -60 , 463 ;
	PD -35 , 513 ;
	PD -13 , 567 ;
	PD 2 , 625 ;
	PD 14 , 685 ;
	PD 21 , 746 ;
	PD 22 , 809 ;
	PD 18 , 872 ;
	PD 7 , 934 ;
	PD -7 , 994 ;
	PD -29 , 1052 ;
	PD -55 , 1107 ;
	PD -87 , 1158 ;
	PD -124 , 1203 ;
	PD -164 , 1244 ;
	PD -209 , 1278 ;
	PD -256 , 1305 ;
	PD -306 , 1325 ;
	PD -358 , 1338 ;
	PD -411 , 1342 ;
	PD -464 , 1337 ;
	PD -516 , 1324 ;
	PD -568 , 1302 ;
	PD -617 , 1272 ;
	PD -664 , 1233 ;
	PD -708 , 1186 ;
	PD -748 , 1131 ;
	PD -783 , 1069 ;
	PD -814 , 1001 ;
	PD -839 , 927 ;
	PD -859 , 848 ;
	PD -874 , 765 ;
	PD -883 , 680 ;
	PD -886 , 593 ;
	PD -883 , 506 ;
	PD -875 , 420 ;
	PD -863 , 335 ;
	PD -845 , 254 ;
	PD -823 , 177 ;
	PD -797 , 105 ;
	PD -768 , 38 ;
	PD -736 , -20 ;
	PD -702 , -72 ;
	PD -667 , -116 ;
	PD -630 , -153 ;
	PD -594 , -181 ;
	PD -558 , -200 ;
	PD -523 , -212 ;
	PD -490 , -215 ;
	PD -460 , -211 ;
	PD -433 , -200 ;
	PD -410 , -181 ;
	PD -391 , -156 ;
	PD -376 , -126 ;
	PD -367 , -91 ;
	PD -363 , -51 ;
	PD -365 , -9 ;
	PD -372 , 36 ;
	PD -386 , 83 ;
	PD -406 , 131 ;
	PD -431 , 178 ;
	PD -462 , 226 ;
	PD -498 , 271 ;
	PD -540 , 315 ;
	PD -586 , 355 ;
	PD -636 , 392 ;
	PD -689 , 424 ;
	PD -746 , 451 ;
	PD -805 , 474 ;
	PD -865 , 490 ;
	PD -926 , 501 ;
	PD -986 , 505 ;
	PD -1046 , 503 ;
	PD -1104 , 494 ;
	PD -1160 , 479 ;
	PD -1211 , 458 ;
	PD -1259 , 430 ;
	PD -1301 , 397 ;
	PD -1338 , 358 ;
	PD -1367 , 314 ;
	PD -1390 , 266 ;
	PD -1405 , 214 ;
	PD -1412 , 159 ;
	PD -1410 , 101 ;
	PD -1400 , 41 ;
	PD -1381 , -20 ;
	PD -1354 , -82 ;
	PD -1318 , -143 ;
	PD -1274 , -204 ;
	PD -1222 , -263 ;
	PD -1164 , -320 ;
	PD -1100 , -374 ;
	PD -1030 , -424 ;
	PD -957 , -470 ;
	PD -880 , -512 ;
	PD -801 , -548 ;
	PD -722 , -579 ;
	PD -643 , -605 ;
	PD -565 , -624 ;
	PD -489 , -638 ;
	PD -418 , -646 ;
	PD -350 , -648 ;
	PD -288 , -644 ;
	PD -232 , -636 ;
	PD -182 , -623 ;
	PD -140 , -605 ;
	PD -105 , -584 ;
	PD -77 , -559 ;
	PD -58 , -533 ;
	PD -47 , -504 ;
	PD -43 , -475 ;
	PD -47 , -445 ;
	PD -59 , -417 ;
	PD -78 , -389 ;
	PD -104 , -363 ;
	PD -136 , -340 ;
	PD -174 , -320 ;
	PD -217 , -304 ;
	PD -265 , -293 ;
	PD -316 , -286 ;
	PD -370 , -284 ;
	PD -427 , -287 ;
	PD -484 , -296 ;
	PD -542 , -310 ;
	PD -600 , -329 ;
	PD -657 , -354 ;
	PD -712 , -385 ;
	PD -764 , -420 ;
	PD -813 , -460 ;
	PD -857 , -504 ;
	PD -896 , -551 ;
	PD -931 , -602 ;
	PD -959 , -654 ;
	PD -980 , -709 ;
	PD -995 , -764 ;
	PD -1002 , -820 ;
	PD -1002 , -875 ;
	PD -994 , -928 ;
	PD -979 , -979 ;
	PD -956 , -1027 ;
	PD -926 , -1070 ;
	PD -888 , -1109 ;
	PD -844 , -1143 ;
	PD -793 , -1171 ;
	PD -735 , -1192 ;
	PD -673 , -1206 ;
	PD -605 , -1213 ;
	PD -534 , -1213 ;
	PD -460 , -1205 ;
	PD -383 , -1190 ;
	PD -304 , -1168 ;
	PD -226 , -1140 ;
	PD -147 , -1105 ;
	PD -71 , -1064 ;
	PD 3 , -1018 ;
	PD 74 , -968 ;
	PD 140 , -915 ;
	PD 202 , -859 ;
	PD 258 , -801 ;
	PD 307 , -743 ;
	PD 350 , -685 ;
	PD 386 , -627 ;
	PD 414 , -572 ;
	PD 434 , -519 ;
	PD 448 , -469 ;
	PD 454 , -424 ;
	PD 453 , -383 ;
	PD 445 , -347 ;
	PD 432 , -317 ;
	PD 413 , -293 ;
	PD 389 , -275 ;
	PD 362 , -264 ;
	PD 331 , -260 ;
	PD 297 , -262 ;
	PD 262 , -272 ;
	PD 226 , -288 ;
	PD 190 , -311 ;
	PD 155 , -341 ;
	PD 121 , -376 ;
	PD 89 , -417 ;
	PD 60 , -463 ;
	PD 35 , -513 ;
	PD 13 , -567 ;
	PD -2 , -625 ;
	PD -14 , -685 ;
	PD -21 , -746 ;
	PD -22 , -809 ;
	PD -18 , -872 ;
	PD -7 , -934 ;
	PD 7 , -994 ;
	PD 29 , -1052 ;
	PU;
	SP0;