/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: July 13, 1993 1:36:17 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: GGEventImplF, module: GGEventImplF */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [3925358136,1564944909] GGEventImplF";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; word r;} W17;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2;} W3;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; word r;} W9;
typedef struct {W8 f; W2 r;} W10;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W8 f; W3 r;} W11;
typedef struct {W8 f; W7 r;} W15;
typedef struct {W8 f; W4 r;} W12;
static float fc1 = 2.0;
#define SOURCE(p, l) /* source p, l */
static float fc358 = 0.0;
static float fc382 = 1.0;
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
static float fc532 = 1.0e37;
static float fc573 = -1.0;
static float fc636 = 2147483647.0;
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
static float fc709 = 17.0;
#define FABS(f, t) ( ((t=(f)) >= (float) 0.0) ? (t) : (- (t)) )
static float fc775 = 1.0E-3;
static float fc802 = -0.1;
static float fc921 = 300.0;
static void NoName←Q8580();
static void GGEventImplF←P0();
static void ScriptAction←P60();
static void ShowScripts←P120();
static void OpenScript←P180();
static void AppendToScript←P240();
static void CloseScript←P300();
static void PlaybackScript←P360();
static void FastPlayScript←P420();
static void MergeFromGargoyle←P480();
static void StuffIt←P540();
static word NoName←Q8640();
static void DoStuff←P4140();
static word NoName←Q8700();
static void DoStuffIt←P4344();
static void Grab←P600();
static void Top←P660();
static void ShowPriorityValue←P720();
static void Bottom←P780();
static void UpOne←P840();
static void DownOne←P900();
static void FindPriorityFromSelection←P960();
static void PutInFront←P1020();
static void PutBehind←P1080();
static void Exchange←P1140();
static word FindFirstTwo←P5172();
static void UpFromSelection←P1200();
static void DownFromSelection←P1260();
static void PutAtSelection←P1320();
static void EndNewObject←P1380();
static void PolygonInCircle←P1440();
static void NewBox←P1500();
static void NewCircle←P1560();
static void NewKnotchedLine←P1620();
static void NewArrow←P1680();
static void Frame←P1740();
static void SelectedBBox←P1800();
static void LineWidth←P1860();
static void SetStrokeWidth←P1920();
static word DoLineWidth←P5952();
static void LineEnds←P1980();
static void SetStrokeEnd←P2040();
static word DoLineEnds←P6060();
static void TrajJoints←P2100();
static word DoTrajJoints←P6168();
static void DashesFromSelection←P2160();
static word NoName←Q8760();
static void SetDashed←P2220();
static word DoDashes←P6324();
static void DashesOff←P2280();
static void GetSelectedDashPattern←P2340();
static word DoCheckStrokeValues←P6384();
static void GetSelectedStrokeWidth←P2400();
static word DoCheckWidth←P6444();
static void GetSelectedStrokeEnd←P2460();
static word DoCheckEnd←P6504();
static void GetSelectedStrokeJoint←P2520();
static word DoCheckJoint←P6564();
static void PrintStrokeValues←P2580();
static void CopyStrokeValues←P2640();
static word DoCopyStroke←P6720();
static word GetDashesRope←P2700();
static word GetEndRope←P2760();
static word GetJointRope←P2820();
static void SelectMatchingWidth←P2880();
static word DoSelectMatching←P6972();
static word WidthProc←P7032();
static void SelectMatchingDashes←P2940();
static word NoName←Q8820();
static word DoSelectMatching←P7140();
static word DashProc←P7200();
static void SetDefaultStrokeValues←P3000();
static void ShowDefaultStrokeValues←P3060();
static void Arrows←P3120();
static word DoArrows←P7404();
static void SelectAll←P3180();
static void DeselectAll←P3240();
static void CycleSelection←P3300();
static void MoveSelection←P3360();
static void AreaSelectNew←P3420();
static void AreaSelectNewAndDelete←P3480();
static word DoDelete←P7512();
static void AreaSelectExtend←P3540();
static void AreaSelectAux←P3600();
static word DoTestAllSlices←P7620();
static word DoTestSlice←P7728();
static void SelectCoincident←P3660();
static word DoCheckSegments←P7788();
static word CoincidentProc←P7848();
static void SelectUnseeableSegs←P3720();
static word DoCheckSegments←P7908();
static word UnseeProc←P8016();
static void SelectUnseeableObjs←P3780();
static word DoCheckSegments←P8076();
static word UnseeProc←P8136();
static void TallyUnseeableObjects←P8196();
static word IsBlackHole←P8256();
static word AllColinear←P8412();
static void RegisterEventProcs←P3840();
static void NoName←Q8880();
static void NoName←Q8940();
static void NoName←Q9000();
static void NoName←Q9060();
static struct {unsigned f; char r[4];} string2 = {65540, "\251\000\000"};
static struct {unsigned f; char r[4];} string3 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string4 = {65537, "\001\000\000"};
static struct {unsigned f; char r[48];} string5 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\371\314\343\307\300\031\056\017\130\100\324\005\004\162\145\163\164\214\216\257\300\371\314\343\307\300\031\056\017\130\100\324\261\000\000\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\004\003\000"};
static struct {unsigned f; char r[4];} string7 = {65540, "\256\000\000"};
static struct {unsigned f; char r[20];} string8 = {1179668, "\260\006\005\146\151\162\163\164\217\005\004\162\145\163\164\214\217\261\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\104\304\000\000"};
static struct {unsigned f; char r[24];} string10 = {1376277, "\007\000\001\002\007\020\001\002\000\007\036\002\004\003\002\004\014\016\015\003\001\000\000"};
static struct {unsigned f; char r[16];} string11 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[44];} string12 = {2752556, "\260\006\005\146\151\162\163\164\257\300\015\277\004\146\300\034\367\146\045\112\114\005\004\162\145\163\164\214\257\300\015\277\004\146\300\034\367\146\045\112\114\261\000"};
static struct {unsigned f; char r[28];} string13 = {1572888, "\006\002\000\007\000\040\016\000\003\001\000\000\000\000\014\014\000\014\014\014\014\000\010\001\000\000\000"};
static struct {unsigned f; char r[4];} string14 = {65540, "\242\000\000"};
static struct {unsigned f; char r[32];} string15 = {1966112, "Merge from Gargoyle: completed\000"};
static struct {unsigned f; char r[32];} string16 = {1900576, "ObjectChangedBoundBoxProvided\000\000"};
static struct {unsigned f; char r[48];} string17 = {3014704, "Stuff failed: select some objects for stuffing\000"};
static struct {unsigned f; char r[16];} string18 = {786448, "IPToTiogaAlt\000\000\000"};
static struct {unsigned f; char r[12];} string19 = {589836, "IPToTioga\000\000"};
static struct {unsigned f; char r[20];} string20 = {1114132, "IPToTiogaBordered\000\000"};
static struct {unsigned f; char r[16];} string21 = {786448, "IPToTiogaFit\000\000\000"};
static struct {unsigned f; char r[24];} string22 = {1507352, "IPToTiogaBorderedAndFit"};
static struct {unsigned f; char r[16];} string23 = {983056, "StuffToTiogaAlt"};
static struct {unsigned f; char r[16];} string24 = {917520, "StuffToFileAlt\000"};
static struct {unsigned f; char r[12];} string25 = {720908, "StuffToFile"};
static struct {unsigned f; char r[24];} string26 = {1310744, "StuffToTiogaBordered\000\000\000"};
static struct {unsigned f; char r[28];} string27 = {1703964, "StuffToTiogaBorderedAndFit\000"};
static struct {unsigned f; char r[16];} string28 = {983056, "StuffToTiogaFit"};
static struct {unsigned f; char r[12];} string29 = {655372, "Statistics\000"};
static struct {unsigned f; char r[20];} string30 = {1245204, "Stuffing to file %g"};
static struct {unsigned f; char r[20];} string31 = {1179668, " Done in time (%r)\000"};
static struct {unsigned f; char r[44];} string32 = {2687020, "StuffToFile failed: no file name selected\000\000"};
static struct {unsigned f; char r[40];} string33 = {2424872, "StuffToFile failed: could not open %g\000\000"};
static struct {unsigned f; char r[60];} string34 = {3735612, "Stuff failed: install Artwork, then retry Stuff operation\000\000"};
static struct {unsigned f; char r[92];} string35 = {5832796, "Stuff failed: stuffing requires a node level Tioga selection (pending delete for replace)\000\000"};
static struct {unsigned f; char r[8];} string36 = {327688, "Stuff\000\000"};
static struct {unsigned f; char r[12];} string37 = {524300, "Gargoyle\000\000\000"};
static struct {unsigned f; char r[24];} string38 = {1507352, "Stuffing from file %g. "};
static struct {unsigned f; char r[24];} string39 = {1376280, "stuffed from %g at %g\000\000"};
static struct {unsigned f; char r[8];} string40 = {393224, "GGFile\000"};
static struct {unsigned f; char r[20];} string41 = {1114132, "Stuffing complete\000\000"};
static struct {unsigned f; char r[12];} string42 = {524300, "Feedback\000\000\000"};
static struct {unsigned f; char r[16];} string43 = {786448, "GetFromTioga\000\000\000"};
static struct {unsigned f; char r[8];} string44 = {327688, "Clear\000\000"};
static struct {unsigned f; char r[20];} string45 = {1179668, "Grabbing node ... \000"};
static struct {unsigned f; char r[16];} string46 = {851984, "SawTextFinish\000\000"};
static struct {unsigned f; char r[20];} string47 = {1048596, "PaintEntireScene\000\000\000"};
static struct {unsigned f; char r[64];} string48 = {4063296, "FromTioga failed: malformed Gargoyle property on selected node\000"};
static struct {unsigned f; char r[64];} string49 = {3997760, "FromTioga failed: no Gargoyle property on selected Tioga node\000\000"};
static struct {unsigned f; char r[56];} string50 = {3473464, "Front failed: select some objects for moving to front\000\000"};
static struct {unsigned f; char r[4];} string51 = {196612, "Top"};
static struct {unsigned f; char r[44];} string52 = {2752556, "Front: selected objects moved to the front\000"};
static struct {unsigned f; char r[24];} string53 = {1310744, "ObjectChangedInPlace\000\000\000"};
static struct {unsigned f; char r[64];} string54 = {4063296, "ShowPriority failed: select exactly one slice to show priority\000"};
static struct {unsigned f; char r[20];} string55 = {1048596, "ShowPriority: %g\000\000\000"};
static struct {unsigned f; char r[52];} string56 = {3342388, "Back failed: select some objects for moving to back"};
static struct {unsigned f; char r[8];} string57 = {393224, "Bottom\000"};
static struct {unsigned f; char r[44];} string58 = {2621484, "Back: selected objects moved to the back\000\000\000"};
static struct {unsigned f; char r[60];} string59 = {3735612, "ForwardOne failed: select some objects for moving forward\000\000"};
static struct {unsigned f; char r[8];} string60 = {393224, "Up one\000"};
static struct {unsigned f; char r[64];} string61 = {3997760, "ForwardOne: selected objects moved one slice toward the front\000\000"};
static struct {unsigned f; char r[60];} string62 = {3670076, "BackOne failed: select some objects for moving backwards\000\000\000"};
static struct {unsigned f; char r[12];} string63 = {524300, "Down one\000\000\000"};
static struct {unsigned f; char r[60];} string64 = {3735612, "BackOne: selected objects moved one slice toward the back\000\000"};
static struct {unsigned f; char r[20];} string65 = {1245204, "Merge from Gargoyle"};
static struct {unsigned f; char r[60];} string66 = {3735612, "MatchPriority failed: select a reasonable priority number\000\000"};
static struct {unsigned f; char r[48];} string67 = {2949168, "MatchPriority: object at priority %g selected\000\000"};
static struct {unsigned f; char r[20];} string68 = {1048596, "SelectionChanged\000\000\000"};
static struct {unsigned f; char r[64];} string69 = {4063296, "PutInFront failed: select at least two slices for put in front\000"};
static struct {unsigned f; char r[16];} string70 = {786448, "Put in front\000\000\000"};
static struct {unsigned f; char r[76];} string71 = {4784204, "PutInFront: first selected objects moved in front of last selected object\000\000"};
static struct {unsigned f; char r[60];} string72 = {3866684, "PutBehind failed: select at least two slices for put behind"};
static struct {unsigned f; char r[12];} string73 = {655372, "Put behind\000"};
static struct {unsigned f; char r[68];} string74 = {4390980, "PutBehind: first selected objects moved behind last selected object"};
static struct {unsigned f; char r[68];} string75 = {4259908, "Exchange failed: select exactly two top level slices for Exchange\000\000"};
static struct {unsigned f; char r[20];} string76 = {1245204, "Exchange priorities"};
static struct {unsigned f; char r[40];} string77 = {2359336, "Exchange: selected objects exchanged\000\000\000"};
static struct {unsigned f; char r[76];} string78 = {4784204, "ForwardFromSelection failed: select a positive integer for moving forward\000\000"};
static struct {unsigned f; char r[20];} string79 = {1114132, "Up from selection\000\000"};
static struct {unsigned f; char r[76];} string80 = {4718668, "ForwardFromSelection: selected objects moved toward the front %g slice%g\000\000\000"};
static struct {unsigned f; char r[72];} string81 = {4522056, "MergeFromGargoyle failed: place input focus in source Gargoyle viewer\000\000"};
static struct {unsigned f; char r[12];} string82 = {589836, "Complaint\000\000"};
static struct {unsigned f; char r[8];} string83 = {458760, "Refresh"};
static struct {unsigned f; char r[16];} string84 = {851984, "EnableRefresh\000\000"};
static struct {unsigned f; char r[72];} string85 = {4653128, "BackFromSelection failed: select a positive integer for moving backward"};
static struct {unsigned f; char r[20];} string86 = {1245204, "Down from selection"};
static struct {unsigned f; char r[72];} string87 = {4456520, "BackFromSelection: selected objects moved toward the back %g slice%g\000\000\000"};
static struct {unsigned f; char r[60];} string88 = {3866684, "PutAtSelection failed: select an integer for PutAtSelection"};
static struct {unsigned f; char r[68];} string89 = {4325444, "PutAtSelection failed: provide an  integer > -2 for PutAtSelection\000"};
static struct {unsigned f; char r[20];} string90 = {1048596, "Put at selection\000\000\000"};
static struct {unsigned f; char r[48];} string91 = {2883632, "PutAtSelection: selected objects moved to %g\000\000\000"};
static struct {unsigned f; char r[8];} string92 = {262152, "back\000\000\000"};
static struct {unsigned f; char r[8];} string93 = {327688, "front\000\000"};
static struct {unsigned f; char r[56];} string94 = {3473464, "PutAtSelection: selected objects moved to priority %g\000\000"};
static struct {unsigned f; char r[12];} string95 = {524300, "Add new \000\000\000"};
static struct {unsigned f; char r[32];} string96 = {1835040, "New%g: new %g added to scene\000\000\000"};
static struct {unsigned f; char r[16];} string97 = {917520, "DisableRefresh\000"};
static struct {unsigned f; char r[12];} string98 = {720908, "ObjectAdded"};
static struct {unsigned f; char r[52];} string99 = {3145780, "NewPolygon failed: caret required for NewPolygon\000\000\000"};
static struct {unsigned f; char r[64];} string100 = {4063296, "NewPolygon failed: select a reasonable number of polygon sides\000"};
static struct {unsigned f; char r[8];} string101 = {458760, "Polygon"};
static struct {unsigned f; char r[8];} string102 = {262152, "Show\000\000\000"};
static struct {unsigned f; char r[44];} string103 = {2621484, "NewBox failed: caret required for NewBox\000\000\000"};
static struct {unsigned f; char r[64];} string104 = {3932224, "NewBox failed: select a reasonable side length for a new box\000\000\000"};
static struct {unsigned f; char r[4];} string105 = {196612, "Box"};
static struct {unsigned f; char r[48];} string106 = {3014704, "NewCircle failed: caret required for NewCircle\000"};
static struct {unsigned f; char r[64];} string107 = {3997760, "NewCircle failed: select a reasonable radius for a new circle\000\000"};
static struct {unsigned f; char r[8];} string108 = {393224, "Circle\000"};
static struct {unsigned f; char r[60];} string109 = {3801148, "NewKnotchedLine failed: caret required for NewKnotchedLine\000"};
static struct {unsigned f; char r[84];} string110 = {5374036, "NewKnotchedLine failed: select reasonable length and count for a new knotched line\000"};
static struct {unsigned f; char r[16];} string111 = {851984, "Knotched line\000\000"};
static struct {unsigned f; char r[48];} string112 = {2883632, "NewArrow failed: caret required for NewArrow\000\000\000"};
static struct {unsigned f; char r[76];} string113 = {4784204, "NewArrow failed: select reasonable shaft and barb lengths for a new arrow\000\000"};
static struct {unsigned f; char r[8];} string114 = {327688, "Arrow\000\000"};
static struct {unsigned f; char r[56];} string115 = {3604536, "NewFrame failed: select reasonable dimensions for frame"};
static struct {unsigned f; char r[12];} string116 = {589836, "Add frame\000\000"};
static struct {unsigned f; char r[36];} string117 = {2228260, "NewFrame: New frame added to scene\000"};
static struct {unsigned f; char r[36];} string118 = {2228260, "SelectedBBox failed: no selections\000"};
static struct {unsigned f; char r[36];} string119 = {2162724, "Add bound box of selected objects\000\000"};
static struct {unsigned f; char r[52];} string120 = {3211316, "SelectedBBox: bound box of selected objects added\000\000"};
static struct {unsigned f; char r[64];} string121 = {4128832, "SetStrokeWidth failed: select some strokes for set stroke width"};
static struct {unsigned f; char r[76];} string122 = {4915276, "SetStrokeWidth failed: select a reasonable positive number for stroke width"};
static struct {unsigned f; char r[20];} string123 = {1048596, "Set stroke width\000\000\000"};
static struct {unsigned f; char r[56];} string124 = {3473464, "SetStrokeWidth: selected objects have stroke width %g\000\000"};
static struct {unsigned f; char r[12];} string125 = {524300, "FastPlay\000\000\000"};
static struct {unsigned f; char r[8];} string126 = {393224, "square\000"};
static struct {unsigned f; char r[8];} string127 = {262152, "butt\000\000\000"};
static struct {unsigned f; char r[8];} string128 = {327688, "round\000\000"};
static struct {unsigned f; char r[76];} string129 = {4849740, "EndFromSelection failed: select square, butt, or round for set stroke ends\000"};
static struct {unsigned f; char r[64];} string130 = {3932224, "SetStrokeEnd failed: select some objects for set stroke ends\000\000\000"};
static struct {unsigned f; char r[16];} string131 = {917520, "Set stroke end\000"};
static struct {unsigned f; char r[36];} string132 = {2293796, "Selected objects have stroke end %g"};
static struct {unsigned f; char r[72];} string133 = {4456520, "JointFromSelection failed: select some objects for set stroke joints\000\000\000"};
static struct {unsigned f; char r[8];} string134 = {327688, "miter\000\000"};
static struct {unsigned f; char r[8];} string135 = {327688, "bevel\000\000"};
static struct {unsigned f; char r[80];} string136 = {5111888, "JointFromSelection failed: select round, miter, or bevel for trajectory joints\000"};
static struct {unsigned f; char r[20];} string137 = {1048596, "Set stroke joint\000\000\000"};
static struct {unsigned f; char r[64];} string138 = {4128832, "JointFromSelection: selected trajectories have stroke joints %g"};
static struct {unsigned f; char r[100];} string139 = {6291556, "DashesFromSelection failed: select a legal specification with non-zero pattern (e.g. [4 10] 2 0)\000\000\000"};
static struct {unsigned f; char r[64];} string140 = {4063296, "DashesFromSelection failed: select some objects for set dashes\000"};
static struct {unsigned f; char r[12];} string141 = {589836, "Dashes on\000\000"};
static struct {unsigned f; char r[12];} string142 = {655372, "Dashes off\000"};
static struct {unsigned f; char r[32];} string143 = {2031648, "Selected objects have dashes %g"};
static struct {unsigned f; char r[76];} string144 = {4718668, "ShowStrokeValues failed: select at least one stroke for ShowStrokeValues\000\000\000"};
static struct {unsigned f; char r[56];} string145 = {3473464, "Stroke values: width: %g end: %g joint: %g dashes: %g\000\000"};
static struct {unsigned f; char r[12];} string146 = {524300, "Playback\000\000\000"};
static struct {unsigned f; char r[64];} string147 = {3932224, "ShowStrokeValues failed: multiple stroke values are selected\000\000\000"};
static struct {unsigned f; char r[88];} string148 = {5701720, "CopyStrokeValues failed: select at least one destination object, then one source stroke"};
static struct {unsigned f; char r[20];} string149 = {1179668, "Copy stroke values\000"};
static struct {unsigned f; char r[56];} string150 = {3473464, "Copied: stroke width: %g end: %g joint: %g dashes: %g\000\000"};
static struct {unsigned f; char r[96];} string151 = {6226016, "CopyStrokeValues failed: there are multiple stroke values in the source (last selected) object."};
static struct {unsigned f; char r[12];} string152 = {655372, "Not Dashed\000"};
static struct {unsigned f; char r[4];} string153 = {196612, "%g "};
static struct {unsigned f; char r[8];} string154 = {458760, "] %g %g"};
static struct {unsigned f; char r[8];} string155 = {262152, "none\000\000\000"};
static struct {unsigned f; char r[76];} string156 = {4718668, "MatchSelectedWidth failed: select a real number >=0.0 for matching width\000\000\000"};
static struct {unsigned f; char r[52];} string157 = {3145780, "MatchSelectedWidth: strokes of width %g selected\000\000\000"};
static struct {unsigned f; char r[56];} string158 = {3407928, "MatchSelectedDashes: strokes with dashes %g selected\000\000\000"};
static struct {unsigned f; char r[76];} string159 = {4915276, "MatchSelectedDashes failed: select a legal dash pattern for matching dashes"};
static struct {unsigned f; char r[76];} string160 = {4718668, "SetDefaultStrokeValues failed: no stroke selected for new default values\000\000\000"};
static struct {unsigned f; char r[8];} string161 = {327688, "Close\000\000"};
static struct {unsigned f; char r[8];} string162 = {393224, "Append\000"};
static struct {unsigned f; char r[104];} string163 = {6553704, "SetDefaultStrokeValues failed: there are multiple stroke values in the source (last selected) object\000\000\000"};
static struct {unsigned f; char r[64];} string164 = {3997760, "Default Stroke Values: width: %g end: %g joint: %g dashes: %g\000\000"};
static struct {unsigned f; char r[48];} string165 = {2949168, "Arrows failed: select some objects for arrows\000\000"};
static struct {unsigned f; char r[40];} string166 = {2424872, "Selected objects will have no arrows.\000\000"};
static struct {unsigned f; char r[48];} string167 = {2883632, "Selected objects will have left/down arrows.\000\000\000"};
static struct {unsigned f; char r[44];} string168 = {2818092, "Selected objects will have right/up arrows."};
static struct {unsigned f; char r[48];} string169 = {3080240, "Selected objects will have arrows on both ends."};
static struct {unsigned f; char r[44];} string170 = {2752556, "Arrows failed: illegal argument to Arrows.\000"};
static struct {unsigned f; char r[12];} string171 = {655372, "Set arrows\000"};
static struct {unsigned f; char r[8];} string172 = {262152, "Traj\000\000\000"};
static struct {unsigned f; char r[20];} string173 = {1114132, "Arrows: completed\000\000"};
static struct {unsigned f; char r[12];} string174 = {589836, "SelectAll\000\000"};
static struct {unsigned f; char r[32];} string175 = {2031648, "Select All: selected everything"};
static struct {unsigned f; char r[36];} string176 = {2293796, "Deselect All: deselected everything"};
static struct {unsigned f; char r[56];} string177 = {3407928, "CycleSelection failed: no selection cycler available\000\000\000"};
static struct {unsigned f; char r[8];} string178 = {458760, "Forward"};
static struct {unsigned f; char r[12];} string179 = {524300, "Backward\000\000\000"};
static struct {unsigned f; char r[16];} string180 = {851984, "SelectForward\000\000"};
static struct {unsigned f; char r[16];} string181 = {917520, "SelectBackward\000"};
static struct {unsigned f; char r[16];} string182 = {851984, "ShrinkForward\000\000"};
static struct {unsigned f; char r[16];} string183 = {917520, "ShrinkBackward\000"};
static struct {unsigned f; char r[8];} string184 = {262152, "Grow\000\000\000"};
static struct {unsigned f; char r[52];} string185 = {3211316, " failed: can't walk any further in this direction\000\000"};
static struct {unsigned f; char r[12];} string186 = {720908, ": completed"};
static struct {unsigned f; char r[44];} string187 = {2621484, " failed: please make an intial selection\000\000\000"};
static struct {unsigned f; char r[36];} string188 = {2097188, "AreaSelectNew: new area selected\000\000\000"};
static struct {unsigned f; char r[80];} string189 = {4980816, "AreaSelectNew failed: Select bounding objects for Area Select New And Delete\000\000\000"};
static struct {unsigned f; char r[36];} string190 = {2293796, "AreaSelectExtend: new area extended"};
static struct {unsigned f; char r[64];} string191 = {4128832, "Area select failed: select bounding objects for new area select"};
static struct {unsigned f; char r[44];} string192 = {2818092, "Coincident: %g coincident segments selected"};
static struct {unsigned f; char r[48];} string193 = {2949168, "UnSeeableSegs: %g unseeable segments selected\000\000"};
static struct {unsigned f; char r[8];} string194 = {262152, "Text\000\000\000"};
static struct {unsigned f; char r[4];} string195 = {131076, "IP\000"};
static struct {unsigned f; char r[44];} string196 = {2818092, "UnSeeableObj: %g unseeable objects selected"};
static struct {unsigned f; char r[52];} string197 = {3342388, "SelectUnseeableObjects found an unknown object type"};
static struct {unsigned f; char r[12];} string198 = {589836, "LineWidth\000\000"};
static struct {unsigned f; char r[8];} string199 = {458760, "LineEnd"};
static struct {unsigned f; char r[12];} string200 = {655372, "TrajJoints\000"};
static struct {unsigned f; char r[20];} string201 = {1245204, "DashesFromSelection"};
static struct {unsigned f; char r[12];} string202 = {589836, "DashesOff\000\000"};
static struct {unsigned f; char r[20];} string203 = {1114132, "PrintStrokeValues\000\000"};
static struct {unsigned f; char r[20];} string204 = {1048596, "CopyStrokeValues\000\000\000"};
static struct {unsigned f; char r[20];} string205 = {1245204, "SelectMatchingWidth"};
static struct {unsigned f; char r[24];} string206 = {1310744, "SelectMatchingDashes\000\000\000"};
static struct {unsigned f; char r[24];} string207 = {1441816, "SetDefaultStrokeValues\000"};
static struct {unsigned f; char r[24];} string208 = {1507352, "ShowDefaultStrokeValues"};
static struct {unsigned f; char r[8];} string209 = {393224, "Arrows\000"};
static struct {unsigned f; char r[16];} string210 = {983056, "PolygonInCircle"};
static struct {unsigned f; char r[16];} string211 = {786448, "KnotchedLine\000\000\000"};
static struct {unsigned f; char r[12];} string212 = {589836, "NewCircle\000\000"};
static struct {unsigned f; char r[8];} string213 = {393224, "NewBox\000"};
static struct {unsigned f; char r[12];} string214 = {524300, "NewArrow\000\000\000"};
static struct {unsigned f; char r[8];} string215 = {327688, "Frame\000\000"};
static struct {unsigned f; char r[16];} string216 = {786448, "SelectedBBox\000\000\000"};
static struct {unsigned f; char r[20];} string217 = {1114132, "ShowPriorityValue\000\000"};
static struct {unsigned f; char r[8];} string218 = {327688, "UpOne\000\000"};
static struct {unsigned f; char r[28];} string219 = {1638428, "FindPriorityFromSelection\000\000"};
static struct {unsigned f; char r[8];} string220 = {458760, "DownOne"};
static struct {unsigned f; char r[12];} string221 = {655372, "PutInFront\000"};
static struct {unsigned f; char r[12];} string222 = {524300, "Exchange\000\000\000"};
static struct {unsigned f; char r[12];} string223 = {589836, "PutBehind\000\000"};
static struct {unsigned f; char r[16];} string224 = {983056, "UpFromSelection"};
static struct {unsigned f; char r[16];} string225 = {917520, "PutAtSelection\000"};
static struct {unsigned f; char r[20];} string226 = {1114132, "DownFromSelection\000\000"};
static struct {unsigned f; char r[20];} string227 = {1114132, "MergeFromGargoyle\000\000"};
static struct {unsigned f; char r[16];} string228 = {786448, "StuffToTioga\000\000\000"};
static struct {unsigned f; char r[16];} string229 = {851984, "GrabFromTioga\000\000"};
static struct {unsigned f; char r[16];} string230 = {917520, "MergeFromTioga\000"};
static struct {unsigned f; char r[16];} string231 = {786448, "ScriptAction\000\000\000"};
static struct {unsigned f; char r[12];} string232 = {720908, "ShowScripts"};
static struct {unsigned f; char r[24];} string233 = {1441816, "EndOfSessionLogMessage\000"};
static struct {unsigned f; char r[16];} string234 = {917520, "CycleSelection\000"};
static struct {unsigned f; char r[16];} string235 = {851984, "MoveSelection\000\000"};
static struct {unsigned f; char r[16];} string236 = {851984, "AreaSelectNew\000\000"};
static struct {unsigned f; char r[24];} string237 = {1441816, "AreaSelectNewAndDelete\000"};
static struct {unsigned f; char r[20];} string238 = {1048596, "AreaSelectExtend\000\000\000"};
static struct {unsigned f; char r[12];} string239 = {720908, "DeselectAll"};
static struct {unsigned f; char r[20];} string240 = {1048596, "SelectCoincident\000\000\000"};
static struct {unsigned f; char r[20];} string241 = {1245204, "SelectUnseeableSegs"};
static struct {unsigned f; char r[20];} string242 = {1245204, "SelectUnseeableObjs"};
static struct {unsigned f; char r[8];} string243 = {262152, "Open\000\000\000"};
static struct {unsigned f; char r[16];} string244 = {851984, "\257\300\351\370\066\070\300\135\107\052\015\100\164\000\000"};
static struct {unsigned f; char r[12];} string245 = {655370, "\006\001\100\144\010\000\004\100\356\001\000"};
static struct {unsigned f; char r[16];} string246 = {851984, "\257\300\212\174\364\337\300\361\376\000\156\100\150\000\000"};
static struct {unsigned f; char r[16];} string247 = {851984, "\257\300\006<7[\300;CV\364@h\000\000"};
static struct {unsigned f; char r[16];} string248 = {851984, "\257\300\322\334\347\304\300\124\107\000\027\100\150\000\000"};
static struct {unsigned f; char r[16];} string249 = {851984, "\257\300\344\212\014\176\300\070\230\121\123\100\150\000\000"};
static struct {unsigned f; char r[16];} string250 = {851984, "\257\300\136\002\175\264\300\016\031\370\241\100\150\000\000"};
static struct {unsigned f; char r[16];} string251 = {851984, "\257\300\265\217\206\011\300\172\271\371\033\100\150\000\000"};
static struct {unsigned f; char r[16];} string252 = {851984, "\257\300\117\226\235\122\300\152\234\262\021\100\150\000\000"};
static struct {unsigned f; char r[16];} string253 = {851984, "\257\300\223\031\346\162\300\275\253\133\335\100\150\000\000"};
static struct {unsigned f; char r[4];} string254 = {1195853174, "ent"};
static struct {unsigned f; char r[16];} string255 = {851984, "\257\300\003\033\274\104\300\263\246\312\006\100\150\000\000"};
static struct {unsigned f; char r[16];} string256 = {851984, "\257\300\336\236\035\002\300\277\054\247\126\100\150\000\000"};
static struct {unsigned f; char r[16];} string257 = {851984, "\257\300\254\061\235\240\300\234\075\103\347\100\150\000\000"};
static struct {unsigned f; char r[16];} string258 = {851984, "\257\300\377\364\135\257\300\102\147\030\055\100\150\000\000"};
static struct {unsigned f; char r[16];} string259 = {851984, "\257\300\252\050\175\356\300\250\337\044\120\100\150\000\000"};
static struct {unsigned f; char r[16];} string260 = {851984, "\257\300\246\204\223\340\300\164\162\104\060\100\150\000\000"};
static struct {unsigned f; char r[16];} string261 = {851984, "\257\300\172\265\057\072\300\145\211\260\126\100\150\000\000"};
static struct {unsigned f; char r[16];} string262 = {851984, "\257\300\311\023\117\300\300\337\236\305\170\100\150\000\000"};
static struct {unsigned f; char r[16];} string263 = {851984, "\257\300\301\241\007\150\300\032\111\265\237\100\150\000\000"};
static struct {unsigned f; char r[16];} string264 = {851984, "\257\300\236\155\220\261\300\040\017\026\014\100\150\000\000"};
static struct {unsigned f; char r[16];} string265 = {851984, "\257\300\045\215\147\016\300\153\043\150\276\100\150\000\000"};
static struct {unsigned f; char r[16];} string266 = {851984, "\257\300\207\142\037\125\300\254\056\012\025\100\150\000\000"};
static struct {unsigned f; char r[16];} string267 = {851984, "\257\300\347\101\365\007\300\150\102\366\020\100\150\000\000"};
static struct {unsigned f; char r[16];} string268 = {851984, "\257\300\043\211\212\366\300\343\003\307\242\100\150\000\000"};
static struct {unsigned f; char r[16];} string269 = {851984, "\257\300\011\245\206\305\300\112\326\356\245\100\150\000\000"};
static struct {unsigned f; char r[16];} string270 = {851984, "\257\300\340\114\347\077\300\130\206\301\040\100\150\000\000"};
static struct {unsigned f; char r[16];} string271 = {851984, "\257\300\235\036\354\311\300\234\133\201\260\100\150\000\000"};
static struct {unsigned f; char r[16];} string272 = {851984, "\257\300U$)\337\300Xo9\243@t\000\000"};
static struct {unsigned f; char r[16];} string273 = {851984, "\257\300\336\025\013\356\300\216\115\352\271\100\150\000\000"};
static struct {unsigned f; char r[16];} string274 = {851984, "\257\300\206\055\004\241\300\261\334\001\116\100\150\000\000"};
static struct {unsigned f; char r[16];} string275 = {851984, "\257\300\050\310\006\072\300\004\273\314\121\100\150\000\000"};
static struct {unsigned f; char r[16];} string276 = {851984, "\257\300\104\154\010\164\300\126\073\363\036\100\150\000\000"};
static struct {unsigned f; char r[16];} string277 = {851984, "\257\300\272\336\377\011\300\305\371\262\224\100\150\000\000"};
static struct {unsigned f; char r[16];} string278 = {851984, "\257\300\355\324\264\170\300\276\334\312\210\100\150\000\000"};
static struct {unsigned f; char r[16];} string279 = {851984, "\257\300\370\132\042\205\300\045\133\011\125\100\150\000\000"};
static struct {unsigned f; char r[16];} string280 = {851984, "\257\300\144\143\124\312\300\122\224\357\133\100\150\000\000"};
static struct {unsigned f; char r[16];} string281 = {851984, "\257\300\356\024\243\250\300\175\157\203\227\100\150\000\000"};
static struct {unsigned f; char r[16];} string282 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\150\000\000"};
static struct {unsigned f; char r[16];} string283 = {851984, "\257\300\131\016\001\075\300\245\120\130\233\100\150\000\000"};
static struct {unsigned f; char r[16];} string284 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string285 = {851984, "\257\300\103\306\166\071\300\047\126\012\237\100\150\000\000"};
static struct {unsigned f; char r[16];} string286 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string287 = {851984, "\257\300\360\202\255\211\300\267\057\343\102\100\150\000\000"};
static struct {unsigned f; char r[16];} string288 = {851984, "\257\300\136\253\306\024\300\100\114\357\174\100\150\000\000"};
static struct {unsigned f; char r[16];} string289 = {851984, "\257\300\004\142\347\110\300\363\053\254\345\100\150\000\000"};
static struct {unsigned f; char r[16];} string290 = {851984, "\257\300\106\171\232\301\300\031\372\034\027\100\150\000\000"};
static struct {unsigned f; char r[16];} string291 = {851984, "\257\300\252\043\023\037\300\070\056\113\065\100\150\000\000"};
static struct {unsigned f; char r[12];} string292 = {1214870388, "oryToolObj"};
static struct {unsigned f; char r[28];} string293 = {1769500, "\211\017\016HistoryToolObj\300\252#\023\037\3008.K5"};
static struct {unsigned f; char r[16];} string294 = {851984, "\257\300\252\050\175\356\300\250\337\044\120\100\164\000\000"};
static struct {unsigned f; char r[4];} string295 = {131074, "\004\017\000"};
static struct {unsigned f; char r[16];} string296 = {851984, "\257\300\223\145\303\043\300\372\023\025\003\100\150\000\000"};
static struct {unsigned f; char r[28];} string297 = {1769500, "\211\017\016\122\145\146\162\145\163\150\104\141\164\141\117\142\152\300\223\145\303\043\300\372\023\025\003"};
static struct {unsigned f; char r[16];} string298 = {851984, "\257\300\026\355\016\312\300\171\207\041\370\100\200\000\000"};
static struct {unsigned f; char r[44];} string299 = {2752554, "\006\020\000\001\014\001\020\001\024\001\030\001\034\001\070\001\074\001\100\100\001\100\104\001\100\110\001\100\114\001\100\120\001\100\124\001\100\130\001\100\144\001\000"};
static struct {
   word f0[438]; 
   } globalframe = {
   {0}
   };

static void NoName←Q8580()
   {
   register ptr gf←c0862 =  (ptr) &globalframe;
   word var←c89552;
   (* (( (ptr) gf←c0862)+4)/* borderWidth←v6332 */  ) = (*  (ptr) &fc1 );
   (* (( (ptr) gf←c0862)+391) ) = ( ((word)  (fPt) GGEventImplF←P0) );
   (* (( (ptr) gf←c0862)+389) ) = ( ((word)  (fPt) ScriptAction←P60) );
   (* (( (ptr) gf←c0862)+387) ) = ( ((word)  (fPt) ShowScripts←P120) );
   (* (( (ptr) gf←c0862)+385) ) = ( ((word)  (fPt) OpenScript←P180) );
   (* (( (ptr) gf←c0862)+383) ) = ( ((word)  (fPt) AppendToScript←P240) );
   (* (( (ptr) gf←c0862)+381) ) = ( ((word)  (fPt) CloseScript←P300) );
   (* (( (ptr) gf←c0862)+379) ) = ( ((word)  (fPt) PlaybackScript←P360) );
   (* (( (ptr) gf←c0862)+377) ) = ( ((word)  (fPt) FastPlayScript←P420) );
   (* (( (ptr) gf←c0862)+375) ) = ( ((word)  (fPt) MergeFromGargoyle←P480) );
   (* (( (ptr) gf←c0862)+373) ) = ( ((word)  (fPt) StuffIt←P540) );
   (* (( (ptr) gf←c0862)+371) ) = ( ((word)  (fPt) Grab←P600) );
   (* (( (ptr) gf←c0862)+369) ) = ( ((word)  (fPt) Top←P660) );
   (* (( (ptr) gf←c0862)+367) ) = ( ((word)  (fPt) ShowPriorityValue←P720) );
   (* (( (ptr) gf←c0862)+365) ) = ( ((word)  (fPt) Bottom←P780) );
   (* (( (ptr) gf←c0862)+363) ) = ( ((word)  (fPt) UpOne←P840) );
   (* (( (ptr) gf←c0862)+361) ) = ( ((word)  (fPt) DownOne←P900) );
   (* (( (ptr) gf←c0862)+359) ) = ( ((word)  (fPt) FindPriorityFromSelection←P960) );
   (* (( (ptr) gf←c0862)+357) ) = ( ((word)  (fPt) PutInFront←P1020) );
   (* (( (ptr) gf←c0862)+355) ) = ( ((word)  (fPt) PutBehind←P1080) );
   (* (( (ptr) gf←c0862)+353) ) = ( ((word)  (fPt) Exchange←P1140) );
   (* (( (ptr) gf←c0862)+351) ) = ( ((word)  (fPt) UpFromSelection←P1200) );
   (* (( (ptr) gf←c0862)+349) ) = ( ((word)  (fPt) DownFromSelection←P1260) );
   (* (( (ptr) gf←c0862)+347) ) = ( ((word)  (fPt) PutAtSelection←P1320) );
   (* (( (ptr) gf←c0862)+345) ) = ( ((word)  (fPt) EndNewObject←P1380) );
   (* (( (ptr) gf←c0862)+343) ) = ( ((word)  (fPt) PolygonInCircle←P1440) );
   (* (( (ptr) gf←c0862)+341) ) = ( ((word)  (fPt) NewBox←P1500) );
   (* (( (ptr) gf←c0862)+339) ) = ( ((word)  (fPt) NewCircle←P1560) );
   (* (( (ptr) gf←c0862)+337) ) = ( ((word)  (fPt) NewKnotchedLine←P1620) );
   (* (( (ptr) gf←c0862)+335) ) = ( ((word)  (fPt) NewArrow←P1680) );
   (* (( (ptr) gf←c0862)+333) ) = ( ((word)  (fPt) Frame←P1740) );
   (* (( (ptr) gf←c0862)+331) ) = ( ((word)  (fPt) SelectedBBox←P1800) );
   (* (( (ptr) gf←c0862)+329) ) = ( ((word)  (fPt) LineWidth←P1860) );
   (* (( (ptr) gf←c0862)+327) ) = ( ((word)  (fPt) SetStrokeWidth←P1920) );
   (* (( (ptr) gf←c0862)+325) ) = ( ((word)  (fPt) LineEnds←P1980) );
   (* (( (ptr) gf←c0862)+323) ) = ( ((word)  (fPt) SetStrokeEnd←P2040) );
   (* (( (ptr) gf←c0862)+321) ) = ( ((word)  (fPt) TrajJoints←P2100) );
   (* (( (ptr) gf←c0862)+319) ) = ( ((word)  (fPt) DashesFromSelection←P2160) );
   (* (( (ptr) gf←c0862)+317) ) = ( ((word)  (fPt) SetDashed←P2220) );
   (* (( (ptr) gf←c0862)+315) ) = ( ((word)  (fPt) DashesOff←P2280) );
   (* (( (ptr) gf←c0862)+313) ) = ( ((word)  (fPt) GetSelectedDashPattern←P2340) );
   (* (( (ptr) gf←c0862)+311) ) = ( ((word)  (fPt) GetSelectedStrokeWidth←P2400) );
   (* (( (ptr) gf←c0862)+309) ) = ( ((word)  (fPt) GetSelectedStrokeEnd←P2460) );
   (* (( (ptr) gf←c0862)+307) ) = ( ((word)  (fPt) GetSelectedStrokeJoint←P2520) );
   (* (( (ptr) gf←c0862)+305) ) = ( ((word)  (fPt) PrintStrokeValues←P2580) );
   (* (( (ptr) gf←c0862)+303) ) = ( ((word)  (fPt) CopyStrokeValues←P2640) );
   (* (( (ptr) gf←c0862)+301) ) = ( ((word)  (fPt) GetDashesRope←P2700) );
   (* (( (ptr) gf←c0862)+299) ) = ( ((word)  (fPt) GetEndRope←P2760) );
   (* (( (ptr) gf←c0862)+297) ) = ( ((word)  (fPt) GetJointRope←P2820) );
   (* (( (ptr) gf←c0862)+295) ) = ( ((word)  (fPt) SelectMatchingWidth←P2880) );
   (* (( (ptr) gf←c0862)+293) ) = ( ((word)  (fPt) SelectMatchingDashes←P2940) );
   (* (( (ptr) gf←c0862)+291) ) = ( ((word)  (fPt) SetDefaultStrokeValues←P3000) );
   (* (( (ptr) gf←c0862)+289) ) = ( ((word)  (fPt) ShowDefaultStrokeValues←P3060) );
   (* (( (ptr) gf←c0862)+287) ) = ( ((word)  (fPt) Arrows←P3120) );
   (* (( (ptr) gf←c0862)+285) ) = ( ((word)  (fPt) SelectAll←P3180) );
   (* (( (ptr) gf←c0862)+283) ) = ( ((word)  (fPt) DeselectAll←P3240) );
   (* (( (ptr) gf←c0862)+281) ) = ( ((word)  (fPt) CycleSelection←P3300) );
   (* (( (ptr) gf←c0862)+279) ) = ( ((word)  (fPt) MoveSelection←P3360) );
   (* (( (ptr) gf←c0862)+277) ) = ( ((word)  (fPt) AreaSelectNew←P3420) );
   (* (( (ptr) gf←c0862)+275) ) = ( ((word)  (fPt) AreaSelectNewAndDelete←P3480) );
   (* (( (ptr) gf←c0862)+273) ) = ( ((word)  (fPt) AreaSelectExtend←P3540) );
   (* (( (ptr) gf←c0862)+271) ) = ( ((word)  (fPt) AreaSelectAux←P3600) );
   (* (( (ptr) gf←c0862)+269) ) = ( ((word)  (fPt) SelectCoincident←P3660) );
   (* (( (ptr) gf←c0862)+267) ) = ( ((word)  (fPt) SelectUnseeableSegs←P3720) );
   (* (( (ptr) gf←c0862)+265) ) = ( ((word)  (fPt) SelectUnseeableObjs←P3780) );
   (* (( (ptr) gf←c0862)+263) ) = ( ((word)  (fPt) RegisterEventProcs←P3840) );
   (* (( (ptr) gf←c0862)+7) ) = (word) XR←GetTypeIndexS((word) (&string2));
   (* (( (ptr) gf←c0862)+8) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf←c0862)+13) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
   (* (( (ptr) gf←c0862)+14) ) = (word) XR←GetTypeIndexS((word) (&string7));
   (* (( (ptr) gf←c0862)+15) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string6);
   (* (( (ptr) gf←c0862)+20) ) = (word) XR←GetTypeIndex((word) &string9, 0, (word) &string10);
   (* (( (ptr) gf←c0862)+21) ) = (word) XR←GetTypeIndex((word) &string11, 0, (word) &string4);
   (* (( (ptr) gf←c0862)+22) ) = (word) XR←GetTypeIndex((word) &string12, 0, (word) &string13);
   (* (( (ptr) gf←c0862)+23) ) = (word) XR←GetTypeIndexS((word) (&string14));
   (*  (ptr) (( (bPt) gf←c0862)+100) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string15);
   (*  (ptr) (( (bPt) gf←c0862)+104) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string16);
   (*  (ptr) (( (bPt) gf←c0862)+108) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string17);
   (*  (ptr) (( (bPt) gf←c0862)+112) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string18);
   (*  (ptr) (( (bPt) gf←c0862)+116) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string19);
   (*  (ptr) (( (bPt) gf←c0862)+120) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string20);
   (*  (ptr) (( (bPt) gf←c0862)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string21);
   (*  (ptr) (( (bPt) gf←c0862)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string22);
   (*  (ptr) (( (bPt) gf←c0862)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string23);
   (*  (ptr) (( (bPt) gf←c0862)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string24);
   (*  (ptr) (( (bPt) gf←c0862)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string25);
   (*  (ptr) (( (bPt) gf←c0862)+144) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string26);
   (*  (ptr) (( (bPt) gf←c0862)+148) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string27);
   (*  (ptr) (( (bPt) gf←c0862)+152) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string28);
   (*  (ptr) (( (bPt) gf←c0862)+156) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string25);
   (*  (ptr) (( (bPt) gf←c0862)+160) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string29);
   (*  (ptr) (( (bPt) gf←c0862)+164) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string30);
   (*  (ptr) (( (bPt) gf←c0862)+168) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string31);
   (*  (ptr) (( (bPt) gf←c0862)+172) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string32);
   (*  (ptr) (( (bPt) gf←c0862)+176) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string33);
   (*  (ptr) (( (bPt) gf←c0862)+180) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string34);
   (*  (ptr) (( (bPt) gf←c0862)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string35);
   (*  (ptr) (( (bPt) gf←c0862)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string36);
   (*  (ptr) (( (bPt) gf←c0862)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string37);
   (*  (ptr) (( (bPt) gf←c0862)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string38);
   (*  (ptr) (( (bPt) gf←c0862)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string39);
   (*  (ptr) (( (bPt) gf←c0862)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string40);
   (*  (ptr) (( (bPt) gf←c0862)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string41);
   (*  (ptr) (( (bPt) gf←c0862)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string42);
   (*  (ptr) (( (bPt) gf←c0862)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string43);
   (*  (ptr) (( (bPt) gf←c0862)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string44);
   (*  (ptr) (( (bPt) gf←c0862)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string45);
   (*  (ptr) (( (bPt) gf←c0862)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string46);
   (*  (ptr) (( (bPt) gf←c0862)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string47);
   (*  (ptr) (( (bPt) gf←c0862)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string48);
   (*  (ptr) (( (bPt) gf←c0862)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string49);
   (*  (ptr) (( (bPt) gf←c0862)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string50);
   (*  (ptr) (( (bPt) gf←c0862)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string51);
   (*  (ptr) (( (bPt) gf←c0862)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string52);
   (*  (ptr) (( (bPt) gf←c0862)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string53);
   (*  (ptr) (( (bPt) gf←c0862)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string54);
   (*  (ptr) (( (bPt) gf←c0862)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string55);
   (*  (ptr) (( (bPt) gf←c0862)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string56);
   (*  (ptr) (( (bPt) gf←c0862)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string57);
   (*  (ptr) (( (bPt) gf←c0862)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string58);
   (*  (ptr) (( (bPt) gf←c0862)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string59);
   (*  (ptr) (( (bPt) gf←c0862)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string60);
   (*  (ptr) (( (bPt) gf←c0862)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string61);
   (*  (ptr) (( (bPt) gf←c0862)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string62);
   (*  (ptr) (( (bPt) gf←c0862)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string63);
   (*  (ptr) (( (bPt) gf←c0862)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string64);
   (*  (ptr) (( (bPt) gf←c0862)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string65);
   (*  (ptr) (( (bPt) gf←c0862)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string66);
   (*  (ptr) (( (bPt) gf←c0862)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string67);
   (*  (ptr) (( (bPt) gf←c0862)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string68);
   (*  (ptr) (( (bPt) gf←c0862)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string69);
   (*  (ptr) (( (bPt) gf←c0862)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string70);
   (*  (ptr) (( (bPt) gf←c0862)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string71);
   (*  (ptr) (( (bPt) gf←c0862)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string72);
   (*  (ptr) (( (bPt) gf←c0862)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string73);
   (*  (ptr) (( (bPt) gf←c0862)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string74);
   (*  (ptr) (( (bPt) gf←c0862)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string75);
   (*  (ptr) (( (bPt) gf←c0862)+348) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string76);
   (*  (ptr) (( (bPt) gf←c0862)+352) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string77);
   (*  (ptr) (( (bPt) gf←c0862)+356) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string78);
   (*  (ptr) (( (bPt) gf←c0862)+360) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string79);
   (*  (ptr) (( (bPt) gf←c0862)+364) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string80);
   (*  (ptr) (( (bPt) gf←c0862)+368) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string81);
   (*  (ptr) (( (bPt) gf←c0862)+372) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string82);
   (*  (ptr) (( (bPt) gf←c0862)+376) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string83);
   (*  (ptr) (( (bPt) gf←c0862)+380) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string84);
   (*  (ptr) (( (bPt) gf←c0862)+384) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string85);
   (*  (ptr) (( (bPt) gf←c0862)+388) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string86);
   (*  (ptr) (( (bPt) gf←c0862)+392) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string87);
   (*  (ptr) (( (bPt) gf←c0862)+396) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string88);
   (*  (ptr) (( (bPt) gf←c0862)+400) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string89);
   (*  (ptr) (( (bPt) gf←c0862)+404) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string90);
   (*  (ptr) (( (bPt) gf←c0862)+408) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string91);
   (*  (ptr) (( (bPt) gf←c0862)+412) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string92);
   (*  (ptr) (( (bPt) gf←c0862)+416) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string93);
   (*  (ptr) (( (bPt) gf←c0862)+420) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string94);
   (*  (ptr) (( (bPt) gf←c0862)+424) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string95);
   (*  (ptr) (( (bPt) gf←c0862)+428) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string96);
   (*  (ptr) (( (bPt) gf←c0862)+432) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string97);
   (*  (ptr) (( (bPt) gf←c0862)+436) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string98);
   (*  (ptr) (( (bPt) gf←c0862)+440) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string99);
   (*  (ptr) (( (bPt) gf←c0862)+444) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string100);
   (*  (ptr) (( (bPt) gf←c0862)+448) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string101);
   (*  (ptr) (( (bPt) gf←c0862)+452) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string102);
   (*  (ptr) (( (bPt) gf←c0862)+456) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string103);
   (*  (ptr) (( (bPt) gf←c0862)+460) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string104);
   (*  (ptr) (( (bPt) gf←c0862)+464) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string105);
   (*  (ptr) (( (bPt) gf←c0862)+468) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string106);
   (*  (ptr) (( (bPt) gf←c0862)+472) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string107);
   (*  (ptr) (( (bPt) gf←c0862)+476) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string108);
   (*  (ptr) (( (bPt) gf←c0862)+480) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string109);
   (*  (ptr) (( (bPt) gf←c0862)+484) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string110);
   (*  (ptr) (( (bPt) gf←c0862)+488) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string111);
   (*  (ptr) (( (bPt) gf←c0862)+492) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string112);
   (*  (ptr) (( (bPt) gf←c0862)+496) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string113);
   (*  (ptr) (( (bPt) gf←c0862)+500) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string114);
   (*  (ptr) (( (bPt) gf←c0862)+504) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string115);
   (*  (ptr) (( (bPt) gf←c0862)+508) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string116);
   (*  (ptr) (( (bPt) gf←c0862)+512) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string117);
   (*  (ptr) (( (bPt) gf←c0862)+516) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string118);
   (*  (ptr) (( (bPt) gf←c0862)+520) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string119);
   (*  (ptr) (( (bPt) gf←c0862)+524) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string120);
   (*  (ptr) (( (bPt) gf←c0862)+528) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string121);
   (*  (ptr) (( (bPt) gf←c0862)+532) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string122);
   (*  (ptr) (( (bPt) gf←c0862)+536) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string123);
   (*  (ptr) (( (bPt) gf←c0862)+540) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string124);
   (*  (ptr) (( (bPt) gf←c0862)+544) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string125);
   (*  (ptr) (( (bPt) gf←c0862)+548) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string126);
   (*  (ptr) (( (bPt) gf←c0862)+552) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string127);
   (*  (ptr) (( (bPt) gf←c0862)+556) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string128);
   (*  (ptr) (( (bPt) gf←c0862)+560) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string129);
   (*  (ptr) (( (bPt) gf←c0862)+564) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string130);
   (*  (ptr) (( (bPt) gf←c0862)+568) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string131);
   (*  (ptr) (( (bPt) gf←c0862)+572) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string132);
   (*  (ptr) (( (bPt) gf←c0862)+576) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string133);
   (*  (ptr) (( (bPt) gf←c0862)+580) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string134);
   (*  (ptr) (( (bPt) gf←c0862)+584) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string135);
   (*  (ptr) (( (bPt) gf←c0862)+588) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string136);
   (*  (ptr) (( (bPt) gf←c0862)+592) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string137);
   (*  (ptr) (( (bPt) gf←c0862)+596) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string138);
   (*  (ptr) (( (bPt) gf←c0862)+600) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string139);
   (*  (ptr) (( (bPt) gf←c0862)+604) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string140);
   (*  (ptr) (( (bPt) gf←c0862)+608) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string141);
   (*  (ptr) (( (bPt) gf←c0862)+612) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string142);
   (*  (ptr) (( (bPt) gf←c0862)+616) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string143);
   (*  (ptr) (( (bPt) gf←c0862)+620) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string144);
   (*  (ptr) (( (bPt) gf←c0862)+624) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string145);
   (*  (ptr) (( (bPt) gf←c0862)+628) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string146);
   (*  (ptr) (( (bPt) gf←c0862)+632) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string147);
   (*  (ptr) (( (bPt) gf←c0862)+636) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string148);
   (*  (ptr) (( (bPt) gf←c0862)+640) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string149);
   (*  (ptr) (( (bPt) gf←c0862)+644) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string150);
   (*  (ptr) (( (bPt) gf←c0862)+648) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string151);
   (*  (ptr) (( (bPt) gf←c0862)+652) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string152);
   (*  (ptr) (( (bPt) gf←c0862)+656) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string153);
   (*  (ptr) (( (bPt) gf←c0862)+660) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string154);
   (*  (ptr) (( (bPt) gf←c0862)+664) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string155);
   (*  (ptr) (( (bPt) gf←c0862)+668) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string156);
   (*  (ptr) (( (bPt) gf←c0862)+672) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string157);
   (*  (ptr) (( (bPt) gf←c0862)+676) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string158);
   (*  (ptr) (( (bPt) gf←c0862)+680) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string159);
   (*  (ptr) (( (bPt) gf←c0862)+684) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string160);
   (*  (ptr) (( (bPt) gf←c0862)+688) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string161);
   (*  (ptr) (( (bPt) gf←c0862)+692) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string162);
   (*  (ptr) (( (bPt) gf←c0862)+696) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string163);
   (*  (ptr) (( (bPt) gf←c0862)+700) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string164);
   (*  (ptr) (( (bPt) gf←c0862)+704) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string165);
   (*  (ptr) (( (bPt) gf←c0862)+708) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string166);
   (*  (ptr) (( (bPt) gf←c0862)+712) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string167);
   (*  (ptr) (( (bPt) gf←c0862)+716) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string168);
   (*  (ptr) (( (bPt) gf←c0862)+720) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string169);
   (*  (ptr) (( (bPt) gf←c0862)+724) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string170);
   (*  (ptr) (( (bPt) gf←c0862)+728) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string171);
   (*  (ptr) (( (bPt) gf←c0862)+732) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string172);
   (*  (ptr) (( (bPt) gf←c0862)+736) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string173);
   (*  (ptr) (( (bPt) gf←c0862)+740) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string174);
   (*  (ptr) (( (bPt) gf←c0862)+744) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string37);
   (*  (ptr) (( (bPt) gf←c0862)+748) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string175);
   (*  (ptr) (( (bPt) gf←c0862)+752) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string176);
   (*  (ptr) (( (bPt) gf←c0862)+756) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string177);
   (*  (ptr) (( (bPt) gf←c0862)+760) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string178);
   (*  (ptr) (( (bPt) gf←c0862)+764) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string179);
   (*  (ptr) (( (bPt) gf←c0862)+768) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string180);
   (*  (ptr) (( (bPt) gf←c0862)+772) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string181);
   (*  (ptr) (( (bPt) gf←c0862)+776) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string182);
   (*  (ptr) (( (bPt) gf←c0862)+780) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string182);
   (*  (ptr) (( (bPt) gf←c0862)+784) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string183);
   (*  (ptr) (( (bPt) gf←c0862)+788) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string183);
   (*  (ptr) (( (bPt) gf←c0862)+792) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string184);
   (*  (ptr) (( (bPt) gf←c0862)+796) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string184);
   (*  (ptr) (( (bPt) gf←c0862)+800) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string185);
   (*  (ptr) (( (bPt) gf←c0862)+804) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string186);
   (*  (ptr) (( (bPt) gf←c0862)+808) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string187);
   (*  (ptr) (( (bPt) gf←c0862)+812) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string188);
   (*  (ptr) (( (bPt) gf←c0862)+816) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string189);
   (*  (ptr) (( (bPt) gf←c0862)+820) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string190);
   (*  (ptr) (( (bPt) gf←c0862)+824) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string191);
   (*  (ptr) (( (bPt) gf←c0862)+828) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string192);
   (*  (ptr) (( (bPt) gf←c0862)+832) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string193);
   (*  (ptr) (( (bPt) gf←c0862)+836) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string194);
   (*  (ptr) (( (bPt) gf←c0862)+840) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string195);
   (*  (ptr) (( (bPt) gf←c0862)+844) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string196);
   (*  (ptr) (( (bPt) gf←c0862)+848) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string105);
   (*  (ptr) (( (bPt) gf←c0862)+852) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string108);
   (*  (ptr) (( (bPt) gf←c0862)+856) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+21) ), (word) &string197);
   (*  (ptr) (( (bPt) gf←c0862)+860) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string198);
   (*  (ptr) (( (bPt) gf←c0862)+864) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string199);
   (*  (ptr) (( (bPt) gf←c0862)+868) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string200);
   (*  (ptr) (( (bPt) gf←c0862)+872) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string201);
   (*  (ptr) (( (bPt) gf←c0862)+876) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string202);
   (*  (ptr) (( (bPt) gf←c0862)+880) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string203);
   (*  (ptr) (( (bPt) gf←c0862)+884) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string204);
   (*  (ptr) (( (bPt) gf←c0862)+888) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string205);
   (*  (ptr) (( (bPt) gf←c0862)+892) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string206);
   (*  (ptr) (( (bPt) gf←c0862)+896) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string207);
   (*  (ptr) (( (bPt) gf←c0862)+900) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string208);
   (*  (ptr) (( (bPt) gf←c0862)+904) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string209);
   (*  (ptr) (( (bPt) gf←c0862)+908) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string210);
   (*  (ptr) (( (bPt) gf←c0862)+912) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string211);
   (*  (ptr) (( (bPt) gf←c0862)+916) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string212);
   (*  (ptr) (( (bPt) gf←c0862)+920) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string213);
   (*  (ptr) (( (bPt) gf←c0862)+924) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string214);
   (*  (ptr) (( (bPt) gf←c0862)+928) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string215);
   (*  (ptr) (( (bPt) gf←c0862)+932) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string216);
   (*  (ptr) (( (bPt) gf←c0862)+936) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string51);
   (*  (ptr) (( (bPt) gf←c0862)+940) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string217);
   (*  (ptr) (( (bPt) gf←c0862)+944) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string57);
   (*  (ptr) (( (bPt) gf←c0862)+948) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string218);
   (*  (ptr) (( (bPt) gf←c0862)+952) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string219);
   (*  (ptr) (( (bPt) gf←c0862)+956) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string220);
   (*  (ptr) (( (bPt) gf←c0862)+960) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string221);
   (*  (ptr) (( (bPt) gf←c0862)+964) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string222);
   (*  (ptr) (( (bPt) gf←c0862)+968) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string223);
   (*  (ptr) (( (bPt) gf←c0862)+972) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string224);
   (*  (ptr) (( (bPt) gf←c0862)+976) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string225);
   (*  (ptr) (( (bPt) gf←c0862)+980) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string226);
   (*  (ptr) (( (bPt) gf←c0862)+984) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string227);
   (*  (ptr) (( (bPt) gf←c0862)+988) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string228);
   (*  (ptr) (( (bPt) gf←c0862)+992) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string229);
   (*  (ptr) (( (bPt) gf←c0862)+996) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string230);
   (*  (ptr) (( (bPt) gf←c0862)+1000) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string231);
   (*  (ptr) (( (bPt) gf←c0862)+1004) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string232);
   (*  (ptr) (( (bPt) gf←c0862)+1008) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string233);
   (*  (ptr) (( (bPt) gf←c0862)+1012) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string234);
   (*  (ptr) (( (bPt) gf←c0862)+1016) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string235);
   (*  (ptr) (( (bPt) gf←c0862)+1020) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string236);
   (*  (ptr) (( (bPt) gf←c0862)+1024) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string237);
   (*  (ptr) (( (bPt) gf←c0862)+1028) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string238);
   (*  (ptr) (( (bPt) gf←c0862)+1032) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string239);
   (*  (ptr) (( (bPt) gf←c0862)+1036) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string240);
   (*  (ptr) (( (bPt) gf←c0862)+1040) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string241);
   (*  (ptr) (( (bPt) gf←c0862)+1044) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string242);
   (*  (ptr) (( (bPt) gf←c0862)+1048) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0862)+8) ), (word) &string243);
   (void) XR←DeclareGlobalFrame((word) "GGEventImplF", &globalframe, (word) XR←GetTypeIndex((word) &string244, 0, (word) &string245)
      , (word) (( (bPt) gf←c0862)+1564)/* var←c80816 */ );
   var←c89552 = (word) XR←ImportInterface((word) "BasicTime", (word) XR←GetTypeIndexS((word) (&string246)), 24);
   (* (( (ptr) gf←c0862)+409)/* var←c82192 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67636226);
   (void) XR←ImportProcS(var←c89552, 67111424);
   var←c89552 = (word) XR←ImportInterface((word) "CodeTimer", (word) XR←GetTypeIndexS((word) (&string247)), 21);
   (* (( (ptr) gf←c0862)+431)/* var←c88208 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 526850);
   (void) XR←ImportProcS(var←c89552, 526338);
   var←c89552 = (word) XR←ImportInterface((word) "Feedback", (word) XR←GetTypeIndexS((word) (&string248)), 25);
   (* (( (ptr) gf←c0862)+395)/* var←c80976 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 1313029);
   (void) XR←ImportProcS(var←c89552, 1575429);
   (void) XR←ImportProcS(var←c89552, 1050628);
   var←c89552 = (word) XR←ImportInterface((word) "FS", (word) XR←GetTypeIndexS((word) (&string249)), 36);
   (* (( (ptr) gf←c0862)+408)/* var←c82128 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 70522636);
   var←c89552 = (word) XR←ImportInterface((word) "GGAlign", (word) XR←GetTypeIndexS((word) (&string250)), 46);
   (* (( (ptr) gf←c0862)+403)/* var←c81712 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 531714);
   var←c89552 = (word) XR←ImportInterface((word) "GGBoundBox", (word) XR←GetTypeIndexS((word) (&string251)), 24);
   (* (( (ptr) gf←c0862)+413)/* var←c82416 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67372033);
   (void) XR←ImportProcS(var←c89552, 68681990);
   (void) XR←ImportProcS(var←c89552, 268699393);
   var←c89552 = (word) XR←ImportInterface((word) "GGBuiltinShapes", (word) XR←GetTypeIndexS((word) (&string252)), 4);
   (* (( (ptr) gf←c0862)+423)/* var←c84464 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 68420355);
   (void) XR←ImportProcS(var←c89552, 68157699);
   (void) XR←ImportProcS(var←c89552, 68157955);
   (void) XR←ImportProcS(var←c89552, 68419588);
   var←c89552 = (word) XR←ImportInterface((word) "GGCaret", (word) XR←GetTypeIndexS((word) (&string253)), 13);
   (* (( (ptr) gf←c0862)+422)/* var←c84432 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 525570);
   (void) XR←ImportProcS(var←c89552, 264449);
   (void) XR←ImportProcS(var←c89552, 134482689);
   (void) XR←ImportProcS(var←c89552, 67371777);
   var←c89552 = (word) XR←ImportInterface((word) &string254, (word) XR←GetTypeIndexS((word) (&string255)), 38);
   (* (( (ptr) gf←c0862)+407)/* var←c82032 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 1052164);
   (void) XR←ImportProcS(var←c89552, 524546);
   (void) XR←ImportProcS(var←c89552, 532482);
   (void) XR←ImportProcS(var←c89552, 336855813);
   var←c89552 = (word) XR←ImportInterface((word) "GGFileIn", (word) XR←GetTypeIndexS((word) (&string256)), 3);
   (* (( (ptr) gf←c0862)+420)/* var←c83440 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 135528709);
   var←c89552 = (word) XR←ImportInterface((word) "GGFileOps", (word) XR←GetTypeIndexS((word) (&string257)), 7);
   (* (( (ptr) gf←c0862)+416)/* var←c82608 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67371265);
   (void) XR←ImportProcS(var←c89552, 202638341);
   var←c89552 = (word) XR←ImportInterface((word) "GGFileOut", (word) XR←GetTypeIndexS((word) (&string258)), 2);
   (* (( (ptr) gf←c0862)+411)/* var←c82256 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 1048836);
   var←c89552 = (word) XR←ImportInterface((word) "GGHistory", (word) XR←GetTypeIndexS((word) (&string259)), 20);
   (* (( (ptr) gf←c0862)+401)/* var←c81648 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67633154);
   (void) XR←ImportProcS(var←c89552, 262657);
   (void) XR←ImportProcS(var←c89552, 525058);
   var←c89552 = (word) XR←ImportInterface((word) "GGMouseEvent", (word) XR←GetTypeIndexS((word) (&string260)), 32);
   (* (( (ptr) gf←c0862)+433)/* var←c88368 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 2360326);
   var←c89552 = (word) XR←ImportInterface((word) "GGMultiGravity", (word) XR←GetTypeIndexS((word) (&string261)), 16);
   (* (( (ptr) gf←c0862)+432)/* var←c88272 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 402918145);
   (void) XR←ImportProcS(var←c89552, 402917889);
   var←c89552 = (word) XR←ImportInterface((word) "GGOutline", (word) XR←GetTypeIndexS((word) (&string262)), 19);
   (* (( (ptr) gf←c0862)+427)/* var←c84848 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67633410);
   var←c89552 = (word) XR←ImportInterface((word) "GGParent", (word) XR←GetTypeIndexS((word) (&string263)), 83);
   (* (( (ptr) gf←c0862)+434)/* var←c89264 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67386369);
   (void) XR←ImportProcS(var←c89552, 67385857);
   (void) XR←ImportProcS(var←c89552, 134761474);
   var←c89552 = (word) XR←ImportInterface((word) "GGParseIn", (word) XR←GetTypeIndexS((word) (&string264)), 26);
   (* (( (ptr) gf←c0862)+430)/* var←c85648 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67376897);
   (void) XR←ImportProcS(var←c89552, 67375873);
   var←c89552 = (word) XR←ImportInterface((word) "GGParseOut", (word) XR←GetTypeIndexS((word) (&string265)), 15);
   (* (( (ptr) gf←c0862)+394)/* var←c80912 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 527362);
   var←c89552 = (word) XR←ImportInterface((word) "GGRefresh", (word) XR←GetTypeIndexS((word) (&string266)), 30);
   (* (( (ptr) gf←c0862)+404)/* var←c81744 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 264193);
   (void) XR←ImportProcS(var←c89552, 788227);
   (void) XR←ImportProcS(var←c89552, 2622986);
   var←c89552 = (word) XR←ImportInterface((word) "GGScene", (word) XR←GetTypeIndexS((word) (&string267)), 50);
   (* (( (ptr) gf←c0862)+402)/* var←c81680 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 526594);
   (void) XR←ImportProcS(var←c89552, 68164356);
   (void) XR←ImportProcS(var←c89552, 67906307);
   (void) XR←ImportProcS(var←c89552, 787971);
   (void) XR←ImportProcS(var←c89552, 526850);
   (void) XR←ImportProcS(var←c89552, 68426757);
   (void) XR←ImportProcS(var←c89552, 792067);
   (void) XR←ImportProcS(var←c89552, 791555);
   (void) XR←ImportProcS(var←c89552, 67382529);
   (void) XR←ImportProcS(var←c89552, 68166148);
   (void) XR←ImportProcS(var←c89552, 67639554);
   (void) XR←ImportProcS(var←c89552, 529666);
   (void) XR←ImportProcS(var←c89552, 529154);
   (void) XR←ImportProcS(var←c89552, 67637506);
   (void) XR←ImportProcS(var←c89552, 68165892);
   (void) XR←ImportProcS(var←c89552, 68165636);
   (void) XR←ImportProcS(var←c89552, 792579);
   (void) XR←ImportProcS(var←c89552, 67905795);
   (void) XR←ImportProcS(var←c89552, 787715);
   (void) XR←ImportProcS(var←c89552, 67371009);
   (void) XR←ImportProcS(var←c89552, 67637250);
   var←c89552 = (word) XR←ImportInterface((word) "GGSegment", (word) XR←GetTypeIndexS((word) (&string268)), 47);
   (* (( (ptr) gf←c0862)+426)/* var←c84816 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 68419843);
   var←c89552 = (word) XR←ImportInterface((word) "GGSelect", (word) XR←GetTypeIndexS((word) (&string269)), 23);
   (* (( (ptr) gf←c0862)+406)/* var←c81840 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67898627);
   (void) XR←ImportProcS(var←c89552, 786691);
   (void) XR←ImportProcS(var←c89552, 1051396);
   (void) XR←ImportProcS(var←c89552, 524290);
   (void) XR←ImportProcS(var←c89552, 786947);
   (void) XR←ImportProcS(var←c89552, 67375361);
   (void) XR←ImportProcS(var←c89552, 789507);
   (void) XR←ImportProcS(var←c89552, 526594);
   (void) XR←ImportProcS(var←c89552, 67636994);
   var←c89552 = (word) XR←ImportInterface((word) "GGSessionLog", (word) XR←GetTypeIndexS((word) (&string270)), 7);
   (* (( (ptr) gf←c0862)+397)/* var←c81040 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 525826);
   (void) XR←ImportProcS(var←c89552, 525570);
   (void) XR←ImportProcS(var←c89552, 135004675);
   (void) XR←ImportProcS(var←c89552, 135266564);
   (void) XR←ImportProcS(var←c89552, 135266308);
   var←c89552 = (word) XR←ImportInterface((word) "GGShapes", (word) XR←GetTypeIndexS((word) (&string271)), 20);
   (* (( (ptr) gf←c0862)+419)/* var←c83184 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 786947);
   var←c89552 = (word) XR←ImportInterface((word) "GGSlice", (word) XR←GetTypeIndexS((word) (&string272)), 128);
   (* (( (ptr) gf←c0862)+429)/* var←c84944 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67376897);
   (void) XR←ImportProcS(var←c89552, 67905795);
   var←c89552 = (word) XR←ImportInterface((word) "GGSliceOps", (word) XR←GetTypeIndexS((word) (&string273)), 73);
   (* (( (ptr) gf←c0862)+418)/* var←c83152 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 532738);
   (void) XR←ImportProcS(var←c89552, 134756866);
   (void) XR←ImportProcS(var←c89552, 67377153);
   (void) XR←ImportProcS(var←c89552, 67371521);
   (void) XR←ImportProcS(var←c89552, 67376897);
   (void) XR←ImportProcS(var←c89552, 67650562);
   (void) XR←ImportProcS(var←c89552, 67634434);
   (void) XR←ImportProcS(var←c89552, 67640834);
   (void) XR←ImportProcS(var←c89552, 1325829);
   (void) XR←ImportProcS(var←c89552, 67642370);
   (void) XR←ImportProcS(var←c89552, 134755842);
   (void) XR←ImportProcS(var←c89552, 134755330);
   (void) XR←ImportProcS(var←c89552, 134754818);
   (void) XR←ImportProcS(var←c89552, 336084482);
   (void) XR←ImportProcS(var←c89552, 1850631);
   (void) XR←ImportProcS(var←c89552, 1062148);
   (void) XR←ImportProcS(var←c89552, 1061636);
   (void) XR←ImportProcS(var←c89552, 68169988);
   (void) XR←ImportProcS(var←c89552, 67633922);
   (void) XR←ImportProcS(var←c89552, 1313541);
   var←c89552 = (word) XR←ImportInterface((word) "GGState", (word) XR←GetTypeIndexS((word) (&string274)), 119);
   (* (( (ptr) gf←c0862)+400)/* var←c81616 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67397633);
   (void) XR←ImportProcS(var←c89552, 67398145);
   (void) XR←ImportProcS(var←c89552, 67109888);
   var←c89552 = (word) XR←ImportInterface((word) "GGTraj", (word) XR←GetTypeIndexS((word) (&string275)), 55);
   (* (( (ptr) gf←c0862)+425)/* var←c84784 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67374081);
   (void) XR←ImportProcS(var←c89552, 134487809);
   (void) XR←ImportProcS(var←c89552, 134749186);
   (void) XR←ImportProcS(var←c89552, 68157956);
   (void) XR←ImportProcS(var←c89552, 67633153);
   var←c89552 = (word) XR←ImportInterface((word) "GGTransform", (word) XR←GetTypeIndexS((word) (&string276)), 7);
   (* (( (ptr) gf←c0862)+428)/* var←c84912 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67108864);
   var←c89552 = (word) XR←ImportInterface((word) "GGUIUtility", (word) XR←GetTypeIndexS((word) (&string277)), 10);
   (* (( (ptr) gf←c0862)+412)/* var←c82288 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 525826);
   var←c89552 = (word) XR←ImportInterface((word) "GGUserInput", (word) XR←GetTypeIndexS((word) (&string278)), 13);
   (* (( (ptr) gf←c0862)+399)/* var←c81392 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 1312261);
   (void) XR←ImportProcS(var←c89552, 525058);
   var←c89552 = (word) XR←ImportInterface((word) "GGUtility", (word) XR←GetTypeIndexS((word) (&string279)), 42);
   (* (( (ptr) gf←c0862)+410)/* var←c82224 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 135008515);
   (void) XR←ImportProcS(var←c89552, 134221824);
   (void) XR←ImportProcS(var←c89552, 67379457);
   (void) XR←ImportProcS(var←c89552, 67641858);
   (void) XR←ImportProcS(var←c89552, 67901443);
   var←c89552 = (word) XR←ImportInterface((word) "GGViewerOps", (word) XR←GetTypeIndexS((word) (&string280)), 8);
   (* (( (ptr) gf←c0862)+396)/* var←c81008 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67108864);
   var←c89552 = (word) XR←ImportInterface((word) "GGWindow", (word) XR←GetTypeIndexS((word) (&string281)), 12);
   (* (( (ptr) gf←c0862)+405)/* var←c81776 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 1572870);
   var←c89552 = (word) XR←ImportInterface((word) "Imager", (word) XR←GetTypeIndexS((word) (&string282)), 84);
   (* (( (ptr) gf←c0862)+417)/* var←c83088 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 537602);
   (void) XR←ImportProcS(var←c89552, 540674);
   (void) XR←ImportProcS(var←c89552, 790018);
   (void) XR←ImportProcS(var←c89552, 526338);
   var←c89552 = (word) XR←ImportInterface((word) "ImagerArtwork", (word) XR←GetTypeIndexS((word) (&string283)), 4);
   (* (( (ptr) gf←c0862)+414)/* var←c82480 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67108864);
   (void) XR←ImportProcS(var←c89552, 2359814);
   var←c89552 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string284)), 103);
   (* (( (ptr) gf←c0862)+393)/* var←c80880 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 2111493);
   (void) XR←ImportProcS(var←c89552, 1063171);
   (void) XR←ImportProcS(var←c89552, 528642);
   (void) XR←ImportProcS(var←c89552, 67640578);
   (void) XR←ImportProcS(var←c89552, 68958724);
   (void) XR←ImportProcS(var←c89552, 67641090);
   (void) XR←ImportProcS(var←c89552, 67378689);
   var←c89552 = (word) XR←ImportInterface((word) "Lines2d", (word) XR←GetTypeIndexS((word) (&string285)), 50);
   (* (( (ptr) gf←c0862)+435)/* var←c89520 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67904258);
   (void) XR←ImportProcS(var←c89552, 68158466);
   var←c89552 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string286)), 43);
   (* (( (ptr) gf←c0862)+421)/* var←c84272 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67896323);
   (void) XR←ImportProcS(var←c89552, 67633666);
   var←c89552 = (word) XR←ImportInterface((word) "SlackProcess", (word) XR←GetTypeIndexS((word) (&string287)), 26);
   (* (( (ptr) gf←c0862)+398)/* var←c81104 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67373569);
   (void) XR←ImportProcS(var←c89552, 67373313);
   var←c89552 = (word) XR←ImportInterface((word) "TiogaOps", (word) XR←GetTypeIndexS((word) (&string288)), 128);
   (* (( (ptr) gf←c0862)+415)/* var←c82512 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 67657730);
   (void) XR←ImportProcS(var←c89552, 810755);
   (void) XR←ImportProcS(var←c89552, 2374919);
   (void) XR←ImportProcS(var←c89552, 9728);
   (void) XR←ImportProcS(var←c89552, 537148161);
   var←c89552 = (word) XR←ImportInterface((word) "Vectors2d", (word) XR←GetTypeIndexS((word) (&string289)), 21);
   (* (( (ptr) gf←c0862)+424)/* var←c84528 */  ) = var←c89552;
   (void) XR←ImportProcS(var←c89552, 134744321);
   (void) XR←ImportProcS(var←c89552, 135006210);
   (void) XR←ImportProcS(var←c89552, 135267842);
   var←c89552 = (word) XR←ExportInterface((word) &string254, (word) XR←GetTypeIndexS((word) (&string255)), 38);
   (* (( (ptr) gf←c0862)+436)/* var←c89584 */  ) = var←c89552;
   (void) XR←ExportProcS(var←c89552, (word) (( (bPt) gf←c0862)+1100)/* var←c78960 */ , 527618, (word) "AreaSelectNewAndDelete")
   ;
   (void) XR←ExportProcS(var←c89552, (word) (( (bPt) gf←c0862)+1156)/* var←c79184 */ , 533506, (word) "ShowDefaultStrokeValues")
   ;
   var←c89552 = (word) XR←ExportInterface((word) "GGEventExtras", (word) XR←GetTypeIndexS((word) (&string290)), 6);
   (* (( (ptr) gf←c0862)+436)/* var←c89584 */  ) = var←c89552;
   (void) XR←ExportProcS(var←c89552, (word) (( (bPt) gf←c0862)+1268)/* var←c79632 */ , 1310725, (word) "SetDashed");
   (void) XR←ExportProcS(var←c89552, (word) (( (bPt) gf←c0862)+1308)/* var←c79792 */ , 524546, (word) "SetStrokeWidth");
   (void) XR←ExportProcS(var←c89552, (word) (( (bPt) gf←c0862)+1292)/* var←c79728 */ , 524802, (word) "SetStrokeEnd");
   var←c89552 = (word) XR←ExportInterface((word) "GGHistoryTypes", (word) XR←GetTypeIndexS((word) (&string291)), 2);
   (* (( (ptr) gf←c0862)+437)/* var←c89616 */  ) = var←c89552;
   (void) XR←ExportType((word) &string292, (word) XR←GetTypeIndexS((word) (&string293)), (word) XR←GetTypeIndex((word) &string294, 0, (word) &string295)
      );
   var←c89552 = (word) XR←ExportInterface((word) "GGInterfaceTypes", (word) XR←GetTypeIndexS((word) (&string296)), 6);
   (* (( (ptr) gf←c0862)+437)/* var←c89616 */  ) = var←c89552;
   (void) XR←ExportType((word) &string292, (word) XR←GetTypeIndexS((word) (&string293)), (word) XR←GetTypeIndex((word) &string294, 0, (word) &string295)
      );
   (void) XR←ExportType((word) "RefreshDataObj", (word) XR←GetTypeIndexS((word) (&string297)), (word) XR←GetTypeIndex((word) &string298, 0, (word) &string299)
      );
   }

static void GGEventImplF←P0(formal←c0122, formal←c0121)
   word formal←c0122;
   word formal←c0121;
   {
   /* GGEventImplF: */ 
SOURCE(780, 65767)
   /* moved to installation proc */ 
SOURCE(66527, 20)
   (void) RegisterEventProcs←P3840();
   }

static void ScriptAction←P60(ggData←v31156, event←v31184)
   word ggData←v31156;
   word event←v31184;
   {
   register ptr gf←c89648 =  (ptr) &globalframe;
   word atom←v10740;
   /* ScriptAction: */ 
SOURCE(2769, 290)
SOURCE(2801, 37)
   atom←v10740 = XR←Narrow((*  (ptr) (* (( (ptr) event←v31184)+1) ) ), (* (( (ptr) gf←c89648)+7) ));
SOURCE(2840, 219)
   {
      word var←c80848;
      var←c80848 = atom←v10740;
      if ((var←c80848 == (* (( (ptr) gf←c89648)+262) ))) {
SOURCE(2866, 25)
         (void) OpenScript←P180(ggData←v31156, event←v31184);
         goto endif0300;
         };
      if ((var←c80848 == (* (( (ptr) gf←c89648)+173) ))) {
SOURCE(2904, 29)
         (void) AppendToScript←P240(ggData←v31156, event←v31184);
         goto endif0300;
         };
      if ((var←c80848 == (* (( (ptr) gf←c89648)+172) ))) {
SOURCE(2945, 26)
         (void) CloseScript←P300(ggData←v31156, event←v31184);
         goto endif0300;
         };
      if ((var←c80848 == (* (( (ptr) gf←c89648)+157) ))) {
SOURCE(2986, 29)
         (void) PlaybackScript←P360(ggData←v31156, event←v31184);
         goto endif0300;
         };
      if ((var←c80848 == (* (( (ptr) gf←c89648)+136) ))) {
SOURCE(3030, 29)
         (void) FastPlayScript←P420(ggData←v31156, event←v31184);
         goto endif0300;
         };
SOURCE(3072, 6)
      (void) XR←RaiseUnnamedError();
      goto endif0300;
      endif0300: ;
      };
   }

static void ShowScripts←P120(ggData←v31244, event←v31272)
   word ggData←v31244;
   word event←v31272;
   {
   register ptr gf←c89680 =  (ptr) &globalframe;
   word stream←v10784;
   /* ShowScripts: */ 
SOURCE(3082, 203)
SOURCE(3113, 28)
   {
      word pd301;
      pd301 = (* (( (ptr) (* (( (ptr) gf←c89680)+393)/* var←c80880 */  ))+34) );
      stream←v10784 = (word) ( *( (fPt) ((*  (ptr) pd301 ))))(0, pd301);
      };
SOURCE(3143, 69)
   {
      word pd302;
      pd302 = (* (( (ptr) (* (( (ptr) gf←c89680)+394)/* var←c80912 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd302 ))))(stream←v10784, (*  (ptr) (* (( (ptr) (* (( (ptr) ggData←v31244)+29) ))+7) ) ), pd302)
      ;
      };
SOURCE(3214, 71)
   {
      word var←c80944;
      {
         word pd303;
         pd303 = (* (( (ptr) (* (( (ptr) gf←c89680)+393)/* var←c80880 */  ))+35) );
         var←c80944 = (word) ( *( (fPt) ((*  (ptr) pd303 ))))(stream←v10784, 1, pd303);
         };
      {
         word pd304;
         pd304 = (* (( (ptr) (* (( (ptr) gf←c89680)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd304 ))))((* (( (ptr) ggData←v31244)+3) ), 0, (* (( (ptr) gf←c89680)+113) ), var←c80944, pd304)
         ;
         };
      };
   }

static void OpenScript←P180(ggData←v8244, event←v8272)
   word ggData←v8244;
   word event←v8272;
   {
   register ptr gf←c89712 =  (ptr) &globalframe;
   word name←v10828;
   /* OpenScript: */ 
SOURCE(3291, 336)
SOURCE(3349, 52)
   {
      word pd305;
      pd305 = (* (( (ptr) (* (( (ptr) gf←c89712)+396)/* var←c81008 */  ))+4) );
      name←v10828 = (word) ( *( (fPt) ((*  (ptr) pd305 ))))(pd305);
      };
SOURCE(3403, 164)
   {
      W2 var←c81072;
      {
         word pd306;
         pd306 = (* (( (ptr) (* (( (ptr) gf←c89712)+397)/* var←c81040 */  ))+4) );
         (void) ( *( (fPt) ((*  (ptr) pd306 ))))((word) &var←c81072, name←v10828, ggData←v8244, (* (( (ptr) (* (( (ptr) ggData←v8244)+29)
                ))+2) ), (* (( (ptr) (* (( (ptr) ggData←v8244)+29) ))+1) ), pd306);
         };
      (* (( (ptr) (* (( (ptr) ggData←v8244)+29) ))+1) ) = var←c81072.f1;
      (* (( (ptr) (* (( (ptr) ggData←v8244)+29) ))+2) ) = var←c81072.f0;
      };
SOURCE(3569, 58)
   {
      word var←c81136;
      word pd307;
      pd307 = (* (( (ptr) (* (( (ptr) gf←c89712)+398)/* var←c81104 */  ))+13) );
      var←c81136 = (word) ( *( (fPt) ((*  (ptr) pd307 ))))((* ((( (ptr) ggData←v8244)+48)) ), pd307);
      };
   }

static void AppendToScript←P240(ggData←v8432, event←v8460)
   word ggData←v8432;
   word event←v8460;
   {
   register ptr gf←c89744 =  (ptr) &globalframe;
   word name←v10872;
   /* AppendToScript: */ 
SOURCE(3633, 342)
SOURCE(3695, 52)
   {
      word pd308;
      pd308 = (* (( (ptr) (* (( (ptr) gf←c89744)+396)/* var←c81008 */  ))+4) );
      name←v10872 = (word) ( *( (fPt) ((*  (ptr) pd308 ))))(pd308);
      };
SOURCE(3749, 166)
   {
      W2 var←c81168;
      {
         word pd309;
         pd309 = (* (( (ptr) (* (( (ptr) gf←c89744)+397)/* var←c81040 */  ))+5) );
         (void) ( *( (fPt) ((*  (ptr) pd309 ))))((word) &var←c81168, name←v10872, ggData←v8432, (* (( (ptr) (* (( (ptr) ggData←v8432)+29)
                ))+2) ), (* (( (ptr) (* (( (ptr) ggData←v8432)+29) ))+1) ), pd309);
         };
      (* (( (ptr) (* (( (ptr) ggData←v8432)+29) ))+1) ) = var←c81168.f1;
      (* (( (ptr) (* (( (ptr) ggData←v8432)+29) ))+2) ) = var←c81168.f0;
      };
SOURCE(3917, 58)
   {
      word var←c81200;
      word pd310;
      pd310 = (* (( (ptr) (* (( (ptr) gf←c89744)+398)/* var←c81104 */  ))+13) );
      var←c81200 = (word) ( *( (fPt) ((*  (ptr) pd310 ))))((* ((( (ptr) ggData←v8432)+48)) ), pd310);
      };
   }

static void CloseScript←P300(ggData←v8616, event←v8644)
   word ggData←v8616;
   word event←v8644;
   {
   register ptr gf←c89776 =  (ptr) &globalframe;
   /* CloseScript: */ 
SOURCE(3981, 286)
SOURCE(4040, 59)
   {
      word var←c81232;
      word pd311;
      pd311 = (* (( (ptr) (* (( (ptr) gf←c89776)+398)/* var←c81104 */  ))+14) );
      var←c81232 = (word) ( *( (fPt) ((*  (ptr) pd311 ))))((* ((( (ptr) ggData←v8616)+48)) ), pd311);
      };
SOURCE(4101, 166)
   {
      W2 var←c81264;
      {
         word pd312;
         pd312 = (* (( (ptr) (* (( (ptr) gf←c89776)+397)/* var←c81040 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd312 ))))((word) &var←c81264, (* (( (ptr) (* (( (ptr) ggData←v8616)+29) ))+2) ), (* (( (ptr) (* (
                  ( (ptr) ggData←v8616)+29) ))+1) ), (* (( (ptr) ggData←v8616)+3) ), pd312);
         };
      (* (( (ptr) (* (( (ptr) ggData←v8616)+29) ))+1) ) = var←c81264.f1;
      (* (( (ptr) (* (( (ptr) ggData←v8616)+29) ))+2) ) = var←c81264.f0;
      };
   }

static void PlaybackScript←P360(ggData←v8800, event←v8828)
   word ggData←v8800;
   word event←v8828;
   {
   register ptr gf←c89808 =  (ptr) &globalframe;
   word name←v10916;
   /* PlaybackScript: */ 
SOURCE(4273, 159)
SOURCE(4335, 52)
   {
      word pd313;
      pd313 = (* (( (ptr) (* (( (ptr) gf←c89808)+396)/* var←c81008 */  ))+4) );
      name←v10916 = (word) ( *( (fPt) ((*  (ptr) pd313 ))))(pd313);
      };
SOURCE(4389, 43)
   {
      word pd314;
      pd314 = (* (( (ptr) (* (( (ptr) gf←c89808)+397)/* var←c81040 */  ))+9) );
      (void) ( *( (fPt) ((*  (ptr) pd314 ))))(name←v10916, ggData←v8800, pd314);
      };
   }

static void FastPlayScript←P420(ggData←v8984, event←v9012)
   word ggData←v8984;
   word event←v9012;
   {
   register ptr gf←c89840 =  (ptr) &globalframe;
   word name←v10960;
   /* FastPlayScript: */ 
SOURCE(4438, 334)
SOURCE(4500, 52)
   {
      word pd315;
      pd315 = (* (( (ptr) (* (( (ptr) gf←c89840)+396)/* var←c81008 */  ))+4) );
      name←v10960 = (word) ( *( (fPt) ((*  (ptr) pd315 ))))(pd315);
      };
SOURCE(4554, 54)
   {
      word var←c81296;
      {
         word var←c81328;
         word var←c81360;
         var←c81328 = XR←NewObject(8, (* (( (ptr) gf←c89840)+15) ));
         var←c81360 = var←c81328;
         (*  (ptr) var←c81360 ) = (* (( (ptr) gf←c89840)+108) );
         var←c81296 = var←c81328;
         };
      {
         word pd316;
         pd316 = (* (( (ptr) (* (( (ptr) gf←c89840)+399)/* var←c81392 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd316 ))))(ggData←v8984, var←c81296, pd316);
         };
      };
SOURCE(4625, 43)
   {
      word pd317;
      pd317 = (* (( (ptr) (* (( (ptr) gf←c89840)+397)/* var←c81040 */  ))+9) );
      (void) ( *( (fPt) ((*  (ptr) pd317 ))))(name←v10960, ggData←v8984, pd317);
      };
SOURCE(4670, 53)
   {
      word var←c81424;
      {
         word var←c81456;
         word var←c81488;
         var←c81456 = XR←NewObject(8, (* (( (ptr) gf←c89840)+15) ));
         var←c81488 = var←c81456;
         (*  (ptr) var←c81488 ) = (* (( (ptr) gf←c89840)+95) );
         var←c81424 = var←c81456;
         };
      {
         word pd318;
         pd318 = (* (( (ptr) (* (( (ptr) gf←c89840)+399)/* var←c81392 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd318 ))))(ggData←v8984, var←c81424, pd318);
         };
      };
SOURCE(4725, 47)
   {
      word var←c81520;
      {
         word var←c81552;
         word var←c81584;
         var←c81552 = XR←NewObject(8, (* (( (ptr) gf←c89840)+15) ));
         var←c81584 = var←c81552;
         (*  (ptr) var←c81584 ) = (* (( (ptr) gf←c89840)+94) );
         var←c81520 = var←c81552;
         };
      {
         word pd319;
         pd319 = (* (( (ptr) (* (( (ptr) gf←c89840)+399)/* var←c81392 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd319 ))))(ggData←v8984, var←c81520, pd319);
         };
      };
   }

static void MergeFromGargoyle←P480(ggData←v31332, event←v31360)
   word ggData←v31332;
   word event←v31360;
   {
   register ptr gf←c89872 =  (ptr) &globalframe;
   word theirData←v11004;
   /* MergeFromGargoyle: */ 
SOURCE(4777, 895)
SOURCE(4814, 45)
   {
      word pd320;
      pd320 = (* (( (ptr) (* (( (ptr) gf←c89872)+400)/* var←c81616 */  ))+8) );
      theirData←v11004 = (word) ( *( (fPt) ((*  (ptr) pd320 ))))(pd320);
      };
SOURCE(4861, 811)
   if ((theirData←v11004 == 0)) {
SOURCE(4885, 131)
      {
         word pd321;
         pd321 = (* (( (ptr) (* (( (ptr) gf←c89872)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd321 ))))((* (( (ptr) ggData←v31332)+3) ), 0, (* (( (ptr) gf←c89872)+93) ), (* (( (ptr) gf←c89872)+92)
             ), pd321);
         };
      }
   else {
SOURCE(5016, 661)
      {
         word newSlices←v11048 = 0;
         word theirScene←v11076;
SOURCE(5044, 35)
         theirScene←v11076 = (* (( (ptr) theirData←v11004)+11) );
SOURCE(5081, 51)
         {
            word pd322;
            pd322 = (* (( (ptr) (* (( (ptr) gf←c89872)+401)/* var←c81648 */  ))+7) );
            (void) ( *( (fPt) ((*  (ptr) pd322 ))))((* (( (ptr) gf←c89872)+76) ), ggData←v31332, pd322);
            };
SOURCE(5159, 83)
         {
            word pd323;
            pd323 = (* (( (ptr) (* (( (ptr) gf←c89872)+402)/* var←c81680 */  ))+20) );
            newSlices←v11048 = (word) ( *( (fPt) ((*  (ptr) pd323 ))))(theirScene←v11076, (* (( (ptr) ggData←v31332)+11) ), pd323);
            };
SOURCE(5244, 428)
         if ((newSlices←v11048 != 0)) {
SOURCE(5268, 49)
            {
               word pd324;
               pd324 = (* (( (ptr) (* (( (ptr) gf←c89872)+403)/* var←c81712 */  ))+33) );
               (void) ( *( (fPt) ((*  (ptr) pd324 ))))(newSlices←v11048, ggData←v31332, pd324);
               };
SOURCE(5319, 81)
            {
               word pd325;
               pd325 = (* (( (ptr) (* (( (ptr) gf←c89872)+404)/* var←c81744 */  ))+10) );
               (void) ( *( (fPt) ((*  (ptr) pd325 ))))(ggData←v31332, 0, 0, 0, 1, 0
                  , 0, 0, 0, 0, pd325);
               };
SOURCE(5402, 29)
            {
               word pd326;
               pd326 = (* (( (ptr) (* (( (ptr) gf←c89872)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd326 ))))(ggData←v31332, pd326);
               };
SOURCE(5433, 85)
            {
               word pd327;
               pd327 = (* (( (ptr) (* (( (ptr) gf←c89872)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd327 ))))((* (( (ptr) ggData←v31332)+3) ), 0, (* (( (ptr) gf←c89872)+53) ), (* (( (ptr) gf←c89872)+25)
                   ), pd327);
               };
SOURCE(5520, 152)
            {
               word pd328;
               pd328 = (* (( (ptr) (* (( (ptr) gf←c89872)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd328 ))))((* (( (ptr) gf←c89872)+26) ), ggData←v31332, 5, 1, 0, 0, pd328);
               };
            };
         };
      };
   }

static void StuffIt←P540(formal←c01053, event←v31448)
   word formal←c01053;
   word event←v31448;
   {
   W17 var←c89904;
   /* declaration of ggData←v31420 skipped */ 
   register ptr gf←c89936 =  (ptr) &globalframe;
   /* declaration of var←c81808 skipped */ 
   (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ) = formal←c01053;
   /* StuffIt: */ 
SOURCE(5684, 5275)
   {
      word tmpAddr329;
      tmpAddr329 = (word) (( (ptr) &var←c89904)+5)/* var←c81808 */ ;
      (*  (ptr) tmpAddr329 ) = ( ((word)  (fPt) DoStuff←P4140) );
      (* (( (ptr) tmpAddr329) + 1) ) = 1;
      };
SOURCE(5718, 5241)
   {
      word pd330;
      pd330 = (* (( (ptr) (* (( (ptr) gf←c89936)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd330 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+11) ), 0, pd330)
      )) {
SOURCE(5770, 108)
         {
            word pd331;
            pd331 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd331 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 0, (* (( (ptr) gf←c89936)+93)
                ), (* (( (ptr) gf←c89936)+27) ), pd331);
            };
         }
      else {
SOURCE(5878, 5086)
         {
            word op←v11204;
            word fileName←v11232 = 0;
            /* declaration of fullName←v11260 skipped */ 
            /* declaration of tempQuality←v11288 skipped */ 
            /* declaration of tempStyle←v11316 skipped */ 
            /* declaration of displayStyle←v11344 skipped */ 
            word toFile←v11372 = 0;
            word ipOnly←v11400 = 0;
            /* declaration of bordered←v11428 skipped */ 
            word fit←v11456 = 0;
            word success←v11484 = 0;
            word versionSpecified←v11512 = 0;
            word noName←v11540 = 0;
SOURCE(5880, 30)
            op←v11204 = XR←Narrow((*  (ptr) event←v31448 ), (* (( (ptr) gf←c89936)+7) ));
SOURCE(5912, 29)
            (* (( (ptr) &var←c89904)+7)/* fullName←v11260 */  ) = 0;
SOURCE(5943, 65)
            (* (( (ptr) &var←c89904)+8)/* tempQuality←v11288 */  ) = (*  (ptr) (* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+15)
             ) );
SOURCE(6010, 69)
            (* (( (ptr) &var←c89904)+9)/* tempStyle←v11316 */  ) = (* (( (ptr) (* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+15)
                ))+1) );
SOURCE(6081, 72)
            (* (( (ptr) &var←c89904)+10)/* displayStyle←v11344 */  ) = (* (( (ptr) (* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+15)
                ))+1) );
SOURCE(6155, 43)
            (* (( (ptr) &var←c89904)+11)/* bordered←v11428 */  ) = 0;
SOURCE(6249, 136)
            {
               word var←c81872;
               var←c81872 = op←v11204;
               if (((((var←c81872 == (* (( (ptr) gf←c89936)+28) )) || (var←c81872 == (* (( (ptr) gf←c89936)+29) ))) || (var←c81872 == (* (
                  ( (ptr) gf←c89936)+30) ))) || (var←c81872 == (* (( (ptr) gf←c89936)+31) ))) || (var←c81872 == (* (( (ptr) gf←c89936)+32) ))) {
                  ipOnly←v11400 = 1;
                  }
               else {
                  ipOnly←v11400 = 0;
                  };
               };
SOURCE(6387, 106)
            {
               word var←c81904;
               var←c81904 = op←v11204;
               if (((var←c81904 == (* (( (ptr) gf←c89936)+33) )) || (var←c81904 == (* (( (ptr) gf←c89936)+34) ))) || (var←c81904 == (* (
                  ( (ptr) gf←c89936)+28) ))) {
                  (* (( (ptr) &var←c89904)+10)/* displayStyle←v11344 */  ) = 1;
                  }
               else {
                  (* (( (ptr) &var←c89904)+10)/* displayStyle←v11344 */  ) = 0;
                  };
               };
SOURCE(6495, 79)
            {
               word var←c81936;
               var←c81936 = op←v11204;
               if ((var←c81936 == (* (( (ptr) gf←c89936)+35) )) || (var←c81936 == (* (( (ptr) gf←c89936)+34) ))) {
                  toFile←v11372 = 1;
                  }
               else {
                  toFile←v11372 = 0;
                  };
               };
SOURCE(6576, 148)
            {
               word var←c81968;
               var←c81968 = op←v11204;
               if ((((var←c81968 == (* (( (ptr) gf←c89936)+36) )) || (var←c81968 == (* (( (ptr) gf←c89936)+37) ))) || (var←c81968 == (* (
                  ( (ptr) gf←c89936)+30) ))) || (var←c81968 == (* (( (ptr) gf←c89936)+32) ))) {
                  (* (( (ptr) &var←c89904)+11)/* bordered←v11428 */  ) = 1;
                  }
               else {
                  (* (( (ptr) &var←c89904)+11)/* bordered←v11428 */  ) = 0;
                  };
               };
SOURCE(6726, 133)
            {
               word var←c82000;
               var←c82000 = op←v11204;
               if ((((var←c82000 == (* (( (ptr) gf←c89936)+38) )) || (var←c82000 == (* (( (ptr) gf←c89936)+37) ))) || (var←c82000 == (* (
                  ( (ptr) gf←c89936)+31) ))) || (var←c82000 == (* (( (ptr) gf←c89936)+32) ))) {
                  fit←v11456 = 1;
                  }
               else {
                  fit←v11456 = 0;
                  };
               };
SOURCE(6861, 4098)
            if ((0 != toFile←v11372)) {
SOURCE(6876, 1154)
SOURCE(6911, 145)
               {
                  W5 var←c82064;
                  {
                     word pd332;
                     pd332 = (* (( (ptr) (* (( (ptr) gf←c89936)+407)/* var←c82032 */  ))+7) );
                     (void) ( *( (fPt) ((*  (ptr) pd332 ))))((word) &var←c82064, (* (( (ptr) gf←c89936)+39) ), (* (( (ptr) event←v31448)+1) ), (* (
                           ( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+6) ), (* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3)
                         ), 0, pd332);
                     };
                  noName←v11540 = var←c82064.f4;
                  versionSpecified←v11512 = var←c82064.f3;
                  success←v11484 = var←c82064.f2;
                  (* (( (ptr) &var←c89904)+7)/* fullName←v11260 */  ) = var←c82064.f1;
                  fileName←v11232 = var←c82064.f0;
                  };
SOURCE(7058, 776)
               if ((0 == success←v11484)) {
SOURCE(7078, 16)
                  goto lab←L100000;
                  }
               else {
SOURCE(7094, 742)
                  {
                     word startTime←v11584;
                     word totalTime←v11612;
                     word fileScene←v11640;
                     word f←v11668;
SOURCE(7138, 40)
                     {
                        word pd333;
                        pd333 = (* (( (ptr) (* (( (ptr) gf←c89936)+402)/* var←c81680 */  ))+4) );
                        fileScene←v11640 = (word) ( *( (fPt) ((*  (ptr) pd333 ))))(0, pd333);
                        };
SOURCE(7180, 71)
                     {
                        /* declaration of var←c01 skipped */ 
                        /* declaration of var←c02 skipped */ 
                        (* (( (ptr) &var←c89904)+12) ) = 7;
                        (* (( (ptr) &var←c89904)+13) ) = 1;
                        (* (( (ptr) &var←c89904)+14)/* var←c02 */  ) = (* (( (ptr) (* (( (ptr) gf←c89936)+408)/* var←c82128 */  ))+27) );
                        {
                           /* declaration of var←c03 skipped */ 
                           {
/*1*/   word var←c04;
/*1*/   {
/*1*/      word var←c0987;
/*1*/      var←c0987 = (word) &var←c89904;
/*1*/      var←c04 = (word) XR←Enable(( ((word)  (fPt) NoName←Q8640) ), ( ((word)  (fPt) NoName←Q9060) ), var←c0987);
/*1*/      };
/*1*/   if ((var←c04 == 2)) {
/*1*/      goto lab←L100000;
/*1*/      };
/*1*/   };
                           f←v11668 = (* (( (ptr) &var←c89904)+15)/* var←c03 */  );
                           };
                        };
SOURCE(7265, 90)
                     {
                        W2 var←c82160;
                        var←c82160.f0 = 11;
                        var←c82160.f1 = (* (( (ptr) &var←c89904)+7)/* fullName←v11260 */  );
                        {
                           word pd334;
                           pd334 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+14) );
                           (void) ( *( (fPt) ((*  (ptr) pd334 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 1, (* (( (ptr) gf←c89936)+40)
/*1*/    ), (* (( (ptr) gf←c89936)+41) ), var←c82160, pd334);
                           };
                        };
SOURCE(7358, 27)
                     {
                        word pd335;
                        pd335 = (* (( (ptr) (* (( (ptr) gf←c89936)+409)/* var←c82192 */  ))+14) );
                        startTime←v11584 = (word) ( *( (fPt) ((*  (ptr) pd335 ))))(pd335);
                        };
SOURCE(7387, 143)
                     {
                        register word slice←v11712;
                        {
                           word pd336;
                           pd336 = (* (( (ptr) (* (( (ptr) gf←c89936)+410)/* var←c82224 */  ))+28) );
                           slice←v11712 = (word) ( *( (fPt) ((*  (ptr) pd336 ))))((* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ), 1, 0, pd336);
                           };
                        lab←L100006: ;
                        if ((slice←v11712 != 0)) {
                           }
                        else {
                           goto lab←L100003;
                           };
SOURCE(7490, 40)
                        {
                           word pd337;
                           pd337 = (* (( (ptr) (* (( (ptr) gf←c89936)+402)/* var←c81680 */  ))+9) );
                           (void) ( *( (fPt) ((*  (ptr) pd337 ))))(fileScene←v11640, (*  (ptr) slice←v11712 ),  (word) -1, pd337);
                           };
                        slice←v11712 = (* (( (ptr) slice←v11712)+1) );
                        goto lab←L100006;
                        lab←L100003: ;
                        };
SOURCE(7541, 64)
                     {
                        word pd338;
                        pd338 = (* (( (ptr) (* (( (ptr) gf←c89936)+411)/* var←c82256 */  ))+5) );
                        (void) ( *( (fPt) ((*  (ptr) pd338 ))))(f←v11668, (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ), (* (( (ptr) &var←c89904)+7)
                           /* fullName←v11260 */  ), fileScene←v11640, pd338);
                        };
SOURCE(7607, 39)
                     {
                        word pd339;
                        pd339 = (* (( (ptr) (* (( (ptr) gf←c89936)+412)/* var←c82288 */  ))+10) );
                        (void) ( *( (fPt) ((*  (ptr) pd339 ))))(f←v11668, (* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), pd339)
                        ;
                        };
SOURCE(7648, 56)
                     {
                        word var←c82320;
                        {
                           word pd340;
                           pd340 = (* (( (ptr) (* (( (ptr) gf←c89936)+409)/* var←c82192 */  ))+14) );
                           var←c82320 = (word) ( *( (fPt) ((*  (ptr) pd340 ))))(pd340);
                           };
                        {
                           word pd341;
                           pd341 = (* (( (ptr) (* (( (ptr) gf←c89936)+409)/* var←c82192 */  ))+16) );
                           totalTime←v11612 = (word) ( *( (fPt) ((*  (ptr) pd341 ))))(startTime←v11584, var←c82320, pd341);
                           };
                        };
SOURCE(7707, 91)
                     {
                        W2 var←c82352;
                        var←c82352.f0 = 5;
                        var←c82352.f1 = totalTime←v11612;
                        {
                           word pd342;
                           pd342 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+14) );
                           (void) ( *( (fPt) ((*  (ptr) pd342 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 3, (* (( (ptr) gf←c89936)+40)
/*1*/    ), (* (( (ptr) gf←c89936)+42) ), var←c82352, pd342);
                           };
                        };
SOURCE(7800, 34)
                     {
                        word pd343;
                        pd343 = (* (( (ptr) (* (( (ptr) gf←c89936)+407)/* var←c82032 */  ))+36) );
                        (void) ( *( (fPt) ((*  (ptr) pd343 ))))((* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ), 0, pd343);
                        };
                     };
                  };
               goto lab←L100007;
               lab←L100000: ;
SOURCE(7854, 174)
               {
                  W2 var←c82384;
                  var←c82384.f0 = 11;
                  var←c82384.f1 = fileName←v11232;
                  {
                     word pd344;
                     pd344 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+14) );
                     (void) ( *( (fPt) ((*  (ptr) pd344 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 0, (* (( (ptr) gf←c89936)+93)
                         ),  ( (0 != noName←v11540) ? (* (( (ptr) gf←c89936)+43) ) : (* (( (ptr) gf←c89936)+44) ) ) , var←c82384, pd344);
                     };
                  };
               lab←L100007: ;
               }
            else {
SOURCE(8037, 2924)
               {
                  /* declaration of bBox←v11868 skipped */ 
                  /* declaration of bRect←v11896 skipped */ 
                  word selViewer←v11924 = 0;
                  word selLevel←v11952 = 1;
                  W2 selStart←v11980;
                  word pendingDelete←v12008 = 0;
                  word var←c82576;
                  W3 var←c0211;
SOURCE(8780, 71)
                  {
                     word pd345;
                     pd345 = (* (( (ptr) (* (( (ptr) gf←c89936)+402)/* var←c81680 */  ))+45) );
                     (* (( (ptr) &var←c89904)+12)/* bBox←v11868 */  ) = (word) ( *( (fPt) ((*  (ptr) pd345 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)
                           /* ggData←v31420 */  ))+11) ), 0, 1, pd345);
                     };
SOURCE(8853, 64)
                  {
                     word pd346;
                     pd346 = (* (( (ptr) (* (( (ptr) gf←c89936)+413)/* var←c82416 */  ))+11) );
                     (void) ( *( (fPt) ((*  (ptr) pd346 ))))((word) (( (bPt) &var←c89904)+52)/* bRect←v11896 */ , (* (( (ptr) &var←c89904)+12)
                        /* bBox←v11868 */  ), pd346);
                     };
SOURCE(8973, 31)
                  selStart←v11980.f0 = 0;
                  selStart←v11980.f1 = 0;
SOURCE(9036, 178)
                  if ((0 == (word) XR←IsBound((* ((( (ptr) (* (( (ptr) gf←c89936)+414)/* var←c82480 */  ))+6)) )))) {
SOURCE(9093, 113)
                     {
                        word pd347;
                        pd347 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd347 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 0, (* (( (ptr) gf←c89936)+93)
                            ), (* (( (ptr) gf←c89936)+45) ), pd347);
                        };
SOURCE(9208, 6)
                     return;
                     };
SOURCE(9219, 116)
                  {
                     W8 var←c82544;
                     {
                        word pd348;
                        pd348 = (* (( (ptr) (* (( (ptr) gf←c89936)+415)/* var←c82512 */  ))+63) );
                        (void) ( *( (fPt) ((*  (ptr) pd348 ))))((word) &var←c82544, 0, pd348);
                        };
                     pendingDelete←v12008 = var←c82544.f7;
                     selLevel←v11952 = var←c82544.f5;
                     selStart←v11980 = (*  (W2Pt) (( (ptr) &var←c82544)+1) );
                     selViewer←v11924 = var←c82544.f0;
                     };
SOURCE(9337, 216)
                  if ((selViewer←v11924 == 0) ||  ( (selLevel←v11952 != 3) ? (selLevel←v11952 != 4) : 0 ) ) {
SOURCE(9400, 145)
                     {
                        word pd349;
                        pd349 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd349 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 0, (* (( (ptr) gf←c89936)+93)
                            ), (* (( (ptr) gf←c89936)+46) ), pd349);
                        };
SOURCE(9547, 6)
                     return;
                     };
SOURCE(9558, 185)
                  {
                     word pd350;
                     pd350 = (* (( (ptr) (* (( (ptr) gf←c89936)+400)/* var←c81616 */  ))+110) );
                     if (((word) ( *( (fPt) ((*  (ptr) pd350 ))))((* ((( (ptr) &var←c89904)+4)/* ggData←v31420 */ ) ), pd350) != 0)) {
                        {
                           word pd351;
                           pd351 = (* (( (ptr) (* (( (ptr) gf←c89936)+400)/* var←c81616 */  ))+110) );
                           var←c82576 = (word) ( *( (fPt) ((*  (ptr) pd351 ))))((* ((( (ptr) &var←c89904)+4)/* ggData←v31420 */ ) ), pd351);
                           };
                        {
                           word pd352;
                           pd352 = (* (( (ptr) (* (( (ptr) gf←c89936)+416)/* var←c82608 */  ))+8) );
                           (void) ( *( (fPt) ((*  (ptr) pd352 ))))((word) &var←c0211, (* (( (ptr) gf←c89936)+47) ), var←c82576, (* (( (ptr) (* (( (ptr) &var←c89904)+4)
/*1*/      /* ggData←v31420 */  ))+6) ), (* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 0, pd352);
                           };
                        (* (( (ptr) &var←c89904)+7)/* fullName←v11260 */  ) = var←c0211.f0;
                        }
                     else {
                        (* (( (ptr) &var←c89904)+7)/* fullName←v11260 */  ) = (* (( (ptr) gf←c89936)+48) );
                        };
                     };
SOURCE(9774, 92)
                  {
                     W2 var←c82640;
                     var←c82640.f0 = 11;
                     var←c82640.f1 = (* (( (ptr) &var←c89904)+7)/* fullName←v11260 */  );
                     {
                        word pd353;
                        pd353 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+14) );
                        (void) ( *( (fPt) ((*  (ptr) pd353 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 1, (* (( (ptr) gf←c89936)+53)
                            ), (* (( (ptr) gf←c89936)+49) ), var←c82640, pd353);
                        };
                     };
SOURCE(9868, 196)
                  if ((0 == pendingDelete←v12008)) {
SOURCE(9896, 16)
                     {
                        word pd354;
                        pd354 = (* (( (ptr) (* (( (ptr) gf←c89936)+415)/* var←c82512 */  ))+42) );
                        (void) ( *( (fPt) ((*  (ptr) pd354 ))))(pd354);
                        };
SOURCE(9914, 69)
                     {
                        W8 var←c82672;
                        {
                           word pd355;
                           pd355 = (* (( (ptr) (* (( (ptr) gf←c89936)+415)/* var←c82512 */  ))+63) );
                           (void) ( *( (fPt) ((*  (ptr) pd355 ))))((word) &var←c82672, 0, pd355);
                           };
                        selStart←v11980 = (*  (W2Pt) (( (ptr) &var←c82672)+1) );
                        selViewer←v11924 = var←c82672.f0;
                        };
SOURCE(9985, 79)
                     {
                        word pd356;
                        pd356 = (* (( (ptr) (* (( (ptr) gf←c89936)+415)/* var←c82512 */  ))+65) );
                        (void) ( *( (fPt) ((*  (ptr) pd356 ))))(selViewer←v11924, selStart←v11980, selStart←v11980, 3, 1, 1
                           , 0, pd356);
                        };
                     };
SOURCE(10069, 147)
                  {
                     word var←c82704;
                     {
                        word pd357;
                        pd357 = (* (( (ptr) (* (( (ptr) gf←c89936)+414)/* var←c82480 */  ))+4) );
                        var←c82704 = (word) ( *( (fPt) ((*  (ptr) pd357 ))))(pd357);
                        };
                     {
                        W4 var←c82736;
                        var←c82736.f0 = (*  (ptr) &fc358 );
                        var←c82736.f1 = (*  (ptr) &fc358 );
                        var←c82736.f2 = (* (( (ptr) &var←c89904)+15) );
                        var←c82736.f3 = (* (( (ptr) &var←c89904)+16) );
                        {
                           word pd359;
                           pd359 = (* (( (ptr) (* (( (ptr) gf←c89936)+414)/* var←c82480 */  ))+6) );
                           (void) ( *( (fPt) ((*  (ptr) pd359 ))))((word) (( (bPt) &var←c89904)+20)/* var←c81808 */ , var←c82736, var←c82704, 0, fit←v11456, 0, pd359)
                           ;
                           };
                        };
                     };
SOURCE(10218, 666)
                  if ((0 == ipOnly←v11400)) {
SOURCE(10237, 652)
                     {
                        word fileRope←v12112 = 0;
                        word viewer←v12140 = 0;
                        W2 stuffedLoc←v12168;
                        word fileScene←v12196;
                        word rs←v12224;
SOURCE(10276, 33)
                        stuffedLoc←v12168.f0 = 0;
                        stuffedLoc←v12168.f1 = 0;
SOURCE(10311, 40)
                        {
                           word pd360;
                           pd360 = (* (( (ptr) (* (( (ptr) gf←c89936)+402)/* var←c81680 */  ))+4) );
                           fileScene←v12196 = (word) ( *( (fPt) ((*  (ptr) pd360 ))))(0, pd360);
                           };
SOURCE(10353, 24)
                        {
                           word pd361;
                           pd361 = (* (( (ptr) (* (( (ptr) gf←c89936)+393)/* var←c80880 */  ))+34) );
                           rs←v12224 = (word) ( *( (fPt) ((*  (ptr) pd361 ))))(0, pd361);
                           };
SOURCE(10379, 53)
                        {
                           W8 var←c82800;
                           {
/*1*/   word pd362;
/*1*/   pd362 = (* (( (ptr) (* (( (ptr) gf←c89936)+415)/* var←c82512 */  ))+63) );
/*1*/   (void) ( *( (fPt) ((*  (ptr) pd362 ))))((word) &var←c82800, 0, pd362);
/*1*/   };
                           stuffedLoc←v12168 = (*  (W2Pt) (( (ptr) &var←c82800)+1) );
                           viewer←v12140 = var←c82800.f0;
                           };
SOURCE(10434, 450)
                        if ((stuffedLoc←v12168.f0 != 0)) {
SOURCE(10464, 143)
                           {
/*1*/   register word slice←v12268;
/*1*/   {
/*1*/      word pd363;
/*1*/      pd363 = (* (( (ptr) (* (( (ptr) gf←c89936)+410)/* var←c82224 */  ))+28) );
/*1*/      slice←v12268 = (word) ( *( (fPt) ((*  (ptr) pd363 ))))((* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ), 1, 0, pd363);
/*1*/      };
/*1*/   lab←L100011: ;
/*1*/   if ((slice←v12268 != 0)) {
/*1*/      }
/*1*/   else {
/*1*/      goto lab←L100008;
/*1*/      };
SOURCE(10567, 40)
/*1*/   {
/*1*/      word pd364;
/*1*/      pd364 = (* (( (ptr) (* (( (ptr) gf←c89936)+402)/* var←c81680 */  ))+9) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd364 ))))(fileScene←v12196, (*  (ptr) slice←v12268 ),  (word) -1, pd364);
/*1*/      };
/*1*/   slice←v12268 = (* (( (ptr) slice←v12268)+1) );
/*1*/   goto lab←L100011;
/*1*/   lab←L100008: ;
/*1*/   };
SOURCE(10618, 146)
                           {
/*1*/   word var←c82832;
/*1*/   {
/*1*/      word var←c82864;
/*1*/      W2 var←c82896;
/*1*/      {
/*1*/         word pd365;
/*1*/         pd365 = (* (( (ptr) (* (( (ptr) gf←c89936)+416)/* var←c82608 */  ))+5) );
/*1*/         var←c82864 = (word) ( *( (fPt) ((*  (ptr) pd365 ))))((* ((( (ptr) &var←c89904)+7)/* fullName←v11260 */ ) ), pd365);
/*1*/         };
/*1*/      {
/*1*/         W2 var←c82928;
/*1*/         word v←v78720;
/*1*/         {
/*1*/            word pd366;
/*1*/            pd366 = (* (( (ptr) (* (( (ptr) gf←c89936)+409)/* var←c82192 */  ))+14) );
/*1*/            v←v78720 = (word) ( *( (fPt) ((*  (ptr) pd366 ))))(pd366);
/*1*/            };
/*1*/         var←c82928.f0 = 13;
/*1*/         var←c82928.f1 = v←v78720;
/*1*/         var←c82896 = var←c82928;
/*1*/         };
/*1*/      {
/*1*/         W2 var←c82992;
/*1*/         W2 var←c0988;
/*1*/         var←c82992.f0 = 11;
/*1*/         var←c82992.f1 = var←c82864;
/*1*/         (*  (ptr) (word) &var←c0988 ) = 0;
/*1*/         (* (( (ptr) (word) &var←c0988) + 1) ) = 0;
/*1*/         {
/*1*/            word pd367;
/*1*/            pd367 = (* (( (ptr) (* (( (ptr) gf←c89936)+393)/* var←c80880 */  ))+62) );
/*1*/            var←c82832 = (word) ( *( (fPt) ((*  (ptr) pd367 ))))((* (( (ptr) gf←c89936)+50) ), var←c82992, var←c82896, var←c0988, pd367)
/*1*/            ;
/*1*/            };
/*1*/         };
/*1*/      };
/*1*/   {
/*1*/      word pd368;
/*1*/      pd368 = (* (( (ptr) (* (( (ptr) gf←c89936)+411)/* var←c82256 */  ))+5) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd368 ))))(rs←v12224, (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ), var←c82832, fileScene←v12196, pd368)
/*1*/      ;
/*1*/      };
/*1*/   };
SOURCE(10766, 48)
                           {
/*1*/   word pd369;
/*1*/   pd369 = (* (( (ptr) (* (( (ptr) gf←c89936)+393)/* var←c80880 */  ))+35) );
/*1*/   fileRope←v12112 = (word) ( *( (fPt) ((*  (ptr) pd369 ))))(rs←v12224, 1, pd369);
/*1*/   };
SOURCE(10816, 68)
                           {
/*1*/   word pd370;
/*1*/   pd370 = (* (( (ptr) (* (( (ptr) gf←c89936)+415)/* var←c82512 */  ))+99) );
/*1*/   (void) ( *( (fPt) ((*  (ptr) pd370 ))))(stuffedLoc←v12168.f0, (* (( (ptr) gf←c89936)+51) ), fileRope←v12112, pd370);
/*1*/   };
                           };
                        };
                     };
SOURCE(10892, 67)
                  {
                     word pd371;
                     pd371 = (* (( (ptr) (* (( (ptr) gf←c89936)+395)/* var←c80976 */  ))+12) );
                     (void) ( *( (fPt) ((*  (ptr) pd371 ))))((* (( (ptr) (* (( (ptr) &var←c89904)+4)/* ggData←v31420 */  ))+3) ), 3, (* (( (ptr) gf←c89936)+53)
                         ), (* (( (ptr) gf←c89936)+52) ), pd371);
                     };
                  };
               };
            };
         };
      };
   }

static word NoName←Q8640(formal←c0872)
   word formal←c0872;
   {
SOURCE(7180, 71)
   {
      word pd372;
      pd372 = (* (( (ptr) formal←c0872)+14) );
      (* (( (ptr) formal←c0872)+15) ) = (word) ( *( (fPt) ((*  (ptr) pd372 ))))((* (( (ptr) formal←c0872)+7) ), 1, 7, 1, 2560, (*  (W2Pt) (
            ( (ptr) formal←c0872)+12) )
         , 0, 2147483647, 1, 0, 0, 0, pd372);
      };
   return(0);
   }

static void DoStuff←P4140(formal←c01054, formal←c90000)
   word formal←c01054;
   word formal←c90000;
   {
   W7 var←c89968;
   /* declaration of context←v12084 skipped */ 
   /* declaration of var←c83056 skipped */ 
   formal←c90000 = (formal←c90000 - 20);
   var←c89968.f4/* context←v12084 */  = formal←c01054;
   var←c89968.f0 = formal←c90000;
   /* DoStuff: */ 
SOURCE(8039, 15)
   {
      word tmpAddr373;
      tmpAddr373 = (word) (( (ptr) &var←c89968)+5)/* var←c83056 */ ;
      (*  (ptr) tmpAddr373 ) = ( ((word)  (fPt) DoStuffIt←P4344) );
      (* (( (ptr) tmpAddr373) + 1) ) = 1;
      };
SOURCE(8083, 692)
   {
      word var←c0989;
      var←c0989 = (word) &var←c89968;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q8700) ), ( ((word)  (fPt) NoName←Q9000) ), var←c0989);
      };
   }

static word NoName←Q8700(formal←c0875)
   word formal←c0875;
   {
   register ptr gf←c0874 =  (ptr) &globalframe;
SOURCE(8182, 18)
SOURCE(8742, 33)
   {
      word pd374;
      pd374 = (* (( (ptr) (* (( (ptr) gf←c0874)+417)/* var←c83088 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd374 ))))((* (( (ptr) formal←c0875)+4) ), (word) (( (bPt) formal←c0875)+20), pd374);
      };
   return(0);
   }

static void DoStuffIt←P4344(formal←c90064)
   word formal←c90064;
   {
   register ptr gf←c90032 =  (ptr) &globalframe;
   formal←c90064 = (formal←c90064 - 20);
   /* DoStuffIt: */ 
SOURCE(8182, 18)
SOURCE(8202, 31)
   (*  (ptr) (* (( (ptr) (* (( (ptr) (*  (ptr) formal←c90064 ))+4) ))+15) ) ) = 2;
SOURCE(8274, 41)
   (* (( (ptr) (* (( (ptr) (* (( (ptr) (*  (ptr) formal←c90064 ))+4) ))+15) ))+1) ) = (* (( (ptr) (*  (ptr) formal←c90064 ))+10)
    );
SOURCE(8317, 43)
   {
      W2 var←c83120;
      {
         word x375;
         *(float*)&var←c83120.f0 =  - (
            x375 = (* (( (ptr) (*  (ptr) formal←c90064 ))+13) ),  *(float*)&x375
            );
         };
      {
         word x376;
         *(float*)&var←c83120.f1 =  - (
            x376 = (* (( (ptr) (*  (ptr) formal←c90064 ))+14) ),  *(float*)&x376
            );
         };
      {
         word pd377;
         pd377 = (* (( (ptr) (* (( (ptr) gf←c90032)+417)/* var←c83088 */  ))+18) );
         (void) ( *( (fPt) ((*  (ptr) pd377 ))))((* (( (ptr) formal←c90064)+4) ), var←c83120, pd377);
         };
      };
SOURCE(8362, 172)
   {
      register word slice←v12456;
      {
         word pd378;
         pd378 = (* (( (ptr) (* (( (ptr) gf←c90032)+410)/* var←c82224 */  ))+28) );
         slice←v12456 = (word) ( *( (fPt) ((*  (ptr) pd378 ))))((* (( (ptr) (*  (ptr) formal←c90064 ))+4) ), 1, 0, pd378);
         };
      lab←L100018: ;
      if ((slice←v12456 != 0)) {
         }
      else {
         goto lab←L100015;
         };
SOURCE(8465, 69)
      {
         word pd379;
         pd379 = (* (( (ptr) (* (( (ptr) gf←c90032)+418)/* var←c83152 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd379 ))))((*  (ptr) slice←v12456 ), 0, (* (( (ptr) formal←c90064)+4) ), (* (( (ptr) (* (( (ptr) (*  (ptr) formal←c90064 ))+4)
                ))+15) ), 0, pd379);
         };
      slice←v12456 = (* (( (ptr) slice←v12456)+1) );
      goto lab←L100018;
      lab←L100015: ;
      };
SOURCE(8545, 112)
   if ((0 != (* (( (ptr) (*  (ptr) formal←c90064 ))+11) ))) {
SOURCE(8564, 35)
      {
         word pd380;
         pd380 = (* (( (ptr) (* (( (ptr) gf←c90032)+417)/* var←c83088 */  ))+68) );
         (void) ( *( (fPt) ((*  (ptr) pd380 ))))((* (( (ptr) formal←c90064)+4) ), (* (( (ptr) gf←c90032)+4)/* borderWidth←v6332 */  ), pd380)
         ;
         };
SOURCE(8601, 18)
      {
         word pd381;
         pd381 = (* (( (ptr) (* (( (ptr) gf←c90032)+417)/* var←c83088 */  ))+56) );
         (void) ( *( (fPt) ((*  (ptr) pd381 ))))((* (( (ptr) formal←c90064)+4) ), (*  (ptr) &fc382 ), pd381);
         };
SOURCE(8621, 36)
      {
         word pd383;
         pd383 = (* (( (ptr) (* (( (ptr) gf←c90032)+419)/* var←c83184 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd383 ))))((* (( (ptr) formal←c90064)+4) ), (* (( (ptr) (*  (ptr) formal←c90064 ))+12) ), (*  (ptr) &fc382 ), pd383)
         ;
         };
      };
SOURCE(8662, 35)
   (*  (ptr) (* (( (ptr) (* (( (ptr) (*  (ptr) formal←c90064 ))+4) ))+15) ) ) = (* (( (ptr) (*  (ptr) formal←c90064 ))+8) );
SOURCE(8699, 38)
   (* (( (ptr) (* (( (ptr) (* (( (ptr) (*  (ptr) formal←c90064 ))+4) ))+15) ))+1) ) = (* (( (ptr) (*  (ptr) formal←c90064 ))+9)
    );
   }

static void Grab←P600(ggData←v31508, event←v31536)
   word ggData←v31508;
   word event←v31536;
   {
   register ptr gf←c90096 =  (ptr) &globalframe;
   word v←v12584 = 0;
   W2 selectedLoc←v12612;
   /* Grab: */ 
SOURCE(10971, 1100)
SOURCE(11013, 34)
   selectedLoc←v12612.f0 = 0;
   selectedLoc←v12612.f1 = 0;
SOURCE(11049, 64)
   {
      W8 var←c83248;
      {
         word pd384;
         pd384 = (* (( (ptr) (* (( (ptr) gf←c90096)+415)/* var←c82512 */  ))+63) );
         (void) ( *( (fPt) ((*  (ptr) pd384 ))))((word) &var←c83248, 0, pd384);
         };
      selectedLoc←v12612 = (*  (W2Pt) (( (ptr) &var←c83248)+1) );
      v←v12584 = var←c83248.f0;
      };
SOURCE(11115, 831)
   if ((v←v12584 != 0)) {
SOURCE(11129, 822)
      {
         word ggFileProp←v12656;
SOURCE(11131, 76)
         {
            word pd385;
            pd385 = (* (( (ptr) (* (( (ptr) gf←c90096)+415)/* var←c82512 */  ))+100) );
            ggFileProp←v12656 = XR←Narrow((word) ( *( (fPt) ((*  (ptr) pd385 ))))(selectedLoc←v12612.f0, (* (( (ptr) gf←c90096)+51) ), pd385)
               , (* (( (ptr) gf←c90096)+20) ));
            };
         if ((ggFileProp←v12656 == 0)) {
            goto lab←L100019;
            };
         if (( (unsigned) (*(int*)ggFileProp←v12656<0) == 0)) {
            goto lab←L100019;
            };
         (void) XR←RaiseError(XR←NarrowFault, 0);
         lab←L100019: ;
SOURCE(11209, 737)
         if ((ggFileProp←v12656 != 0)) {
SOURCE(11232, 716)
            {
               word success←v12700 = 0;
               word sceneName←v12728 = 0;
SOURCE(11279, 69)
               if (((*  (ptr) event←v31536 ) == (* (( (ptr) gf←c90096)+54) ))) {
SOURCE(11313, 35)
                  {
                     word var←c83312;
                     {
                        word var←c83344;
                        word var←c83376;
                        var←c83344 = XR←NewObject(8, (* (( (ptr) gf←c90096)+15) ));
                        var←c83376 = var←c83344;
                        (*  (ptr) var←c83376 ) = (* (( (ptr) gf←c90096)+55) );
                        var←c83312 = var←c83344;
                        };
                     {
                        word pd386;
                        pd386 = (* (( (ptr) (* (( (ptr) gf←c90096)+407)/* var←c82032 */  ))+5) );
                        (void) ( *( (fPt) ((*  (ptr) pd386 ))))(ggData←v31508, var←c83312, pd386);
                        };
                     };
                  };
SOURCE(11364, 70)
               {
                  word pd387;
                  pd387 = (* (( (ptr) (* (( (ptr) gf←c90096)+395)/* var←c80976 */  ))+12) );
                  (void) ( *( (fPt) ((*  (ptr) pd387 ))))((* (( (ptr) ggData←v31508)+3) ), 1, (* (( (ptr) gf←c90096)+53) ), (* (( (ptr) gf←c90096)+56)
                      ), pd387);
                  };
SOURCE(11436, 102)
               {
                  W2 var←c83472;
                  {
                     word var←c83408;
                     {
                        word pd388;
                        pd388 = (* (( (ptr) (* (( (ptr) gf←c90096)+393)/* var←c80880 */  ))+33) );
                        var←c83408 = (word) ( *( (fPt) ((*  (ptr) pd388 ))))(ggFileProp←v12656, 0, pd388);
                        };
                     {
                        word pd389;
                        pd389 = (* (( (ptr) (* (( (ptr) gf←c90096)+420)/* var←c83440 */  ))+5) );
                        (void) ( *( (fPt) ((*  (ptr) pd389 ))))((word) &var←c83472, var←c83408, (* (( (ptr) ggData←v31508)+11) ), 1, (* (( (ptr) ggData←v31508)+15)
                            ), 1, pd389);
                        };
                     };
                  sceneName←v12728 = var←c83472.f1;
                  success←v12700 = var←c83472.f0;
                  };
SOURCE(11540, 398)
               if ((0 != success←v12700)) {
SOURCE(11558, 51)
                  {
                     word var←c83504;
                     {
                        word var←c83536;
                        word var←c83568;
                        var←c83536 = XR←NewObject(8, (* (( (ptr) gf←c90096)+15) ));
                        var←c83568 = var←c83536;
                        (*  (ptr) var←c83568 ) = (* (( (ptr) gf←c90096)+57) );
                        var←c83504 = var←c83536;
                        };
                     {
                        word pd390;
                        pd390 = (* (( (ptr) (* (( (ptr) gf←c90096)+407)/* var←c82032 */  ))+36) );
                        (void) ( *( (fPt) ((*  (ptr) pd390 ))))(ggData←v31508, var←c83504, pd390);
                        };
                     };
SOURCE(11611, 57)
                  {
                     word pd391;
                     pd391 = (* (( (ptr) (* (( (ptr) gf←c90096)+395)/* var←c80976 */  ))+12) );
                     (void) ( *( (fPt) ((*  (ptr) pd391 ))))((* (( (ptr) ggData←v31508)+3) ), 3, (* (( (ptr) gf←c90096)+53) ), sceneName←v12728, pd391)
                     ;
                     };
SOURCE(11670, 141)
                  {
                     word pd392;
                     pd392 = (* (( (ptr) (* (( (ptr) gf←c90096)+405)/* var←c81776 */  ))+4) );
                     (void) ( *( (fPt) ((*  (ptr) pd392 ))))((* (( (ptr) gf←c90096)+58) ), ggData←v31508, 0, 1, 0, 0, pd392);
                     };
                  }
               else {
SOURCE(11820, 118)
                  {
                     word pd393;
                     pd393 = (* (( (ptr) (* (( (ptr) gf←c90096)+395)/* var←c80976 */  ))+12) );
                     (void) ( *( (fPt) ((*  (ptr) pd393 ))))((* (( (ptr) ggData←v31508)+3) ), 0, (* (( (ptr) gf←c90096)+93) ), (* (( (ptr) gf←c90096)+59)
                         ), pd393);
                     };
                  };
SOURCE(11940, 6)
               return;
               };
            };
         };
      };
SOURCE(11954, 117)
   {
      word pd394;
      pd394 = (* (( (ptr) (* (( (ptr) gf←c90096)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd394 ))))((* (( (ptr) ggData←v31508)+3) ), 0, (* (( (ptr) gf←c90096)+93) ), (* (( (ptr) gf←c90096)+60)
          ), pd394);
      };
   }

static void Top←P660(ggData←v31596, event←v31624)
   word ggData←v31596;
   word event←v31624;
   {
   register ptr gf←c90128 =  (ptr) &globalframe;
   /* Top: */ 
SOURCE(12076, 873)
SOURCE(12106, 843)
   {
      word pd395;
      pd395 = (* (( (ptr) (* (( (ptr) gf←c90128)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd395 ))))((* (( (ptr) ggData←v31596)+11) ), 0, pd395))) {
SOURCE(12158, 115)
         {
            word pd396;
            pd396 = (* (( (ptr) (* (( (ptr) gf←c90128)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd396 ))))((* (( (ptr) ggData←v31596)+3) ), 0, (* (( (ptr) gf←c90128)+93) ), (* (( (ptr) gf←c90128)+61)
                ), pd396);
            };
         }
      else {
SOURCE(12273, 678)
         {
            word selected←v12772 = 0;
SOURCE(12300, 35)
            {
               word pd397;
               pd397 = (* (( (ptr) (* (( (ptr) gf←c90128)+401)/* var←c81648 */  ))+7) );
               (void) ( *( (fPt) ((*  (ptr) pd397 ))))((* (( (ptr) gf←c90128)+62) ), ggData←v31596, pd397);
               };
SOURCE(12368, 55)
            {
               word pd398;
               pd398 = (* (( (ptr) (* (( (ptr) gf←c90128)+410)/* var←c82224 */  ))+28) );
               selected←v12772 = (word) ( *( (fPt) ((*  (ptr) pd398 ))))(ggData←v31596, 1, 0, pd398);
               };
SOURCE(12425, 194)
            {
               register word slices←v12900;
               slices←v12900 = selected←v12772;
               lab←L100023: ;
               if ((slices←v12900 != 0)) {
                  }
               else {
                  goto lab←L100020;
                  };
SOURCE(12495, 69)
               {
                  word pd399;
                  pd399 = (* (( (ptr) (* (( (ptr) gf←c90128)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd399 ))))((*  (ptr) slices←v12900 ), (* (( (ptr) ggData←v31596)+11) ), 0, ggData←v31596, pd399)
                  ;
                  };
SOURCE(12566, 53)
               {
                  word pd400;
                  pd400 = (* (( (ptr) (* (( (ptr) gf←c90128)+402)/* var←c81680 */  ))+28) );
                  (void) ( *( (fPt) ((*  (ptr) pd400 ))))((* (( (ptr) ggData←v31596)+11) ), (*  (ptr) slices←v12900 ),  (word) -1, pd400);
                  };
               slices←v12900 = (* (( (ptr) slices←v12900)+1) );
               goto lab←L100023;
               lab←L100020: ;
               };
SOURCE(12630, 29)
            {
               word pd401;
               pd401 = (* (( (ptr) (* (( (ptr) gf←c90128)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd401 ))))(ggData←v31596, pd401);
               };
SOURCE(12711, 97)
            {
               word pd402;
               pd402 = (* (( (ptr) (* (( (ptr) gf←c90128)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd402 ))))((* (( (ptr) ggData←v31596)+3) ), 0, (* (( (ptr) gf←c90128)+53) ), (* (( (ptr) gf←c90128)+63)
                   ), pd402);
               };
SOURCE(12810, 139)
            {
               word pd403;
               pd403 = (* (( (ptr) (* (( (ptr) gf←c90128)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd403 ))))((* (( (ptr) gf←c90128)+64) ), ggData←v31596, 4, 1, 0, 0, pd403);
               };
            };
         };
      };
   }

static void ShowPriorityValue←P720(ggData←v31684, event←v31712)
   word ggData←v31684;
   word event←v31712;
   {
   register ptr gf←c90160 =  (ptr) &globalframe;
   word sliceD←v13028 = 0;
   word scene←v13056;
   word count←v13084;
   /* ShowPriorityValue: */ 
SOURCE(12958, 483)
SOURCE(13027, 27)
   scene←v13056 = (* (( (ptr) ggData←v31684)+11) );
SOURCE(13056, 63)
   {
      word pd404;
      pd404 = (* (( (ptr) (* (( (ptr) gf←c90160)+402)/* var←c81680 */  ))+36) );
      count←v13084 = (word) ( *( (fPt) ((*  (ptr) pd404 ))))(scene←v13056, 0, 0, 0, pd404);
      };
SOURCE(13121, 320)
   if ((count←v13084 != 1)) {
SOURCE(13137, 124)
      {
         word pd405;
         pd405 = (* (( (ptr) (* (( (ptr) gf←c90160)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd405 ))))((* (( (ptr) ggData←v31684)+3) ), 0, (* (( (ptr) gf←c90160)+93) ), (* (( (ptr) gf←c90160)+65)
             ), pd405);
         };
      }
   else {
SOURCE(13263, 57)
      {
         word pd406;
         pd406 = (* (( (ptr) (* (( (ptr) gf←c90160)+402)/* var←c81680 */  ))+37) );
         sliceD←v13028 = (word) ( *( (fPt) ((*  (ptr) pd406 ))))(scene←v13056, 0, 0, 0, pd406);
         };
SOURCE(13322, 119)
      {
         word var←c83600;
         {
            word pd407;
            pd407 = (* (( (ptr) (* (( (ptr) gf←c90160)+402)/* var←c81680 */  ))+21) );
            var←c83600 = (word) ( *( (fPt) ((*  (ptr) pd407 ))))(scene←v13056, (*  (ptr) sliceD←v13028 ), pd407);
            };
         {
            W2 var←c83632;
            var←c83632.f0 = 5;
            var←c83632.f1 = var←c83600;
            {
               word pd408;
               pd408 = (* (( (ptr) (* (( (ptr) gf←c90160)+395)/* var←c80976 */  ))+14) );
               (void) ( *( (fPt) ((*  (ptr) pd408 ))))((* (( (ptr) ggData←v31684)+3) ), 0, (* (( (ptr) gf←c90160)+113) ), (* (( (ptr) gf←c90160)+66)
                   ), var←c83632, pd408);
               };
            };
         };
      };
   }

static void Bottom←P780(ggData←v31772, event←v31800)
   word ggData←v31772;
   word event←v31800;
   {
   register ptr gf←c90192 =  (ptr) &globalframe;
   /* Bottom: */ 
SOURCE(13450, 874)
SOURCE(13483, 841)
   {
      word pd409;
      pd409 = (* (( (ptr) (* (( (ptr) gf←c90192)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd409 ))))((* (( (ptr) ggData←v31772)+11) ), 0, pd409))) {
SOURCE(13535, 113)
         {
            word pd410;
            pd410 = (* (( (ptr) (* (( (ptr) gf←c90192)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd410 ))))((* (( (ptr) ggData←v31772)+3) ), 0, (* (( (ptr) gf←c90192)+93) ), (* (( (ptr) gf←c90192)+67)
                ), pd410);
            };
         }
      else {
SOURCE(13648, 678)
         {
            word selected←v13128 = 0;
SOURCE(13675, 38)
            {
               word pd411;
               pd411 = (* (( (ptr) (* (( (ptr) gf←c90192)+401)/* var←c81648 */  ))+7) );
               (void) ( *( (fPt) ((*  (ptr) pd411 ))))((* (( (ptr) gf←c90192)+68) ), ggData←v31772, pd411);
               };
SOURCE(13746, 55)
            {
               word pd412;
               pd412 = (* (( (ptr) (* (( (ptr) gf←c90192)+410)/* var←c82224 */  ))+28) );
               selected←v13128 = (word) ( *( (fPt) ((*  (ptr) pd412 ))))(ggData←v31772, 0, 0, pd412);
               };
SOURCE(13803, 193)
            {
               register word slices←v13256;
               slices←v13256 = selected←v13128;
               lab←L100027: ;
               if ((slices←v13256 != 0)) {
                  }
               else {
                  goto lab←L100024;
                  };
SOURCE(13873, 69)
               {
                  word pd413;
                  pd413 = (* (( (ptr) (* (( (ptr) gf←c90192)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd413 ))))((*  (ptr) slices←v13256 ), (* (( (ptr) ggData←v31772)+11) ), 0, ggData←v31772, pd413)
                  ;
                  };
SOURCE(13944, 52)
               {
                  word pd414;
                  pd414 = (* (( (ptr) (* (( (ptr) gf←c90192)+402)/* var←c81680 */  ))+28) );
                  (void) ( *( (fPt) ((*  (ptr) pd414 ))))((* (( (ptr) ggData←v31772)+11) ), (*  (ptr) slices←v13256 ), 0, pd414);
                  };
               slices←v13256 = (* (( (ptr) slices←v13256)+1) );
               goto lab←L100027;
               lab←L100024: ;
               };
SOURCE(14007, 29)
            {
               word pd415;
               pd415 = (* (( (ptr) (* (( (ptr) gf←c90192)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd415 ))))(ggData←v31772, pd415);
               };
SOURCE(14088, 95)
            {
               word pd416;
               pd416 = (* (( (ptr) (* (( (ptr) gf←c90192)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd416 ))))((* (( (ptr) ggData←v31772)+3) ), 0, (* (( (ptr) gf←c90192)+53) ), (* (( (ptr) gf←c90192)+69)
                   ), pd416);
               };
SOURCE(14185, 139)
            {
               word pd417;
               pd417 = (* (( (ptr) (* (( (ptr) gf←c90192)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd417 ))))((* (( (ptr) gf←c90192)+64) ), ggData←v31772, 4, 1, 0, 0, pd417);
               };
            };
         };
      };
   }

static void UpOne←P840(ggData←v31860, event←v31888)
   word ggData←v31860;
   word event←v31888;
   {
   register ptr gf←c90224 =  (ptr) &globalframe;
   /* UpOne: */ 
SOURCE(14333, 889)
SOURCE(14365, 857)
   {
      word pd418;
      pd418 = (* (( (ptr) (* (( (ptr) gf←c90224)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd418 ))))((* (( (ptr) ggData←v31860)+11) ), 0, pd418))) {
SOURCE(14417, 119)
         {
            word pd419;
            pd419 = (* (( (ptr) (* (( (ptr) gf←c90224)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd419 ))))((* (( (ptr) ggData←v31860)+3) ), 0, (* (( (ptr) gf←c90224)+93) ), (* (( (ptr) gf←c90224)+70)
                ), pd419);
            };
         }
      else {
SOURCE(14536, 688)
         {
            word selected←v13384 = 0;
SOURCE(14563, 38)
            {
               word pd420;
               pd420 = (* (( (ptr) (* (( (ptr) gf←c90224)+401)/* var←c81648 */  ))+7) );
               (void) ( *( (fPt) ((*  (ptr) pd420 ))))((* (( (ptr) gf←c90224)+71) ), ggData←v31860, pd420);
               };
SOURCE(14634, 55)
            {
               word pd421;
               pd421 = (* (( (ptr) (* (( (ptr) gf←c90224)+410)/* var←c82224 */  ))+28) );
               selected←v13384 = (word) ( *( (fPt) ((*  (ptr) pd421 ))))(ggData←v31860, 0, 0, pd421);
               };
SOURCE(14691, 182)
            {
               register word slices←v13512;
               slices←v13512 = selected←v13384;
               lab←L100031: ;
               if ((slices←v13512 != 0)) {
                  }
               else {
                  goto lab←L100028;
                  };
SOURCE(14761, 69)
               {
                  word pd422;
                  pd422 = (* (( (ptr) (* (( (ptr) gf←c90224)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd422 ))))((*  (ptr) slices←v13512 ), (* (( (ptr) ggData←v31860)+11) ), 0, ggData←v31860, pd422)
                  ;
                  };
SOURCE(14832, 41)
               {
                  word pd423;
                  pd423 = (* (( (ptr) (* (( (ptr) gf←c90224)+402)/* var←c81680 */  ))+23) );
                  (void) ( *( (fPt) ((*  (ptr) pd423 ))))((* (( (ptr) ggData←v31860)+11) ), (*  (ptr) slices←v13512 ), pd423);
                  };
               slices←v13512 = (* (( (ptr) slices←v13512)+1) );
               goto lab←L100031;
               lab←L100028: ;
               };
SOURCE(14884, 29)
            {
               word pd424;
               pd424 = (* (( (ptr) (* (( (ptr) gf←c90224)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd424 ))))(ggData←v31860, pd424);
               };
SOURCE(14965, 116)
            {
               word pd425;
               pd425 = (* (( (ptr) (* (( (ptr) gf←c90224)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd425 ))))((* (( (ptr) ggData←v31860)+3) ), 0, (* (( (ptr) gf←c90224)+53) ), (* (( (ptr) gf←c90224)+72)
                   ), pd425);
               };
SOURCE(15083, 139)
            {
               word pd426;
               pd426 = (* (( (ptr) (* (( (ptr) gf←c90224)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd426 ))))((* (( (ptr) gf←c90224)+64) ), ggData←v31860, 4, 1, 0, 0, pd426);
               };
            };
         };
      };
   }

static void DownOne←P900(ggData←v31948, event←v31976)
   word ggData←v31948;
   word event←v31976;
   {
   register ptr gf←c90256 =  (ptr) &globalframe;
   /* DownOne: */ 
SOURCE(15231, 890)
SOURCE(15265, 856)
   {
      word pd427;
      pd427 = (* (( (ptr) (* (( (ptr) gf←c90256)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd427 ))))((* (( (ptr) ggData←v31948)+11) ), 0, pd427))) {
SOURCE(15317, 118)
         {
            word pd428;
            pd428 = (* (( (ptr) (* (( (ptr) gf←c90256)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd428 ))))((* (( (ptr) ggData←v31948)+3) ), 0, (* (( (ptr) gf←c90256)+93) ), (* (( (ptr) gf←c90256)+73)
                ), pd428);
            };
         }
      else {
SOURCE(15435, 688)
         {
            word selected←v13640 = 0;
SOURCE(15462, 40)
            {
               word pd429;
               pd429 = (* (( (ptr) (* (( (ptr) gf←c90256)+401)/* var←c81648 */  ))+7) );
               (void) ( *( (fPt) ((*  (ptr) pd429 ))))((* (( (ptr) gf←c90256)+74) ), ggData←v31948, pd429);
               };
SOURCE(15535, 55)
            {
               word pd430;
               pd430 = (* (( (ptr) (* (( (ptr) gf←c90256)+410)/* var←c82224 */  ))+28) );
               selected←v13640 = (word) ( *( (fPt) ((*  (ptr) pd430 ))))(ggData←v31948, 1, 0, pd430);
               };
SOURCE(15592, 184)
            {
               register word slices←v13768;
               slices←v13768 = selected←v13640;
               lab←L100035: ;
               if ((slices←v13768 != 0)) {
                  }
               else {
                  goto lab←L100032;
                  };
SOURCE(15662, 69)
               {
                  word pd431;
                  pd431 = (* (( (ptr) (* (( (ptr) gf←c90256)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd431 ))))((*  (ptr) slices←v13768 ), (* (( (ptr) ggData←v31948)+11) ), 0, ggData←v31948, pd431)
                  ;
                  };
SOURCE(15733, 43)
               {
                  word pd432;
                  pd432 = (* (( (ptr) (* (( (ptr) gf←c90256)+402)/* var←c81680 */  ))+25) );
                  (void) ( *( (fPt) ((*  (ptr) pd432 ))))((* (( (ptr) ggData←v31948)+11) ), (*  (ptr) slices←v13768 ), pd432);
                  };
               slices←v13768 = (* (( (ptr) slices←v13768)+1) );
               goto lab←L100035;
               lab←L100032: ;
               };
SOURCE(15787, 29)
            {
               word pd433;
               pd433 = (* (( (ptr) (* (( (ptr) gf←c90256)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd433 ))))(ggData←v31948, pd433);
               };
SOURCE(15868, 112)
            {
               word pd434;
               pd434 = (* (( (ptr) (* (( (ptr) gf←c90256)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd434 ))))((* (( (ptr) ggData←v31948)+3) ), 0, (* (( (ptr) gf←c90256)+53) ), (* (( (ptr) gf←c90256)+75)
                   ), pd434);
               };
SOURCE(15982, 139)
            {
               word pd435;
               pd435 = (* (( (ptr) (* (( (ptr) gf←c90256)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd435 ))))((* (( (ptr) gf←c90256)+64) ), ggData←v31948, 4, 1, 0, 0, pd435);
               };
            };
         };
      };
   }

static void FindPriorityFromSelection←P960(ggData←v32036, event←v32064)
   word ggData←v32036;
   word event←v32064;
   {
   register ptr gf←c90288 =  (ptr) &globalframe;
   word priority←v13896;
   /* FindPriorityFromSelection: */ 
SOURCE(16130, 821)
SOURCE(16182, 50)
   priority←v13896 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32064)+1) ) ), (* (( (ptr) gf←c90288)+23) )) );
SOURCE(16234, 717)
   if (( (int)priority←v13896 ==  (int)2147483647) || ( (int)priority←v13896 <  (int)0)) {
SOURCE(16275, 119)
      {
         word pd436;
         pd436 = (* (( (ptr) (* (( (ptr) gf←c90288)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd436 ))))((* (( (ptr) ggData←v32036)+3) ), 0, (* (( (ptr) gf←c90288)+93) ), (* (( (ptr) gf←c90288)+77)
             ), pd436);
         };
      }
   else {
SOURCE(16394, 562)
      {
         word slice←v13952;
SOURCE(16396, 60)
         {
            word pd437;
            pd437 = (* (( (ptr) (* (( (ptr) gf←c90288)+402)/* var←c81680 */  ))+29) );
            slice←v13952 = (word) ( *( (fPt) ((*  (ptr) pd437 ))))((* (( (ptr) ggData←v32036)+11) ), priority←v13896, pd437);
            };
SOURCE(16458, 493)
         if ((slice←v13952 != 0)) {
SOURCE(16478, 79)
            {
               word pd438;
               pd438 = (* (( (ptr) (* (( (ptr) gf←c90288)+404)/* var←c81744 */  ))+10) );
               (void) ( *( (fPt) ((*  (ptr) pd438 ))))(ggData←v32036, 0, 0, 0, 0, 0
                  , 1, 0, 0, 0, pd438);
               };
SOURCE(16559, 62)
            {
               word pd439;
               pd439 = (* (( (ptr) (* (( (ptr) gf←c90288)+406)/* var←c81840 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd439 ))))((* (( (ptr) ggData←v32036)+11) ), 0, pd439);
               };
SOURCE(16623, 62)
            {
               word pd440;
               pd440 = (* (( (ptr) (* (( (ptr) gf←c90288)+407)/* var←c82032 */  ))+18) );
               (void) ( *( (fPt) ((*  (ptr) pd440 ))))(slice←v13952, (* (( (ptr) ggData←v32036)+11) ), 0, ggData←v32036, pd440);
               };
SOURCE(16687, 126)
            {
               W2 var←c83664;
               var←c83664.f0 = 5;
               var←c83664.f1 = (* (( (ptr) slice←v13952)+19) );
               {
                  word pd441;
                  pd441 = (* (( (ptr) (* (( (ptr) gf←c90288)+395)/* var←c80976 */  ))+14) );
                  (void) ( *( (fPt) ((*  (ptr) pd441 ))))((* (( (ptr) ggData←v32036)+3) ), 0, (* (( (ptr) gf←c90288)+53) ), (* (( (ptr) gf←c90288)+78)
                      ), var←c83664, pd441);
                  };
               };
SOURCE(16815, 136)
            {
               word pd442;
               pd442 = (* (( (ptr) (* (( (ptr) gf←c90288)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd442 ))))((* (( (ptr) gf←c90288)+79) ), ggData←v32036, 4, 0, 0, 0, pd442);
               };
            };
         };
      };
   }

static void PutInFront←P1020(ggData←v32124, event←v32152)
   word ggData←v32124;
   word event←v32152;
   {
   register ptr gf←c90320 =  (ptr) &globalframe;
   word scene←v13996;
   word count←v14024;
   /* PutInFront: */ 
SOURCE(16963, 1141)
SOURCE(17000, 27)
   scene←v13996 = (* (( (ptr) ggData←v32124)+11) );
SOURCE(17029, 63)
   {
      word pd443;
      pd443 = (* (( (ptr) (* (( (ptr) gf←c90320)+402)/* var←c81680 */  ))+36) );
      count←v14024 = (word) ( *( (fPt) ((*  (ptr) pd443 ))))(scene←v13996, 0, 0, 0, pd443);
      };
SOURCE(17094, 1010)
   if ((count←v14024 < 2)) {
SOURCE(17110, 124)
      {
         word pd444;
         pd444 = (* (( (ptr) (* (( (ptr) gf←c90320)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd444 ))))((* (( (ptr) ggData←v32124)+3) ), 0, (* (( (ptr) gf←c90320)+93) ), (* (( (ptr) gf←c90320)+80)
             ), pd444);
         };
      }
   else {
SOURCE(17234, 875)
      {
         word lastDesc←v14068;
SOURCE(17236, 75)
         {
            word pd445;
            pd445 = (* (( (ptr) (* (( (ptr) gf←c90320)+402)/* var←c81680 */  ))+38) );
            lastDesc←v14068 = (word) ( *( (fPt) ((*  (ptr) pd445 ))))(scene←v13996, 0, 0, 0, pd445);
            };
SOURCE(17313, 791)
         if ((lastDesc←v14068 != 0)) {
SOURCE(17334, 772)
            {
               word selected←v14112 = 0;
               word atSlice←v14140;
SOURCE(17361, 31)
               atSlice←v14140 = (*  (ptr) lastDesc←v14068 );
SOURCE(17394, 44)
               {
                  word pd446;
                  pd446 = (* (( (ptr) (* (( (ptr) gf←c90320)+401)/* var←c81648 */  ))+7) );
                  (void) ( *( (fPt) ((*  (ptr) pd446 ))))((* (( (ptr) gf←c90320)+81) ), ggData←v32124, pd446);
                  };
SOURCE(17471, 52)
               {
                  word pd447;
                  pd447 = (* (( (ptr) (* (( (ptr) gf←c90320)+406)/* var←c81840 */  ))+16) );
                  (void) ( *( (fPt) ((*  (ptr) pd447 ))))(atSlice←v14140, scene←v13996, 0, pd447);
                  };
SOURCE(17525, 61)
               {
                  word pd448;
                  pd448 = (* (( (ptr) (* (( (ptr) gf←c90320)+410)/* var←c82224 */  ))+28) );
                  selected←v14112 = (word) ( *( (fPt) ((*  (ptr) pd448 ))))(ggData←v32124, 1, 1, pd448);
                  };
SOURCE(17588, 37)
               {
                  word var←c83696;
                  word pd449;
                  pd449 = (* (( (ptr) (* (( (ptr) gf←c90320)+402)/* var←c81680 */  ))+49) );
                  var←c83696 = (word) ( *( (fPt) ((*  (ptr) pd449 ))))(scene←v13996, pd449);
                  };
SOURCE(17627, 66)
               {
                  word pd450;
                  pd450 = (* (( (ptr) (* (( (ptr) gf←c90320)+402)/* var←c81680 */  ))+24) );
                  (void) ( *( (fPt) ((*  (ptr) pd450 ))))(scene←v13996, atSlice←v14140, selected←v14112, pd450);
                  };
SOURCE(17695, 57)
               {
                  word pd451;
                  pd451 = (* (( (ptr) (* (( (ptr) gf←c90320)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd451 ))))(atSlice←v14140, scene←v13996, 0, ggData←v32124, pd451);
                  };
SOURCE(17754, 29)
               {
                  word pd452;
                  pd452 = (* (( (ptr) (* (( (ptr) gf←c90320)+401)/* var←c81648 */  ))+6) );
                  (void) ( *( (fPt) ((*  (ptr) pd452 ))))(ggData←v32124, pd452);
                  };
SOURCE(17835, 128)
               {
                  word pd453;
                  pd453 = (* (( (ptr) (* (( (ptr) gf←c90320)+395)/* var←c80976 */  ))+12) );
                  (void) ( *( (fPt) ((*  (ptr) pd453 ))))((* (( (ptr) ggData←v32124)+3) ), 0, (* (( (ptr) gf←c90320)+53) ), (* (( (ptr) gf←c90320)+82)
                      ), pd453);
                  };
SOURCE(17965, 139)
               {
                  word pd454;
                  pd454 = (* (( (ptr) (* (( (ptr) gf←c90320)+405)/* var←c81776 */  ))+4) );
                  (void) ( *( (fPt) ((*  (ptr) pd454 ))))((* (( (ptr) gf←c90320)+64) ), ggData←v32124, 4, 1, 0, 0, pd454);
                  };
               };
            };
         };
      };
   }

static void PutBehind←P1080(ggData←v32212, event←v32240)
   word ggData←v32212;
   word event←v32240;
   {
   register ptr gf←c90352 =  (ptr) &globalframe;
   word scene←v14268;
   word count←v14296;
   /* PutBehind: */ 
SOURCE(18116, 1128)
SOURCE(18152, 27)
   scene←v14268 = (* (( (ptr) ggData←v32212)+11) );
SOURCE(18181, 63)
   {
      word pd455;
      pd455 = (* (( (ptr) (* (( (ptr) gf←c90352)+402)/* var←c81680 */  ))+36) );
      count←v14296 = (word) ( *( (fPt) ((*  (ptr) pd455 ))))(scene←v14268, 0, 0, 0, pd455);
      };
SOURCE(18246, 998)
   if ((count←v14296 < 2)) {
SOURCE(18262, 121)
      {
         word pd456;
         pd456 = (* (( (ptr) (* (( (ptr) gf←c90352)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd456 ))))((* (( (ptr) ggData←v32212)+3) ), 0, (* (( (ptr) gf←c90352)+93) ), (* (( (ptr) gf←c90352)+83)
             ), pd456);
         };
      }
   else {
SOURCE(18383, 866)
      {
         word lastDesc←v14340;
SOURCE(18385, 75)
         {
            word pd457;
            pd457 = (* (( (ptr) (* (( (ptr) gf←c90352)+402)/* var←c81680 */  ))+38) );
            lastDesc←v14340 = (word) ( *( (fPt) ((*  (ptr) pd457 ))))(scene←v14268, 0, 0, 0, pd457);
            };
SOURCE(18462, 782)
         if ((lastDesc←v14340 != 0)) {
SOURCE(18483, 763)
            {
               word selected←v14384 = 0;
               word atSlice←v14412;
SOURCE(18510, 31)
               atSlice←v14412 = (*  (ptr) lastDesc←v14340 );
SOURCE(18543, 42)
               {
                  word pd458;
                  pd458 = (* (( (ptr) (* (( (ptr) gf←c90352)+401)/* var←c81648 */  ))+7) );
                  (void) ( *( (fPt) ((*  (ptr) pd458 ))))((* (( (ptr) gf←c90352)+84) ), ggData←v32212, pd458);
                  };
SOURCE(18618, 52)
               {
                  word pd459;
                  pd459 = (* (( (ptr) (* (( (ptr) gf←c90352)+406)/* var←c81840 */  ))+16) );
                  (void) ( *( (fPt) ((*  (ptr) pd459 ))))(atSlice←v14412, scene←v14268, 0, pd459);
                  };
SOURCE(18672, 61)
               {
                  word pd460;
                  pd460 = (* (( (ptr) (* (( (ptr) gf←c90352)+410)/* var←c82224 */  ))+28) );
                  selected←v14384 = (word) ( *( (fPt) ((*  (ptr) pd460 ))))(ggData←v32212, 1, 1, pd460);
                  };
SOURCE(18735, 37)
               {
                  word var←c83728;
                  word pd461;
                  pd461 = (* (( (ptr) (* (( (ptr) gf←c90352)+402)/* var←c81680 */  ))+49) );
                  var←c83728 = (word) ( *( (fPt) ((*  (ptr) pd461 ))))(scene←v14268, pd461);
                  };
SOURCE(18774, 65)
               {
                  word pd462;
                  pd462 = (* (( (ptr) (* (( (ptr) gf←c90352)+402)/* var←c81680 */  ))+26) );
                  (void) ( *( (fPt) ((*  (ptr) pd462 ))))(scene←v14268, atSlice←v14412, selected←v14384, pd462);
                  };
SOURCE(18841, 57)
               {
                  word pd463;
                  pd463 = (* (( (ptr) (* (( (ptr) gf←c90352)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd463 ))))(atSlice←v14412, scene←v14268, 0, ggData←v32212, pd463);
                  };
SOURCE(18900, 29)
               {
                  word pd464;
                  pd464 = (* (( (ptr) (* (( (ptr) gf←c90352)+401)/* var←c81648 */  ))+6) );
                  (void) ( *( (fPt) ((*  (ptr) pd464 ))))(ggData←v32212, pd464);
                  };
SOURCE(18981, 122)
               {
                  word pd465;
                  pd465 = (* (( (ptr) (* (( (ptr) gf←c90352)+395)/* var←c80976 */  ))+12) );
                  (void) ( *( (fPt) ((*  (ptr) pd465 ))))((* (( (ptr) ggData←v32212)+3) ), 0, (* (( (ptr) gf←c90352)+53) ), (* (( (ptr) gf←c90352)+85)
                      ), pd465);
                  };
SOURCE(19105, 139)
               {
                  word pd466;
                  pd466 = (* (( (ptr) (* (( (ptr) gf←c90352)+405)/* var←c81776 */  ))+4) );
                  (void) ( *( (fPt) ((*  (ptr) pd466 ))))((* (( (ptr) gf←c90352)+64) ), ggData←v32212, 4, 1, 0, 0, pd466);
                  };
               };
            };
         };
      };
   }

static void Exchange←P1140(ggData←v32300, event←v32328)
   word ggData←v32300;
   word event←v32328;
   {
   W9 var←c90384;
   register ptr gf←c90416 =  (ptr) &globalframe;
   /* declaration of var←c83760 skipped */ 
   /* declaration of sliceD1←v14540 skipped */ 
   /* declaration of sliceD2←v14568 skipped */ 
   /* declaration of index←v14596 skipped */ 
   word aborted←v14624 = 0;
   word scene←v14652;
   /* Exchange: */ 
SOURCE(19256, 1771)
   {
      word tmpAddr467;
      tmpAddr467 = (word) (( (ptr) &var←c90384)+4)/* var←c83760 */ ;
      (*  (ptr) tmpAddr467 ) = ( ((word)  (fPt) FindFirstTwo←P5172) );
      (* (( (ptr) tmpAddr467) + 1) ) = 1;
      };
SOURCE(19291, 33)
   (* (( (ptr) &var←c90384)+6)/* sliceD1←v14540 */  ) = 0;
   (* (( (ptr) &var←c90384)+7)/* sliceD2←v14568 */  ) = 0;
SOURCE(19326, 14)
   (* (( (ptr) &var←c90384)+8)/* index←v14596 */  ) = 0;
SOURCE(19365, 27)
   scene←v14652 = (* (( (ptr) ggData←v32300)+11) );
SOURCE(19620, 72)
   {
      word pd468;
      pd468 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+32) );
      aborted←v14624 = (word) ( *( (fPt) ((*  (ptr) pd468 ))))(scene←v14652, 0, (word) (( (bPt) &var←c90384)+16)/* var←c83760 */ , 0, 0, pd468)
      ;
      };
SOURCE(19694, 1333)
   if (((* (( (ptr) &var←c90384)+8)/* index←v14596 */  ) != 2)) {
SOURCE(19710, 127)
      {
         word pd469;
         pd469 = (* (( (ptr) (* (( (ptr) gf←c90416)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd469 ))))((* (( (ptr) ggData←v32300)+3) ), 0, (* (( (ptr) gf←c90416)+93) ), (* (( (ptr) gf←c90416)+86)
             ), pd469);
         };
      }
   else {
SOURCE(19837, 1192)
      {
         word priority1←v14828;
         word priority2←v14856;
SOURCE(19839, 79)
         {
            word pd470;
            pd470 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+21) );
            priority1←v14828 = (word) ( *( (fPt) ((*  (ptr) pd470 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+6)
               /* sliceD1←v14540 */  ) ), pd470);
            };
SOURCE(19920, 79)
         {
            word pd471;
            pd471 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+21) );
            priority2←v14856 = (word) ( *( (fPt) ((*  (ptr) pd471 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+7)
               /* sliceD2←v14568 */  ) ), pd471);
            };
SOURCE(20001, 51)
         {
            word pd472;
            pd472 = (* (( (ptr) (* (( (ptr) gf←c90416)+401)/* var←c81648 */  ))+7) );
            (void) ( *( (fPt) ((*  (ptr) pd472 ))))((* (( (ptr) gf←c90416)+87) ), ggData←v32300, pd472);
            };
SOURCE(20085, 70)
         {
            word pd473;
            pd473 = (* (( (ptr) (* (( (ptr) gf←c90416)+407)/* var←c82032 */  ))+18) );
            (void) ( *( (fPt) ((*  (ptr) pd473 ))))((*  (ptr) (* (( (ptr) &var←c90384)+6)/* sliceD1←v14540 */  ) ), (* (( (ptr) ggData←v32300)+11)
                ), 0, ggData←v32300, pd473);
            };
SOURCE(20157, 70)
         {
            word pd474;
            pd474 = (* (( (ptr) (* (( (ptr) gf←c90416)+407)/* var←c82032 */  ))+18) );
            (void) ( *( (fPt) ((*  (ptr) pd474 ))))((*  (ptr) (* (( (ptr) &var←c90384)+7)/* sliceD2←v14568 */  ) ), (* (( (ptr) ggData←v32300)+11)
                ), 0, ggData←v32300, pd474);
            };
SOURCE(20229, 48)
         {
            word pd475;
            pd475 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+14) );
            (void) ( *( (fPt) ((*  (ptr) pd475 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+6)/* sliceD1←v14540 */  ) ), pd475)
            ;
            };
SOURCE(20279, 48)
         {
            word pd476;
            pd476 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+14) );
            (void) ( *( (fPt) ((*  (ptr) pd476 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+7)/* sliceD2←v14568 */  ) ), pd476)
            ;
            };
SOURCE(20329, 353)
         if (( (int)priority2←v14856 >=  (int)priority1←v14828)) {
SOURCE(20360, 56)
            {
               word pd477;
               pd477 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+9) );
               (void) ( *( (fPt) ((*  (ptr) pd477 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+7)/* sliceD2←v14568 */  ) ), priority1←v14828, pd477)
               ;
               };
SOURCE(20446, 56)
            {
               word pd478;
               pd478 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+9) );
               (void) ( *( (fPt) ((*  (ptr) pd478 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+6)/* sliceD1←v14540 */  ) ), priority2←v14856, pd478)
               ;
               };
            }
         else {
SOURCE(20540, 56)
            {
               word pd479;
               pd479 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+9) );
               (void) ( *( (fPt) ((*  (ptr) pd479 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+6)/* sliceD1←v14540 */  ) ), priority2←v14856, pd479)
               ;
               };
SOURCE(20626, 56)
            {
               word pd480;
               pd480 = (* (( (ptr) (* (( (ptr) gf←c90416)+402)/* var←c81680 */  ))+9) );
               (void) ( *( (fPt) ((*  (ptr) pd480 ))))((* (( (ptr) ggData←v32300)+11) ), (*  (ptr) (* (( (ptr) &var←c90384)+7)/* sliceD2←v14568 */  ) ), priority1←v14828, pd480)
               ;
               };
            };
SOURCE(20714, 29)
         {
            word pd481;
            pd481 = (* (( (ptr) (* (( (ptr) gf←c90416)+401)/* var←c81648 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd481 ))))(ggData←v32300, pd481);
            };
SOURCE(20795, 91)
         {
            word pd482;
            pd482 = (* (( (ptr) (* (( (ptr) gf←c90416)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd482 ))))((* (( (ptr) ggData←v32300)+3) ), 0, (* (( (ptr) gf←c90416)+53) ), (* (( (ptr) gf←c90416)+88)
                ), pd482);
            };
SOURCE(20888, 139)
         {
            word pd483;
            pd483 = (* (( (ptr) (* (( (ptr) gf←c90416)+405)/* var←c81776 */  ))+4) );
            (void) ( *( (fPt) ((*  (ptr) pd483 ))))((* (( (ptr) gf←c90416)+64) ), ggData←v32300, 4, 1, 0, 0, pd483);
            };
         };
      };
   }

static word FindFirstTwo←P5172(sliceD←v14756, formal←c90448)
   word sliceD←v14756;
   word formal←c90448;
   {
   word done←v14800;
   formal←c90448 = (formal←c90448 - 16);
   /* FindFirstTwo: */ 
SOURCE(19394, 221)
SOURCE(19394, 221)
   done←v14800 = 0;
SOURCE(19472, 91)
   if (((* (( (ptr) formal←c90448)+8) ) == 0)) {
SOURCE(19490, 22)
      (* (( (ptr) formal←c90448)+6) ) = sliceD←v14756;
      }
   else {
SOURCE(19512, 51)
      if (((* (( (ptr) formal←c90448)+8) ) == 1)) {
SOURCE(19530, 22)
         (* (( (ptr) formal←c90448)+7) ) = sliceD←v14756;
         }
      else {
SOURCE(19552, 11)
         done←v14800 = 1;
         };
      };
SOURCE(19598, 17)
   (* (( (ptr) formal←c90448)+8) ) = ((* (( (ptr) formal←c90448)+8) ) + 1);
SOURCE(19394, 221)
   return(done←v14800);
   }

static void UpFromSelection←P1200(ggData←v32388, event←v32416)
   word ggData←v32388;
   word event←v32416;
   {
   register ptr gf←c90480 =  (ptr) &globalframe;
   word deltaPriority←v14900;
   /* UpFromSelection: */ 
SOURCE(21036, 1105)
SOURCE(21078, 55)
   deltaPriority←v14900 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32416)+1) ) ), (* (( (ptr) gf←c90480)+23) )) );
SOURCE(21135, 1006)
   if (( (int)deltaPriority←v14900 ==  (int)2147483647) || ( (int)deltaPriority←v14900 <=  (int)0)) {
SOURCE(21187, 135)
      {
         word pd484;
         pd484 = (* (( (ptr) (* (( (ptr) gf←c90480)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd484 ))))((* (( (ptr) ggData←v32388)+3) ), 0, (* (( (ptr) gf←c90480)+93) ), (* (( (ptr) gf←c90480)+89)
             ), pd484);
         };
      }
   else {
SOURCE(21322, 821)
      {
         word selected←v14956;
SOURCE(21324, 10)
         {
            word pd485;
            pd485 = (* (( (ptr) (* (( (ptr) gf←c90480)+410)/* var←c82224 */  ))+28) );
            selected←v14956 = (word) ( *( (fPt) ((*  (ptr) pd485 ))))(ggData←v32388, 0, 0, pd485);
            };
SOURCE(21396, 49)
         {
            word pd486;
            pd486 = (* (( (ptr) (* (( (ptr) gf←c90480)+401)/* var←c81648 */  ))+7) );
            (void) ( *( (fPt) ((*  (ptr) pd486 ))))((* (( (ptr) gf←c90480)+90) ), ggData←v32388, pd486);
            };
SOURCE(21478, 212)
         {
            register word noName←c83792 = 0;
            register word noName←c83824;
            noName←c83824 = deltaPriority←v14900;
            if (( (int)noName←c83792 >=  (int)noName←c83824)) {
               goto lab←L100036;
               };
            lab←L100039: ;
SOURCE(21508, 182)
            {
               register word slices←v15084;
               slices←v15084 = selected←v14956;
               lab←L100043: ;
               if ((slices←v15084 != 0)) {
                  }
               else {
                  goto lab←L100040;
                  };
SOURCE(21578, 69)
               {
                  word pd487;
                  pd487 = (* (( (ptr) (* (( (ptr) gf←c90480)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd487 ))))((*  (ptr) slices←v15084 ), (* (( (ptr) ggData←v32388)+11) ), 0, ggData←v32388, pd487)
                  ;
                  };
SOURCE(21649, 41)
               {
                  word pd488;
                  pd488 = (* (( (ptr) (* (( (ptr) gf←c90480)+402)/* var←c81680 */  ))+23) );
                  (void) ( *( (fPt) ((*  (ptr) pd488 ))))((* (( (ptr) ggData←v32388)+11) ), (*  (ptr) slices←v15084 ), pd488);
                  };
               slices←v15084 = (* (( (ptr) slices←v15084)+1) );
               goto lab←L100043;
               lab←L100040: ;
               };
            noName←c83792 = (noName←c83792 + 1);
            if (( (int)noName←c83792 <  (int)noName←c83824)) {
               goto lab←L100039;
               };
            lab←L100036: ;
            };
SOURCE(21710, 29)
         {
            word pd489;
            pd489 = (* (( (ptr) (* (( (ptr) gf←c90480)+401)/* var←c81648 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd489 ))))(ggData←v32388, pd489);
            };
SOURCE(21791, 209)
         {
            word var←c83856;
            {
               word var←c83888;
               word var←c83920;
               var←c83888 = XR←NewObject(12, (* (( (ptr) gf←c90480)+22) ));
               var←c83920 = var←c83888;
               (*  (ptr) var←c83920 ) = 5;
               (* (( (ptr) var←c83920)+1) ) = deltaPriority←v14900;
               (* (( (ptr) var←c83920)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c90480)+22) ));
               var←c83920 = (* (( (ptr) var←c83920)+2) );
               (*  (ptr) var←c83920 ) = 3;
               if (( (int)deltaPriority←v14900 >  (int)1)) {
                  (* (( (ptr) var←c83920)+1) ) = 115;
                  }
               else {
                  (* (( (ptr) var←c83920)+1) ) = 32;
                  };
               var←c83856 = var←c83888;
               };
            {
               word pd490;
               pd490 = (* (( (ptr) (* (( (ptr) gf←c90480)+395)/* var←c80976 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd490 ))))((* (( (ptr) ggData←v32388)+3) ), 0, (* (( (ptr) gf←c90480)+53) ), (* (( (ptr) gf←c90480)+91)
                   ), var←c83856, pd490);
               };
            };
SOURCE(22002, 139)
         {
            word pd491;
            pd491 = (* (( (ptr) (* (( (ptr) gf←c90480)+405)/* var←c81776 */  ))+4) );
            (void) ( *( (fPt) ((*  (ptr) pd491 ))))((* (( (ptr) gf←c90480)+64) ), ggData←v32388, 4, 1, 0, 0, pd491);
            };
         };
      };
   }

static void DownFromSelection←P1260(ggData←v32476, event←v32504)
   word ggData←v32476;
   word event←v32504;
   {
   register ptr gf←c90512 =  (ptr) &globalframe;
   word deltaPriority←v15212;
   /* DownFromSelection: */ 
SOURCE(22150, 1105)
SOURCE(22194, 55)
   deltaPriority←v15212 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32504)+1) ) ), (* (( (ptr) gf←c90512)+23) )) );
SOURCE(22251, 1004)
   if (( (int)deltaPriority←v15212 ==  (int)2147483647) || ( (int)deltaPriority←v15212 <=  (int)0)) {
SOURCE(22303, 133)
      {
         word pd492;
         pd492 = (* (( (ptr) (* (( (ptr) gf←c90512)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd492 ))))((* (( (ptr) ggData←v32476)+3) ), 0, (* (( (ptr) gf←c90512)+93) ), (* (( (ptr) gf←c90512)+96)
             ), pd492);
         };
      }
   else {
SOURCE(22436, 821)
      {
         word selected←v15268;
SOURCE(22438, 10)
         {
            word pd493;
            pd493 = (* (( (ptr) (* (( (ptr) gf←c90512)+410)/* var←c82224 */  ))+28) );
            selected←v15268 = (word) ( *( (fPt) ((*  (ptr) pd493 ))))(ggData←v32476, 1, 0, pd493);
            };
SOURCE(22510, 51)
         {
            word pd494;
            pd494 = (* (( (ptr) (* (( (ptr) gf←c90512)+401)/* var←c81648 */  ))+7) );
            (void) ( *( (fPt) ((*  (ptr) pd494 ))))((* (( (ptr) gf←c90512)+97) ), ggData←v32476, pd494);
            };
SOURCE(22594, 214)
         {
            register word noName←c83952 = 0;
            register word noName←c83984;
            noName←c83984 = deltaPriority←v15212;
            if (( (int)noName←c83952 >=  (int)noName←c83984)) {
               goto lab←L100044;
               };
            lab←L100047: ;
SOURCE(22624, 184)
            {
               register word slices←v15396;
               slices←v15396 = selected←v15268;
               lab←L100051: ;
               if ((slices←v15396 != 0)) {
                  }
               else {
                  goto lab←L100048;
                  };
SOURCE(22694, 69)
               {
                  word pd495;
                  pd495 = (* (( (ptr) (* (( (ptr) gf←c90512)+407)/* var←c82032 */  ))+18) );
                  (void) ( *( (fPt) ((*  (ptr) pd495 ))))((*  (ptr) slices←v15396 ), (* (( (ptr) ggData←v32476)+11) ), 0, ggData←v32476, pd495)
                  ;
                  };
SOURCE(22765, 43)
               {
                  word pd496;
                  pd496 = (* (( (ptr) (* (( (ptr) gf←c90512)+402)/* var←c81680 */  ))+25) );
                  (void) ( *( (fPt) ((*  (ptr) pd496 ))))((* (( (ptr) ggData←v32476)+11) ), (*  (ptr) slices←v15396 ), pd496);
                  };
               slices←v15396 = (* (( (ptr) slices←v15396)+1) );
               goto lab←L100051;
               lab←L100048: ;
               };
            noName←c83952 = (noName←c83952 + 1);
            if (( (int)noName←c83952 <  (int)noName←c83984)) {
               goto lab←L100047;
               };
            lab←L100044: ;
            };
SOURCE(22828, 29)
         {
            word pd497;
            pd497 = (* (( (ptr) (* (( (ptr) gf←c90512)+401)/* var←c81648 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd497 ))))(ggData←v32476, pd497);
            };
SOURCE(22909, 205)
         {
            word var←c84016;
            {
               word var←c84048;
               word var←c84080;
               var←c84048 = XR←NewObject(12, (* (( (ptr) gf←c90512)+22) ));
               var←c84080 = var←c84048;
               (*  (ptr) var←c84080 ) = 5;
               (* (( (ptr) var←c84080)+1) ) = deltaPriority←v15212;
               (* (( (ptr) var←c84080)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c90512)+22) ));
               var←c84080 = (* (( (ptr) var←c84080)+2) );
               (*  (ptr) var←c84080 ) = 3;
               if (( (int)deltaPriority←v15212 >  (int)1)) {
                  (* (( (ptr) var←c84080)+1) ) = 115;
                  }
               else {
                  (* (( (ptr) var←c84080)+1) ) = 32;
                  };
               var←c84016 = var←c84048;
               };
            {
               word pd498;
               pd498 = (* (( (ptr) (* (( (ptr) gf←c90512)+395)/* var←c80976 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd498 ))))((* (( (ptr) ggData←v32476)+3) ), 0, (* (( (ptr) gf←c90512)+53) ), (* (( (ptr) gf←c90512)+98)
                   ), var←c84016, pd498);
               };
            };
SOURCE(23116, 139)
         {
            word pd499;
            pd499 = (* (( (ptr) (* (( (ptr) gf←c90512)+405)/* var←c81776 */  ))+4) );
            (void) ( *( (fPt) ((*  (ptr) pd499 ))))((* (( (ptr) gf←c90512)+64) ), ggData←v32476, 4, 1, 0, 0, pd499);
            };
         };
      };
   }

static void PutAtSelection←P1320(ggData←v32564, event←v32592)
   word ggData←v32564;
   word event←v32592;
   {
   register ptr gf←c90544 =  (ptr) &globalframe;
   word newPriority←v15524;
   /* PutAtSelection: */ 
SOURCE(23264, 1374)
SOURCE(23305, 53)
   newPriority←v15524 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32592)+1) ) ), (* (( (ptr) gf←c90544)+23) )) );
SOURCE(23360, 1278)
   if (( (int)newPriority←v15524 ==  (int)2147483647)) {
SOURCE(23390, 121)
      {
         word pd500;
         pd500 = (* (( (ptr) (* (( (ptr) gf←c90544)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd500 ))))((* (( (ptr) ggData←v32564)+3) ), 0, (* (( (ptr) gf←c90544)+93) ), (* (( (ptr) gf←c90544)+99)
             ), pd500);
         };
      }
   else {
      if (( (int)newPriority←v15524 <=  (int) (word) -2)) {
SOURCE(23550, 122)
         {
            word pd501;
            pd501 = (* (( (ptr) (* (( (ptr) gf←c90544)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd501 ))))((* (( (ptr) ggData←v32564)+3) ), 0, (* (( (ptr) gf←c90544)+93) ), (* (( (ptr) gf←c90544)+100)
                ), pd501);
            };
         }
      else {
         if (( (int)newPriority←v15524 ==  (int) (word) -1)) {
SOURCE(23692, 18)
            (void) Top←P660(ggData←v32564, event←v32592);
            }
         else {
            if (( (int)newPriority←v15524 ==  (int)0)) {
SOURCE(23729, 21)
               (void) Bottom←P780(ggData←v32564, event←v32592);
               }
            else {
SOURCE(23763, 877)
               {
                  word selected←v15580;
SOURCE(23765, 10)
                  {
                     word pd502;
                     pd502 = (* (( (ptr) (* (( (ptr) gf←c90544)+410)/* var←c82224 */  ))+28) );
                     selected←v15580 = (word) ( *( (fPt) ((*  (ptr) pd502 ))))(ggData←v32564, 1, 1, pd502);
                     };
SOURCE(23843, 48)
                  {
                     word pd503;
                     pd503 = (* (( (ptr) (* (( (ptr) gf←c90544)+401)/* var←c81648 */  ))+7) );
                     (void) ( *( (fPt) ((*  (ptr) pd503 ))))((* (( (ptr) gf←c90544)+101) ), ggData←v32564, pd503);
                     };
SOURCE(23924, 44)
                  {
                     word var←c84112;
                     word pd504;
                     pd504 = (* (( (ptr) (* (( (ptr) gf←c90544)+402)/* var←c81680 */  ))+49) );
                     var←c84112 = (word) ( *( (fPt) ((*  (ptr) pd504 ))))((* ((( (ptr) ggData←v32564)+11)) ), pd504);
                     };
SOURCE(23970, 54)
                  {
                     word pd505;
                     pd505 = (* (( (ptr) (* (( (ptr) gf←c90544)+402)/* var←c81680 */  ))+10) );
                     (void) ( *( (fPt) ((*  (ptr) pd505 ))))((* (( (ptr) ggData←v32564)+11) ), selected←v15580, newPriority←v15524, pd505);
                     };
SOURCE(24026, 71)
                  {
                     word pd506;
                     pd506 = (* (( (ptr) (* (( (ptr) gf←c90544)+407)/* var←c82032 */  ))+18) );
                     (void) ( *( (fPt) ((*  (ptr) pd506 ))))((*  (ptr) selected←v15580 ), (* (( (ptr) ggData←v32564)+11) ), 0, ggData←v32564, pd506)
                     ;
                     };
SOURCE(24099, 29)
                  {
                     word pd507;
                     pd507 = (* (( (ptr) (* (( (ptr) gf←c90544)+401)/* var←c81648 */  ))+6) );
                     (void) ( *( (fPt) ((*  (ptr) pd507 ))))(ggData←v32564, pd507);
                     };
SOURCE(24180, 317)
                  if (( (int)newPriority←v15524 <=  (int)0)) {
SOURCE(24203, 163)
                     {
                        W2 var←c84144;
                        W2 var←c84176;
                        W2 var←c0990;
                        {
                           word tcp508;
                           if (( (int)newPriority←v15524 ==  (int)0)) {
/*1*/   var←c84144.f0 = 11;
/*1*/   var←c84144.f1 = (* (( (ptr) gf←c90544)+103) );
/*1*/   tcp508 = (word) &var←c84144;
/*1*/   }
                           else {
/*1*/   var←c84176.f0 = 11;
/*1*/   var←c84176.f1 = (* (( (ptr) gf←c90544)+104) );
/*1*/   tcp508 = (word) &var←c84176;
/*1*/   };
                           var←c0990 = (*  (W2Pt) tcp508 );
                           };
                        {
                           word pd509;
                           pd509 = (* (( (ptr) (* (( (ptr) gf←c90544)+395)/* var←c80976 */  ))+14) );
                           (void) ( *( (fPt) ((*  (ptr) pd509 ))))((* (( (ptr) ggData←v32564)+3) ), 0, (* (( (ptr) gf←c90544)+53) ), (* (( (ptr) gf←c90544)+102)
/*1*/    ), var←c0990, pd509);
                           };
                        };
                     }
                  else {
SOURCE(24366, 131)
                     {
                        W2 var←c84208;
                        var←c84208.f0 = 5;
                        var←c84208.f1 = newPriority←v15524;
                        {
                           word pd510;
                           pd510 = (* (( (ptr) (* (( (ptr) gf←c90544)+395)/* var←c80976 */  ))+14) );
                           (void) ( *( (fPt) ((*  (ptr) pd510 ))))((* (( (ptr) ggData←v32564)+3) ), 0, (* (( (ptr) gf←c90544)+53) ), (* (( (ptr) gf←c90544)+105)
/*1*/    ), var←c84208, pd510);
                           };
                        };
                     };
SOURCE(24499, 139)
                  {
                     word pd511;
                     pd511 = (* (( (ptr) (* (( (ptr) gf←c90544)+405)/* var←c81776 */  ))+4) );
                     (void) ( *( (fPt) ((*  (ptr) pd511 ))))((* (( (ptr) gf←c90544)+64) ), ggData←v32564, 4, 1, 0, 0, pd511);
                     };
                  };
               };
            };
         };
      };
   }

static void EndNewObject←P1380(slice←v9168, ggData←v9196, object←v9224)
   word slice←v9168;
   word ggData←v9196;
   word object←v9224;
   {
   register ptr gf←c90576 =  (ptr) &globalframe;
   /* EndNewObject: */ 
SOURCE(24647, 863)
SOURCE(24720, 61)
   {
      word var←c84240;
      {
         word pd512;
         pd512 = (* (( (ptr) (* (( (ptr) gf←c90576)+421)/* var←c84272 */  ))+6) );
         var←c84240 = (word) ( *( (fPt) ((*  (ptr) pd512 ))))((* (( (ptr) gf←c90576)+106) ), object←v9224, pd512);
         };
      {
         word pd513;
         pd513 = (* (( (ptr) (* (( (ptr) gf←c90576)+401)/* var←c81648 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd513 ))))(var←c84240, ggData←v9196, pd513);
         };
      };
SOURCE(24814, 79)
   {
      word pd514;
      pd514 = (* (( (ptr) (* (( (ptr) gf←c90576)+404)/* var←c81744 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd514 ))))(ggData←v9196, 0, 0, 0, 0, 0
         , 1, 0, 0, 0, pd514);
      };
SOURCE(24895, 41)
   {
      word pd515;
      pd515 = (* (( (ptr) (* (( (ptr) gf←c90576)+402)/* var←c81680 */  ))+9) );
      (void) ( *( (fPt) ((*  (ptr) pd515 ))))((* (( (ptr) ggData←v9196)+11) ), slice←v9168,  (word) -1, pd515);
      };
SOURCE(24938, 42)
   {
      word pd516;
      pd516 = (* (( (ptr) (* (( (ptr) gf←c90576)+406)/* var←c81840 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd516 ))))((* (( (ptr) ggData←v9196)+11) ), 0, pd516);
      };
SOURCE(24982, 62)
   {
      word pd517;
      pd517 = (* (( (ptr) (* (( (ptr) gf←c90576)+407)/* var←c82032 */  ))+18) );
      (void) ( *( (fPt) ((*  (ptr) pd517 ))))(slice←v9168, (* (( (ptr) ggData←v9196)+11) ), 0, ggData←v9196, pd517);
      };
SOURCE(25046, 88)
   {
      word var←c84304;
      {
         word pd518;
         pd518 = (* (( (ptr) (* (( (ptr) gf←c90576)+402)/* var←c81680 */  ))+45) );
         var←c84304 = (word) ( *( (fPt) ((*  (ptr) pd518 ))))((* (( (ptr) ggData←v9196)+11) ), 0, 0, pd518);
         };
      {
         word pd519;
         pd519 = (* (( (ptr) (* (( (ptr) gf←c90576)+404)/* var←c81744 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd519 ))))(ggData←v9196, var←c84304, 0, pd519);
         };
      };
SOURCE(25136, 34)
   (* (( (ptr) (* (( (ptr) ggData←v9196)+17) ))+16) ) = slice←v9168;
SOURCE(25172, 29)
   {
      word pd520;
      pd520 = (* (( (ptr) (* (( (ptr) gf←c90576)+401)/* var←c81648 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd520 ))))(ggData←v9196, pd520);
      };
SOURCE(25253, 121)
   {
      word var←c84336;
      {
         word var←c84368;
         word var←c84400;
         var←c84368 = XR←NewObject(12, (* (( (ptr) gf←c90576)+22) ));
         var←c84400 = var←c84368;
         (*  (ptr) var←c84400 ) = 11;
         (* (( (ptr) var←c84400)+1) ) = object←v9224;
         (* (( (ptr) var←c84400)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c90576)+22) ));
         var←c84400 = (* (( (ptr) var←c84400)+2) );
         (*  (ptr) var←c84400 ) = 11;
         (* (( (ptr) var←c84400)+1) ) = object←v9224;
         var←c84336 = var←c84368;
         };
      {
         word pd521;
         pd521 = (* (( (ptr) (* (( (ptr) gf←c90576)+395)/* var←c80976 */  ))+13) );
         (void) ( *( (fPt) ((*  (ptr) pd521 ))))((* (( (ptr) ggData←v9196)+3) ), 0, (* (( (ptr) gf←c90576)+53) ), (* (( (ptr) gf←c90576)+107)
             ), var←c84336, pd521);
         };
      };
SOURCE(25376, 134)
   {
      word pd522;
      pd522 = (* (( (ptr) (* (( (ptr) gf←c90576)+405)/* var←c81776 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd522 ))))((* (( (ptr) gf←c90576)+109) ), ggData←v9196, 5, 1, 0, 0, pd522);
      };
   }

static void PolygonInCircle←P1440(ggData←v32652, event←v32680)
   word ggData←v32652;
   word event←v32680;
   {
   register ptr gf←c90608 =  (ptr) &globalframe;
   word sideCount←v15708;
   word exists←v15736;
   /* PolygonInCircle: */ 
SOURCE(25516, 638)
SOURCE(25551, 51)
   sideCount←v15708 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32680)+1) ) ), (* (( (ptr) gf←c90608)+23) )) );
SOURCE(25604, 43)
   {
      word pd523;
      pd523 = (* (( (ptr) (* (( (ptr) gf←c90608)+422)/* var←c84432 */  ))+7) );
      exists←v15736 = (word) ( *( (fPt) ((*  (ptr) pd523 ))))((* ((( (ptr) ggData←v32652)+13)) ), pd523);
      };
SOURCE(25649, 505)
   if ((0 == exists←v15736)) {
SOURCE(25668, 110)
      {
         word pd524;
         pd524 = (* (( (ptr) (* (( (ptr) gf←c90608)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd524 ))))((* (( (ptr) ggData←v32652)+3) ), 0, (* (( (ptr) gf←c90608)+93) ), (* (( (ptr) gf←c90608)+110)
             ), pd524);
         };
      }
   else {
SOURCE(25778, 376)
      {
         word x525;
         if (((float)(int)sideCount←v15708 <= (
            x525 = (*  (ptr) &fc358 ),  *(float*)&x525
            )) || ( (int)sideCount←v15708 ==  (int)2147483647)) {
SOURCE(25824, 124)
            {
               word pd526;
               pd526 = (* (( (ptr) (* (( (ptr) gf←c90608)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd526 ))))((* (( (ptr) ggData←v32652)+3) ), 0, (* (( (ptr) gf←c90608)+93) ), (* (( (ptr) gf←c90608)+111)
                   ), pd526);
               };
            }
         else {
SOURCE(25948, 208)
            {
               W2 caretPoint←v15792;
               word slice←v15820;
SOURCE(25950, 50)
               {
                  word pd527;
                  pd527 = (* (( (ptr) (* (( (ptr) gf←c90608)+422)/* var←c84432 */  ))+15) );
                  (void) ( *( (fPt) ((*  (ptr) pd527 ))))((word) &caretPoint←v15792, (* (( (ptr) ggData←v32652)+13) ), pd527);
                  };
SOURCE(26002, 112)
               {
                  word pd528;
                  pd528 = (* (( (ptr) (* (( (ptr) gf←c90608)+423)/* var←c84464 */  ))+4) );
                  slice←v15820 = (word) ( *( (fPt) ((*  (ptr) pd528 ))))(SGNCK(sideCount←v15708), caretPoint←v15792, (* (( (ptr) (* (( (ptr) ggData←v32652)+18)
                         ))+13) ), (* (( (ptr) ggData←v32652)+30) ), pd528);
                  };
SOURCE(26116, 38)
               (void) EndNewObject←P1380(slice←v15820, ggData←v32652, (* (( (ptr) gf←c90608)+112) ));
               };
            };
         };
      };
   }

static void NewBox←P1500(ggData←v32740, event←v32768)
   word ggData←v32740;
   word event←v32768;
   {
   register ptr gf←c90640 =  (ptr) &globalframe;
   word sideLength←v15864;
   word exists←v15892;
   /* NewBox: */ 
SOURCE(26163, 593)
SOURCE(26189, 54)
   sideLength←v15864 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32768)+1) ) ), (* (( (ptr) gf←c90640)+14) )) );
SOURCE(26245, 43)
   {
      word pd529;
      pd529 = (* (( (ptr) (* (( (ptr) gf←c90640)+422)/* var←c84432 */  ))+7) );
      exists←v15892 = (word) ( *( (fPt) ((*  (ptr) pd529 ))))((* ((( (ptr) ggData←v32740)+13)) ), pd529);
      };
SOURCE(26290, 466)
   if ((0 == exists←v15892)) {
SOURCE(26309, 102)
      {
         word pd530;
         pd530 = (* (( (ptr) (* (( (ptr) gf←c90640)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd530 ))))((* (( (ptr) ggData←v32740)+3) ), 0, (* (( (ptr) gf←c90640)+93) ), (* (( (ptr) gf←c90640)+114)
             ), pd530);
         };
      }
   else {
SOURCE(26411, 345)
      {
         word x531;
         word x533;
         if (((
            x531 = sideLength←v15864,  *(float*)&x531
            ) > (
            x533 = (*  (ptr) &fc532 ),  *(float*)&x533
            ))) {
SOURCE(26444, 122)
            {
               word pd534;
               pd534 = (* (( (ptr) (* (( (ptr) gf←c90640)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd534 ))))((* (( (ptr) ggData←v32740)+3) ), 0, (* (( (ptr) gf←c90640)+93) ), (* (( (ptr) gf←c90640)+115)
                   ), pd534);
               };
            }
         else {
SOURCE(26566, 192)
            {
               W2 caretPoint←v15948;
               word slice←v15976;
SOURCE(26568, 50)
               {
                  word pd535;
                  pd535 = (* (( (ptr) (* (( (ptr) gf←c90640)+422)/* var←c84432 */  ))+15) );
                  (void) ( *( (fPt) ((*  (ptr) pd535 ))))((word) &caretPoint←v15948, (* (( (ptr) ggData←v32740)+13) ), pd535);
                  };
SOURCE(26620, 100)
               {
                  word pd536;
                  word x537;
                  word x538;
                  float tf539;
                  pd536 = (* (( (ptr) (* (( (ptr) gf←c90640)+423)/* var←c84464 */  ))+6) );
                  slice←v15976 = (word) ( *( (fPt) ((*  (ptr) pd536 ))))(caretPoint←v15948, (
                        tf539 = (
                           x537 = sideLength←v15864,  *(float*)&x537
                           ) * (
                           x538 = (* (( (ptr) (* (( (ptr) ggData←v32740)+18) ))+13) ),  *(float*)&x538
                           ),  *(word*)&tf539
                        ), (* (( (ptr) ggData←v32740)+30) ), pd536);
                  };
SOURCE(26722, 34)
               (void) EndNewObject←P1380(slice←v15976, ggData←v32740, (* (( (ptr) gf←c90640)+116) ));
               };
            };
         };
      };
   }

static void NewCircle←P1560(ggData←v32828, event←v32856)
   word ggData←v32828;
   word event←v32856;
   {
   register ptr gf←c90672 =  (ptr) &globalframe;
   word radius←v16020;
   word exists←v16048;
   /* NewCircle: */ 
SOURCE(26765, 597)
SOURCE(26794, 50)
   radius←v16020 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32856)+1) ) ), (* (( (ptr) gf←c90672)+14) )) );
SOURCE(26846, 43)
   {
      word pd540;
      pd540 = (* (( (ptr) (* (( (ptr) gf←c90672)+422)/* var←c84432 */  ))+7) );
      exists←v16048 = (word) ( *( (fPt) ((*  (ptr) pd540 ))))((* ((( (ptr) ggData←v32828)+13)) ), pd540);
      };
SOURCE(26891, 471)
   if ((0 == exists←v16048)) {
SOURCE(26910, 108)
      {
         word pd541;
         pd541 = (* (( (ptr) (* (( (ptr) gf←c90672)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd541 ))))((* (( (ptr) ggData←v32828)+3) ), 0, (* (( (ptr) gf←c90672)+93) ), (* (( (ptr) gf←c90672)+117)
             ), pd541);
         };
      }
   else {
SOURCE(27018, 344)
      {
         word x542;
         word x543;
         if (((
            x542 = radius←v16020,  *(float*)&x542
            ) > (
            x543 = (*  (ptr) &fc532 ),  *(float*)&x543
            ))) {
SOURCE(27047, 123)
            {
               word pd544;
               pd544 = (* (( (ptr) (* (( (ptr) gf←c90672)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd544 ))))((* (( (ptr) ggData←v32828)+3) ), 0, (* (( (ptr) gf←c90672)+93) ), (* (( (ptr) gf←c90672)+118)
                   ), pd544);
               };
            }
         else {
SOURCE(27170, 194)
            {
               W2 caretPoint←v16104;
               word slice←v16132;
SOURCE(27172, 50)
               {
                  word pd545;
                  pd545 = (* (( (ptr) (* (( (ptr) gf←c90672)+422)/* var←c84432 */  ))+15) );
                  (void) ( *( (fPt) ((*  (ptr) pd545 ))))((word) &caretPoint←v16104, (* (( (ptr) ggData←v32828)+13) ), pd545);
                  };
SOURCE(27224, 99)
               {
                  word pd546;
                  word x547;
                  word x548;
                  float tf549;
                  pd546 = (* (( (ptr) (* (( (ptr) gf←c90672)+423)/* var←c84464 */  ))+5) );
                  slice←v16132 = (word) ( *( (fPt) ((*  (ptr) pd546 ))))(caretPoint←v16104, (
                        tf549 = (
                           x547 = radius←v16020,  *(float*)&x547
                           ) * (
                           x548 = (* (( (ptr) (* (( (ptr) ggData←v32828)+18) ))+13) ),  *(float*)&x548
                           ),  *(word*)&tf549
                        ), (* (( (ptr) ggData←v32828)+30) ), pd546);
                  };
SOURCE(27325, 37)
               (void) EndNewObject←P1380(slice←v16132, ggData←v32828, (* (( (ptr) gf←c90672)+119) ));
               };
            };
         };
      };
   }

static void NewKnotchedLine←P1620(ggData←v32916, event←v32944)
   word ggData←v32916;
   word event←v32944;
   {
   register ptr gf←c90704 =  (ptr) &globalframe;
   word length←v16176;
   word segCount←v16204;
   word exists←v16232;
   /* NewKnotchedLine: */ 
SOURCE(27371, 793)
SOURCE(27406, 50)
   length←v16176 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v32944)+1) ) ), (* (( (ptr) gf←c90704)+14) )) );
SOURCE(27458, 55)
   segCount←v16204 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) (* (( (ptr) event←v32944)+1) ))+1) ) ), (* (( (ptr) gf←c90704)+23)
       )) );
SOURCE(27515, 43)
   {
      word pd550;
      pd550 = (* (( (ptr) (* (( (ptr) gf←c90704)+422)/* var←c84432 */  ))+7) );
      exists←v16232 = (word) ( *( (fPt) ((*  (ptr) pd550 ))))((* ((( (ptr) ggData←v32916)+13)) ), pd550);
      };
SOURCE(27560, 604)
   if ((0 == exists←v16232)) {
SOURCE(27579, 120)
      {
         word pd551;
         pd551 = (* (( (ptr) (* (( (ptr) gf←c90704)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd551 ))))((* (( (ptr) ggData←v32916)+3) ), 0, (* (( (ptr) gf←c90704)+93) ), (* (( (ptr) gf←c90704)+120)
             ), pd551);
         };
      }
   else {
SOURCE(27699, 465)
      {
         word x552;
         word x553;
         if (((
            x552 = length←v16176,  *(float*)&x552
            ) > (
            x553 = (*  (ptr) &fc532 ),  *(float*)&x553
            )) || ( (int)segCount←v16204 ==  (int)2147483647)) {
SOURCE(27750, 144)
            {
               word pd554;
               pd554 = (* (( (ptr) (* (( (ptr) gf←c90704)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd554 ))))((* (( (ptr) ggData←v32916)+3) ), 0, (* (( (ptr) gf←c90704)+93) ), (* (( (ptr) gf←c90704)+121)
                   ), pd554);
               };
            }
         else {
SOURCE(27894, 272)
            {
               W2 caretPoint←v16300;
               W2 p1←v16328;
               word slice←v16356;
SOURCE(27896, 50)
               {
                  word pd555;
                  pd555 = (* (( (ptr) (* (( (ptr) gf←c90704)+422)/* var←c84432 */  ))+15) );
                  (void) ( *( (fPt) ((*  (ptr) pd555 ))))((word) &caretPoint←v16300, (* (( (ptr) ggData←v32916)+13) ), pd555);
                  };
SOURCE(27948, 77)
               {
                  W2 var←c0375;
                  {
                     W2 var←c84496;
                     {
                        word x556;
                        word x557;
                        *(float*)&var←c84496.f0 = (
                           x556 = length←v16176,  *(float*)&x556
                           ) * (
                           x557 = (* (( (ptr) (* (( (ptr) ggData←v32916)+18) ))+13) ),  *(float*)&x557
                           );
                        };
                     var←c84496.f1 = (*  (ptr) &fc358 );
                     {
                        word pd558;
                        pd558 = (* (( (ptr) (* (( (ptr) gf←c90704)+424)/* var←c84528 */  ))+10) );
                        (void) ( *( (fPt) ((*  (ptr) pd558 ))))((word) &var←c0375, caretPoint←v16300, var←c84496, pd558);
                        };
                     };
                  p1←v16328 = var←c0375;
                  };
SOURCE(28027, 91)
               {
                  word pd559;
                  pd559 = (* (( (ptr) (* (( (ptr) gf←c90704)+423)/* var←c84464 */  ))+7) );
                  slice←v16356 = (word) ( *( (fPt) ((*  (ptr) pd559 ))))(caretPoint←v16300, p1←v16328, SGNCK(segCount←v16204), pd559);
                  };
SOURCE(28120, 44)
               (void) EndNewObject←P1380(slice←v16356, ggData←v32916, (* (( (ptr) gf←c90704)+122) ));
               };
            };
         };
      };
   }

static void NewArrow←P1680(ggData←v33004, event←v33032)
   word ggData←v33004;
   word event←v33032;
   {
   register ptr gf←c90736 =  (ptr) &globalframe;
   word shaftLength←v16400;
   word barbLength←v16428;
   word exists←v16456;
   /* NewArrow: */ 
SOURCE(28173, 1704)
SOURCE(28201, 55)
   shaftLength←v16400 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v33032)+1) ) ), (* (( (ptr) gf←c90736)+14) )) );
SOURCE(28258, 59)
   barbLength←v16428 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) (* (( (ptr) event←v33032)+1) ))+1) ) ), (* (( (ptr) gf←c90736)+14)
       )) );
SOURCE(28319, 43)
   {
      word pd560;
      pd560 = (* (( (ptr) (* (( (ptr) gf←c90736)+422)/* var←c84432 */  ))+7) );
      exists←v16456 = (word) ( *( (fPt) ((*  (ptr) pd560 ))))((* ((( (ptr) ggData←v33004)+13)) ), pd560);
      };
SOURCE(28364, 1513)
   if ((0 == exists←v16456)) {
SOURCE(28383, 106)
      {
         word pd561;
         pd561 = (* (( (ptr) (* (( (ptr) gf←c90736)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd561 ))))((* (( (ptr) ggData←v33004)+3) ), 0, (* (( (ptr) gf←c90736)+93) ), (* (( (ptr) gf←c90736)+123)
             ), pd561);
         };
      }
   else {
SOURCE(28489, 1388)
      {
         word x562;
         word x563;
         word x564;
         word x565;
         if (((
            x562 = shaftLength←v16400,  *(float*)&x562
            ) > (
            x563 = (*  (ptr) &fc532 ),  *(float*)&x563
            )) || ((
            x564 = barbLength←v16428,  *(float*)&x564
            ) > (
            x565 = (*  (ptr) &fc532 ),  *(float*)&x565
            ))) {
SOURCE(28551, 135)
            {
               word pd566;
               pd566 = (* (( (ptr) (* (( (ptr) gf←c90736)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd566 ))))((* (( (ptr) ggData←v33004)+3) ), 0, (* (( (ptr) gf←c90736)+93) ), (* (( (ptr) gf←c90736)+124)
                   ), pd566);
               };
            }
         else {
SOURCE(28686, 1191)
SOURCE(28686, 1191)
            {
               word slice←v16524 = 0;
               word traj←v16552 = 0;
               word seg←v16580 = 0;
               word success←v16608 = 0;
               W2 shaftBottom←v16636;
               W2 shaftTop←v16664;
               W2 barbLeft←v16692;
               W2 barbRight←v16720;
SOURCE(28818, 44)
               {
                  word pd567;
                  pd567 = (* (( (ptr) (* (( (ptr) gf←c90736)+422)/* var←c84432 */  ))+15) );
                  (void) ( *( (fPt) ((*  (ptr) pd567 ))))((word) &shaftBottom←v16636, (* (( (ptr) ggData←v33004)+13) ), pd567);
                  };
SOURCE(28864, 52)
               {
                  word x568;
                  word x569;
                  *(float*)&shaftLength←v16400 = (
                     x568 = shaftLength←v16400,  *(float*)&x568
                     ) * (
                     x569 = (* (( (ptr) (* (( (ptr) ggData←v33004)+18) ))+13) ),  *(float*)&x569
                     );
                  };
SOURCE(28945, 50)
               {
                  word x570;
                  word x571;
                  *(float*)&barbLength←v16428 = (
                     x570 = barbLength←v16428,  *(float*)&x570
                     ) * (
                     x571 = (* (( (ptr) (* (( (ptr) ggData←v33004)+18) ))+13) ),  *(float*)&x571
                     );
                  };
SOURCE(29024, 47)
               {
                  W2 var←c0392;
                  {
                     W2 var←c84560;
                     var←c84560.f0 = (*  (ptr) &fc358 );
                     var←c84560.f1 = shaftLength←v16400;
                     {
                        word pd572;
                        pd572 = (* (( (ptr) (* (( (ptr) gf←c90736)+424)/* var←c84528 */  ))+10) );
                        (void) ( *( (fPt) ((*  (ptr) pd572 ))))((word) &var←c0392, shaftBottom←v16636, var←c84560, pd572);
                        };
                     };
                  shaftTop←v16664 = var←c0392;
                  };
SOURCE(29073, 69)
               {
                  W2 var←c84592;
                  {
                     W2 var←c84624;
                     {
                        W2 var←c0396;
                        {
                           W2 var←c84656;
                           var←c84656.f0 = (*  (ptr) &fc573 );
                           var←c84656.f1 = (*  (ptr) &fc382 );
                           {
/*1*/   word pd574;
/*1*/   pd574 = (* (( (ptr) (* (( (ptr) gf←c90736)+424)/* var←c84528 */  ))+13) );
/*1*/   (void) ( *( (fPt) ((*  (ptr) pd574 ))))((word) &var←c0396, var←c84656, pd574);
/*1*/   };
                           };
                        var←c84624 = var←c0396;
                        };
                     {
                        W2 var←c0397;
                        {
                           word pd575;
                           pd575 = (* (( (ptr) (* (( (ptr) gf←c90736)+424)/* var←c84528 */  ))+12) );
                           (void) ( *( (fPt) ((*  (ptr) pd575 ))))((word) &var←c0397, var←c84624, barbLength←v16428, pd575);
                           };
                        var←c84592 = var←c0397;
                        };
                     };
                  {
                     W2 var←c0398;
                     {
                        word pd576;
                        pd576 = (* (( (ptr) (* (( (ptr) gf←c90736)+424)/* var←c84528 */  ))+10) );
                        (void) ( *( (fPt) ((*  (ptr) pd576 ))))((word) &var←c0398, shaftBottom←v16636, var←c84592, pd576);
                        };
                     barbLeft←v16692 = var←c0398;
                     };
                  };
SOURCE(29144, 69)
               {
                  W2 var←c84688;
                  {
                     W2 var←c84720;
                     {
                        W2 var←c0402;
                        {
                           W2 var←c84752;
                           var←c84752.f0 = (*  (ptr) &fc382 );
                           var←c84752.f1 = (*  (ptr) &fc382 );
                           {
/*1*/   word pd577;
/*1*/   pd577 = (* (( (ptr) (* (( (ptr) gf←c90736)+424)/* var←c84528 */  ))+13) );
/*1*/   (void) ( *( (fPt) ((*  (ptr) pd577 ))))((word) &var←c0402, var←c84752, pd577);
/*1*/   };
                           };
                        var←c84720 = var←c0402;
                        };
                     {
                        W2 var←c0403;
                        {
                           word pd578;
                           pd578 = (* (( (ptr) (* (( (ptr) gf←c90736)+424)/* var←c84528 */  ))+12) );
                           (void) ( *( (fPt) ((*  (ptr) pd578 ))))((word) &var←c0403, var←c84720, barbLength←v16428, pd578);
                           };
                        var←c84688 = var←c0403;
                        };
                     };
                  {
                     W2 var←c0404;
                     {
                        word pd579;
                        pd579 = (* (( (ptr) (* (( (ptr) gf←c90736)+424)/* var←c84528 */  ))+10) );
                        (void) ( *( (fPt) ((*  (ptr) pd579 ))))((word) &var←c0404, shaftBottom←v16636, var←c84688, pd579);
                        };
                     barbRight←v16720 = var←c0404;
                     };
                  };
SOURCE(29215, 34)
               {
                  word pd580;
                  pd580 = (* (( (ptr) (* (( (ptr) gf←c90736)+425)/* var←c84784 */  ))+4) );
                  traj←v16552 = (word) ( *( (fPt) ((*  (ptr) pd580 ))))(shaftTop←v16664, pd580);
                  };
SOURCE(29251, 52)
               {
                  word pd581;
                  pd581 = (* (( (ptr) (* (( (ptr) gf←c90736)+426)/* var←c84816 */  ))+5) );
                  seg←v16580 = (word) ( *( (fPt) ((*  (ptr) pd581 ))))(shaftTop←v16664, shaftBottom←v16636, 0, pd581);
                  };
SOURCE(29305, 46)
               {
                  word pd582;
                  pd582 = (* (( (ptr) (* (( (ptr) gf←c90736)+425)/* var←c84784 */  ))+6) );
                  success←v16608 = (word) ( *( (fPt) ((*  (ptr) pd582 ))))(traj←v16552, 1, seg←v16580, 0, pd582);
                  };
SOURCE(29353, 20)
               if ((0 == success←v16608)) {
SOURCE(29373, 5)
                  (void) XR←RaiseUnnamedError();
                  };
SOURCE(29380, 52)
               {
                  word pd583;
                  pd583 = (* (( (ptr) (* (( (ptr) gf←c90736)+426)/* var←c84816 */  ))+5) );
                  seg←v16580 = (word) ( *( (fPt) ((*  (ptr) pd583 ))))(shaftBottom←v16636, barbLeft←v16692, 0, pd583);
                  };
SOURCE(29434, 46)
               {
                  word pd584;
                  pd584 = (* (( (ptr) (* (( (ptr) gf←c90736)+425)/* var←c84784 */  ))+6) );
                  success←v16608 = (word) ( *( (fPt) ((*  (ptr) pd584 ))))(traj←v16552, 1, seg←v16580, 0, pd584);
                  };
SOURCE(29482, 20)
               if ((0 == success←v16608)) {
SOURCE(29502, 5)
                  (void) XR←RaiseUnnamedError();
                  };
SOURCE(29509, 52)
               {
                  word pd585;
                  pd585 = (* (( (ptr) (* (( (ptr) gf←c90736)+426)/* var←c84816 */  ))+5) );
                  seg←v16580 = (word) ( *( (fPt) ((*  (ptr) pd585 ))))(barbLeft←v16692, shaftBottom←v16636, 0, pd585);
                  };
SOURCE(29563, 46)
               {
                  word pd586;
                  pd586 = (* (( (ptr) (* (( (ptr) gf←c90736)+425)/* var←c84784 */  ))+6) );
                  success←v16608 = (word) ( *( (fPt) ((*  (ptr) pd586 ))))(traj←v16552, 1, seg←v16580, 0, pd586);
                  };
SOURCE(29611, 20)
               if ((0 == success←v16608)) {
SOURCE(29631, 5)
                  (void) XR←RaiseUnnamedError();
                  };
SOURCE(29638, 53)
               {
                  word pd587;
                  pd587 = (* (( (ptr) (* (( (ptr) gf←c90736)+426)/* var←c84816 */  ))+5) );
                  seg←v16580 = (word) ( *( (fPt) ((*  (ptr) pd587 ))))(shaftBottom←v16636, barbRight←v16720, 0, pd587);
                  };
SOURCE(29693, 46)
               {
                  word pd588;
                  pd588 = (* (( (ptr) (* (( (ptr) gf←c90736)+425)/* var←c84784 */  ))+6) );
                  success←v16608 = (word) ( *( (fPt) ((*  (ptr) pd588 ))))(traj←v16552, 1, seg←v16580, 0, pd588);
                  };
SOURCE(29741, 20)
               if ((0 == success←v16608)) {
SOURCE(29761, 5)
                  (void) XR←RaiseUnnamedError();
                  };
SOURCE(29768, 69)
               {
                  word pd589;
                  pd589 = (* (( (ptr) (* (( (ptr) gf←c90736)+427)/* var←c84848 */  ))+5) );
                  slice←v16524 = (word) ( *( (fPt) ((*  (ptr) pd589 ))))(traj←v16552, (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c90736)+417)/* var←c83088 */  ))+54)
                      ) ), pd589);
                  };
SOURCE(29839, 36)
               (void) EndNewObject←P1380(slice←v16524, ggData←v33004, (* (( (ptr) gf←c90736)+125) ));
               };
            };
         };
      };
   }

static void Frame←P1740(ggData←v33092, event←v33120)
   word ggData←v33092;
   word event←v33120;
   {
   register ptr gf←c90768 =  (ptr) &globalframe;
   word frameWidth←v16764;
   word frameHeight←v16792;
   word frameXOffset←v16820;
   word frameYOffset←v16848;
   word box←v16876 = 0;
   word sliceD←v16904 = 0;
   word eventList←v16932;
   /* Frame: */ 
SOURCE(29884, 1619)
SOURCE(29909, 63)
   frameWidth←v16764 = (*  (ptr) &fc358 );
   frameHeight←v16792 = (*  (ptr) &fc358 );
   frameXOffset←v16820 = (*  (ptr) &fc358 );
   frameYOffset←v16848 = (*  (ptr) &fc358 );
SOURCE(30025, 11)
   eventList←v16932 = (* (( (ptr) event←v33120)+1) );
SOURCE(30062, 47)
   frameWidth←v16764 = (*  (ptr) XR←Narrow((*  (ptr) eventList←v16932 ), (* (( (ptr) gf←c90768)+14) )) );
SOURCE(30141, 26)
   eventList←v16932 = (* (( (ptr) eventList←v16932)+1) );
SOURCE(30169, 48)
   frameHeight←v16792 = (*  (ptr) XR←Narrow((*  (ptr) eventList←v16932 ), (* (( (ptr) gf←c90768)+14) )) );
SOURCE(30249, 26)
   eventList←v16932 = (* (( (ptr) eventList←v16932)+1) );
SOURCE(30277, 182)
   if ((eventList←v16932 != 0)) {
SOURCE(30301, 49)
      frameXOffset←v16820 = (*  (ptr) XR←Narrow((*  (ptr) eventList←v16932 ), (* (( (ptr) gf←c90768)+14) )) );
SOURCE(30382, 26)
      eventList←v16932 = (* (( (ptr) eventList←v16932)+1) );
SOURCE(30410, 49)
      frameYOffset←v16848 = (*  (ptr) XR←Narrow((*  (ptr) eventList←v16932 ), (* (( (ptr) gf←c90768)+14) )) );
      };
SOURCE(30494, 243)
   {
      word x590;
      word x591;
      word x592;
      word x593;
      word x594;
      word x595;
      word x596;
      word x597;
      if (((((
         x590 = frameWidth←v16764,  *(float*)&x590
         ) > (
         x591 = (*  (ptr) &fc532 ),  *(float*)&x591
         )) || ((
         x592 = frameHeight←v16792,  *(float*)&x592
         ) > (
         x593 = (*  (ptr) &fc532 ),  *(float*)&x593
         ))) || ((
         x594 = frameXOffset←v16820,  *(float*)&x594
         ) > (
         x595 = (*  (ptr) &fc532 ),  *(float*)&x595
         ))) || ((
         x596 = frameYOffset←v16848,  *(float*)&x596
         ) > (
         x597 = (*  (ptr) &fc532 ),  *(float*)&x597
         ))) {
SOURCE(30618, 111)
         {
            word pd598;
            pd598 = (* (( (ptr) (* (( (ptr) gf←c90768)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd598 ))))((* (( (ptr) ggData←v33092)+3) ), 0, (* (( (ptr) gf←c90768)+93) ), (* (( (ptr) gf←c90768)+126)
                ), pd598);
            };
SOURCE(30731, 6)
         return;
         };
      };
SOURCE(30742, 110)
   {
      word pd599;
      word x600;
      word x601;
      float tf602;
      word x603;
      word x604;
      float tf605;
      pd599 = (* (( (ptr) (* (( (ptr) gf←c90768)+413)/* var←c82416 */  ))+5) );
      box←v16876 = (word) ( *( (fPt) ((*  (ptr) pd599 ))))(frameXOffset←v16820, frameYOffset←v16848, (
            tf602 = (
               x600 = frameXOffset←v16820,  *(float*)&x600
               ) + (
               x601 = frameWidth←v16764,  *(float*)&x601
               ),  *(word*)&tf602
            ), (
            tf605 = (
               x603 = frameYOffset←v16848,  *(float*)&x603
               ) + (
               x604 = frameHeight←v16792,  *(float*)&x604
               ),  *(word*)&tf605
            ), 0, 0, pd599);
      };
SOURCE(30854, 64)
   {
      word var←c84880;
      {
         word pd606;
         pd606 = (* (( (ptr) (* (( (ptr) gf←c90768)+428)/* var←c84912 */  ))+4) );
         var←c84880 = (word) ( *( (fPt) ((*  (ptr) pd606 ))))(pd606);
         };
      {
         word pd607;
         pd607 = (* (( (ptr) (* (( (ptr) gf←c90768)+429)/* var←c84944 */  ))+45) );
         sliceD←v16904 = (word) ( *( (fPt) ((*  (ptr) pd607 ))))(box←v16876, 0, var←c84880, pd607);
         };
      };
SOURCE(30920, 41)
   {
      word pd608;
      pd608 = (* (( (ptr) (* (( (ptr) gf←c90768)+401)/* var←c81648 */  ))+7) );
      (void) ( *( (fPt) ((*  (ptr) pd608 ))))((* (( (ptr) gf←c90768)+127) ), ggData←v33092, pd608);
      };
SOURCE(30994, 48)
   {
      word pd609;
      pd609 = (* (( (ptr) (* (( (ptr) gf←c90768)+402)/* var←c81680 */  ))+9) );
      (void) ( *( (fPt) ((*  (ptr) pd609 ))))((* (( (ptr) ggData←v33092)+11) ), (*  (ptr) sliceD←v16904 ),  (word) -1, pd609);
      };
SOURCE(31044, 30)
   {
      word pd610;
      pd610 = (* (( (ptr) (* (( (ptr) gf←c90768)+404)/* var←c81744 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd610 ))))(ggData←v33092, pd610);
      };
SOURCE(31076, 76)
   {
      word var←c84976;
      {
         word pd611;
         pd611 = (* (( (ptr) (* (( (ptr) gf←c90768)+418)/* var←c83152 */  ))+7) );
         var←c84976 = (word) ( *( (fPt) ((*  (ptr) pd611 ))))((*  (ptr) sliceD←v16904 ), 0, pd611);
         };
      {
         word pd612;
         pd612 = (* (( (ptr) (* (( (ptr) gf←c90768)+404)/* var←c81744 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd612 ))))(ggData←v33092, var←c84976, 0, pd612);
         };
      };
SOURCE(31154, 41)
   (* (( (ptr) (* (( (ptr) ggData←v33092)+17) ))+16) ) = (*  (ptr) sliceD←v16904 );
SOURCE(31197, 29)
   {
      word pd613;
      pd613 = (* (( (ptr) (* (( (ptr) gf←c90768)+401)/* var←c81648 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd613 ))))(ggData←v33092, pd613);
      };
SOURCE(31278, 89)
   {
      word pd614;
      pd614 = (* (( (ptr) (* (( (ptr) gf←c90768)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd614 ))))((* (( (ptr) ggData←v33092)+3) ), 0, (* (( (ptr) gf←c90768)+53) ), (* (( (ptr) gf←c90768)+128)
          ), pd614);
      };
SOURCE(31369, 134)
   {
      word pd615;
      pd615 = (* (( (ptr) (* (( (ptr) gf←c90768)+405)/* var←c81776 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd615 ))))((* (( (ptr) gf←c90768)+109) ), ggData←v33092, 5, 1, 0, 0, pd615);
      };
   }

static void SelectedBBox←P1800(ggData←v33180, event←v33208)
   word ggData←v33180;
   word event←v33208;
   {
   register ptr gf←c90800 =  (ptr) &globalframe;
   /* SelectedBBox: */ 
SOURCE(31509, 974)
SOURCE(31541, 942)
   {
      word pd616;
      pd616 = (* (( (ptr) (* (( (ptr) gf←c90800)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd616 ))))((* (( (ptr) ggData←v33180)+11) ), 0, pd616))) {
SOURCE(31593, 96)
         {
            word pd617;
            pd617 = (* (( (ptr) (* (( (ptr) gf←c90800)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd617 ))))((* (( (ptr) ggData←v33180)+3) ), 0, (* (( (ptr) gf←c90800)+93) ), (* (( (ptr) gf←c90800)+129)
                ), pd617);
            };
         }
      else {
SOURCE(31689, 796)
         {
            word box←v17120;
            word sliceD←v17148;
SOURCE(31691, 85)
            {
               word pd618;
               pd618 = (* (( (ptr) (* (( (ptr) gf←c90800)+402)/* var←c81680 */  ))+47) );
               box←v17120 = (word) ( *( (fPt) ((*  (ptr) pd618 ))))((* (( (ptr) ggData←v33180)+11) ), 0, 1, pd618);
               };
SOURCE(31778, 81)
            {
               word var←c85008;
               {
                  word pd619;
                  pd619 = (* (( (ptr) (* (( (ptr) gf←c90800)+428)/* var←c84912 */  ))+4) );
                  var←c85008 = (word) ( *( (fPt) ((*  (ptr) pd619 ))))(pd619);
                  };
               {
                  word pd620;
                  pd620 = (* (( (ptr) (* (( (ptr) gf←c90800)+429)/* var←c84944 */  ))+45) );
                  sliceD←v17148 = (word) ( *( (fPt) ((*  (ptr) pd620 ))))(box←v17120, 0, var←c85008, pd620);
                  };
               };
SOURCE(31861, 65)
            {
               word pd621;
               pd621 = (* (( (ptr) (* (( (ptr) gf←c90800)+401)/* var←c81648 */  ))+7) );
               (void) ( *( (fPt) ((*  (ptr) pd621 ))))((* (( (ptr) gf←c90800)+130) ), ggData←v33180, pd621);
               };
SOURCE(31959, 48)
            {
               word pd622;
               pd622 = (* (( (ptr) (* (( (ptr) gf←c90800)+402)/* var←c81680 */  ))+9) );
               (void) ( *( (fPt) ((*  (ptr) pd622 ))))((* (( (ptr) ggData←v33180)+11) ), (*  (ptr) sliceD←v17148 ),  (word) -1, pd622);
               };
SOURCE(32009, 30)
            {
               word pd623;
               pd623 = (* (( (ptr) (* (( (ptr) gf←c90800)+404)/* var←c81744 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd623 ))))(ggData←v33180, pd623);
               };
SOURCE(32041, 76)
            {
               word var←c85040;
               {
                  word pd624;
                  pd624 = (* (( (ptr) (* (( (ptr) gf←c90800)+418)/* var←c83152 */  ))+7) );
                  var←c85040 = (word) ( *( (fPt) ((*  (ptr) pd624 ))))((*  (ptr) sliceD←v17148 ), 0, pd624);
                  };
               {
                  word pd625;
                  pd625 = (* (( (ptr) (* (( (ptr) gf←c90800)+404)/* var←c81744 */  ))+11) );
                  (void) ( *( (fPt) ((*  (ptr) pd625 ))))(ggData←v33180, var←c85040, 0, pd625);
                  };
               };
SOURCE(32119, 41)
            (* (( (ptr) (* (( (ptr) ggData←v33180)+17) ))+16) ) = (*  (ptr) sliceD←v17148 );
SOURCE(32162, 29)
            {
               word pd626;
               pd626 = (* (( (ptr) (* (( (ptr) gf←c90800)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd626 ))))(ggData←v33180, pd626);
               };
SOURCE(32243, 104)
            {
               word pd627;
               pd627 = (* (( (ptr) (* (( (ptr) gf←c90800)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd627 ))))((* (( (ptr) ggData←v33180)+3) ), 0, (* (( (ptr) gf←c90800)+53) ), (* (( (ptr) gf←c90800)+131)
                   ), pd627);
               };
SOURCE(32349, 134)
            {
               word pd628;
               pd628 = (* (( (ptr) (* (( (ptr) gf←c90800)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd628 ))))((* (( (ptr) gf←c90800)+109) ), ggData←v33180, 5, 1, 0, 0, pd628);
               };
            };
         };
      };
   }

static void LineWidth←P1860(ggData←v33268, event←v33296)
   word ggData←v33268;
   word event←v33296;
   {
   register ptr gf←c90832 =  (ptr) &globalframe;
   word strokeWidth←v17192;
   /* LineWidth: */ 
SOURCE(32492, 195)
SOURCE(32528, 54)
   {
      word var←c85072;
      word var←c85104;
      var←c85072 = (*  (ptr) (* (( (ptr) event←v33296)+1) ) );
      if ((var←c85072 == 0)) {
         goto lab←L100052;
         };
      var←c85104 = XR←GetReferentType(var←c85072);
      if (((* (( (ptr) gf←c90832)+14) ) == var←c85104)) {
         {
            word real←v17236;
            real←v17236 = var←c85072;
            strokeWidth←v17192 = (*  (ptr) real←v17236 );
            };
         }
      else {
         if (((* (( (ptr) gf←c90832)+23) ) == var←c85104)) {
            {
               word int←v17292;
               int←v17292 = var←c85072;
               {
                  float tf629;
                  strokeWidth←v17192 = (
                     tf629 = (float)(int)(*  (ptr) int←v17292 ),  *(word*)&tf629
                     );
                  };
               };
            }
         else {
            lab←L100052: ;
            strokeWidth←v17192 = (*  (ptr) &fc573 );
            };
         };
      };
SOURCE(32652, 35)
   (void) SetStrokeWidth←P1920(ggData←v33268, strokeWidth←v17192);
   }

static void SetStrokeWidth←P1920(ggData←v9284, formal←c01055)
   word ggData←v9284;
   word formal←c01055;
   {
   W10 var←c90864;
   /* declaration of strokeWidth←v9312 skipped */ 
   register ptr gf←c90896 =  (ptr) &globalframe;
   /* declaration of var←c85136 skipped */ 
   (* (( (ptr) &var←c90864)+4)/* strokeWidth←v9312 */  ) = formal←c01055;
   /* SetStrokeWidth: */ 
SOURCE(32693, 1353)
   {
      word tmpAddr630;
      tmpAddr630 = (word) (( (ptr) &var←c90864)+5)/* var←c85136 */ ;
      (*  (ptr) tmpAddr630 ) = ( ((word)  (fPt) DoLineWidth←P5952) );
      (* (( (ptr) tmpAddr630) + 1) ) = 1;
      };
SOURCE(32761, 1285)
   {
      word pd631;
      pd631 = (* (( (ptr) (* (( (ptr) gf←c90896)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd631 ))))((* (( (ptr) ggData←v9284)+11) ), 0, pd631))) {
SOURCE(32813, 125)
         {
            word pd632;
            pd632 = (* (( (ptr) (* (( (ptr) gf←c90896)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd632 ))))((* (( (ptr) ggData←v9284)+3) ), 0, (* (( (ptr) gf←c90896)+93) ), (* (( (ptr) gf←c90896)+132)
                ), pd632);
            };
         }
      else {
SOURCE(32938, 1108)
         {
            word x633;
            word x634;
            word x635;
            word x637;
            word x638;
            word x639;
            if ((((
               x633 = (* (( (ptr) &var←c90864)+4)/* strokeWidth←v9312 */  ),  *(float*)&x633
               ) > (
               x634 = (*  (ptr) &fc532 ),  *(float*)&x634
               )) || ((
               x635 = (* (( (ptr) &var←c90864)+4)/* strokeWidth←v9312 */  ),  *(float*)&x635
               ) == (
               x637 = (*  (ptr) &fc636 ),  *(float*)&x637
               ))) || ((
               x638 = (* (( (ptr) &var←c90864)+4)/* strokeWidth←v9312 */  ),  *(float*)&x638
               ) < (
               x639 = (*  (ptr) &fc358 ),  *(float*)&x639
               ))) {
SOURCE(33018, 137)
               {
                  word pd640;
                  pd640 = (* (( (ptr) (* (( (ptr) gf←c90896)+395)/* var←c80976 */  ))+12) );
                  (void) ( *( (fPt) ((*  (ptr) pd640 ))))((* (( (ptr) ggData←v9284)+3) ), 0, (* (( (ptr) gf←c90896)+93) ), (* (( (ptr) gf←c90896)+133)
                      ), pd640);
                  };
               }
            else {
SOURCE(33155, 893)
               {
                  /* declaration of bBoxes←v17376 skipped */ 
                  /* declaration of thisBox←v17404 skipped */ 
                  /* declaration of currentEvent←v17432 skipped */ 
SOURCE(33381, 8)
                  (* (( (ptr) &var←c90864)+7)/* bBoxes←v17376 */  ) = 0;
SOURCE(33407, 17)
                  (* (( (ptr) &var←c90864)+8)/* thisBox←v17404 */  ) = 0;
SOURCE(33426, 77)
                  {
                     word pd641;
                     pd641 = (* (( (ptr) (* (( (ptr) gf←c90896)+401)/* var←c81648 */  ))+4) );
                     (* (( (ptr) &var←c90864)+9)/* currentEvent←v17432 */  ) = (word) ( *( (fPt) ((*  (ptr) pd641 ))))((* (( (ptr) gf←c90896)+134)
                         ), ggData←v9284, pd641);
                     };
SOURCE(33505, 81)
                  {
                     word pd642;
                     pd642 = (* (( (ptr) (* (( (ptr) gf←c90896)+404)/* var←c81744 */  ))+10) );
                     (void) ( *( (fPt) ((*  (ptr) pd642 ))))(ggData←v9284, 0, 0, 0, 1, 0
                        , 0, 0, 0, 0, pd642);
                     };
SOURCE(33588, 72)
                  {
                     word var←c85168;
                     word pd643;
                     pd643 = (* (( (ptr) (* (( (ptr) gf←c90896)+402)/* var←c81680 */  ))+32) );
                     var←c85168 = (word) ( *( (fPt) ((*  (ptr) pd643 ))))((* (( (ptr) ggData←v9284)+11) ), 1, (word) (( (bPt) &var←c90864)+20)
                        /* var←c85136 */ , 0, 0, pd643);
                     };
SOURCE(33662, 74)
                  {
                     word var←c85200;
                     {
                        word pd644;
                        pd644 = (* (( (ptr) (* (( (ptr) gf←c90896)+413)/* var←c82416 */  ))+8) );
                        var←c85200 = (word) ( *( (fPt) ((*  (ptr) pd644 ))))((* ((( (ptr) &var←c90864)+7)/* bBoxes←v17376 */ ) ), pd644);
                        };
                     {
                        word pd645;
                        pd645 = (* (( (ptr) (* (( (ptr) gf←c90896)+404)/* var←c81744 */  ))+11) );
                        (void) ( *( (fPt) ((*  (ptr) pd645 ))))(ggData←v9284, var←c85200, 0, pd645);
                        };
                     };
SOURCE(33738, 29)
                  {
                     word pd646;
                     pd646 = (* (( (ptr) (* (( (ptr) gf←c90896)+401)/* var←c81648 */  ))+6) );
                     (void) ( *( (fPt) ((*  (ptr) pd646 ))))(ggData←v9284, pd646);
                     };
SOURCE(33769, 127)
                  {
                     W2 var←c85232;
                     var←c85232.f0 = 8;
                     var←c85232.f1 = (* (( (ptr) &var←c90864)+4)/* strokeWidth←v9312 */  );
                     {
                        word pd647;
                        pd647 = (* (( (ptr) (* (( (ptr) gf←c90896)+395)/* var←c80976 */  ))+14) );
                        (void) ( *( (fPt) ((*  (ptr) pd647 ))))((* (( (ptr) ggData←v9284)+3) ), 0, (* (( (ptr) gf←c90896)+53) ), (* (( (ptr) gf←c90896)+135)
                            ), var←c85232, pd647);
                        };
                     };
SOURCE(33898, 148)
                  {
                     word pd648;
                     pd648 = (* (( (ptr) (* (( (ptr) gf←c90896)+405)/* var←c81776 */  ))+4) );
                     (void) ( *( (fPt) ((*  (ptr) pd648 ))))((* (( (ptr) gf←c90896)+26) ), ggData←v9284, 4, 1, 0, 0, pd648);
                     };
                  };
               };
            };
         };
      };
   }

static word DoLineWidth←P5952(sliceD←v17508, formal←c90960)
   word sliceD←v17508;
   word formal←c90960;
   {
   register ptr gf←c90928 =  (ptr) &globalframe;
   word done←v17552;
   formal←c90960 = (formal←c90960 - 20);
   /* DoLineWidth: */ 
SOURCE(33157, 19)
SOURCE(33157, 19)
   done←v17552 = 0;
SOURCE(33234, 90)
   {
      word pd649;
      pd649 = (* (( (ptr) (* (( (ptr) gf←c90928)+418)/* var←c83152 */  ))+53) );
      (* (( (ptr) formal←c90960)+8) ) = (word) ( *( (fPt) ((*  (ptr) pd649 ))))((*  (ptr) sliceD←v17508 ), (* (( (ptr) sliceD←v17508)+1)
          ), (* (( (ptr) formal←c90960)+4) ), (* (( (ptr) formal←c90960)+9) ), pd649);
      };
SOURCE(33326, 50)
   if (((* (( (ptr) formal←c90960)+8) ) != 0)) {
SOURCE(33346, 30)
      {
         word var←c85264;
         var←c85264 = XR←NewObject(8, (* (( (ptr) gf←c90928)+13) ));
         (*  (ptr) var←c85264 ) = (* (( (ptr) formal←c90960)+8) );
         (* (( (ptr) var←c85264)+1) ) = (* (( (ptr) formal←c90960)+7) );
         (* (( (ptr) formal←c90960)+7) ) = var←c85264;
         };
      };
SOURCE(33157, 19)
   return(done←v17552);
   }

static void LineEnds←P1980(ggData←v33356, event←v33384)
   word ggData←v33356;
   word event←v33384;
   {
   register ptr gf←c90992 =  (ptr) &globalframe;
   word strokeEnd←v17664;
   word argRope←v17692;
   /* LineEnds: */ 
SOURCE(34055, 482)
SOURCE(34112, 45)
   argRope←v17692 = XR←Narrow((*  (ptr) (* (( (ptr) event←v33384)+1) ) ), (* (( (ptr) gf←c90992)+20) ));
   if ((argRope←v17692 == 0)) {
      goto lab←L100053;
      };
   if (( (unsigned) (*(int*)argRope←v17692<0) == 0)) {
      goto lab←L100053;
      };
   (void) XR←RaiseError(XR←NarrowFault, 0);
   lab←L100053: ;
   {
      word pd650;
      pd650 = (* (( (ptr) (* (( (ptr) gf←c90992)+421)/* var←c84272 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd650 ))))(argRope←v17692, (* (( (ptr) gf←c90992)+137) ), 0, pd650))) {
SOURCE(34216, 18)
         strokeEnd←v17664 = 0;
         }
      else {
         {
            word pd651;
            pd651 = (* (( (ptr) (* (( (ptr) gf←c90992)+421)/* var←c84272 */  ))+8) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd651 ))))(argRope←v17692, (* (( (ptr) gf←c90992)+138) ), 0, pd651))) {
SOURCE(34274, 16)
               strokeEnd←v17664 = 1;
               }
            else {
               {
                  word pd652;
                  pd652 = (* (( (ptr) (* (( (ptr) gf←c90992)+421)/* var←c84272 */  ))+8) );
                  if ((0 != (word) ( *( (fPt) ((*  (ptr) pd652 ))))(argRope←v17692, (* (( (ptr) gf←c90992)+139) ), 0, pd652))) {
SOURCE(34331, 17)
                     strokeEnd←v17664 = 2;
                     }
                  else {
SOURCE(34363, 130)
                     {
                        word pd653;
                        pd653 = (* (( (ptr) (* (( (ptr) gf←c90992)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd653 ))))((* (( (ptr) ggData←v33356)+3) ), 0, (* (( (ptr) gf←c90992)+93) ), (* (( (ptr) gf←c90992)+140)
                            ), pd653);
                        };
SOURCE(34495, 6)
                     return;
                     };
                  };
               };
            };
         };
      };
SOURCE(34506, 31)
   (void) SetStrokeEnd←P2040(ggData←v33356, strokeEnd←v17664);
   }

static void SetStrokeEnd←P2040(ggData←v9372, formal←c01056)
   word ggData←v9372;
   word formal←c01056;
   {
   W8 var←c91024;
   /* declaration of strokeEnd←v9400 skipped */ 
   register ptr gf←c91056 =  (ptr) &globalframe;
   /* declaration of var←c85328 skipped */ 
   var←c91024.f4/* strokeEnd←v9400 */  = formal←c01056;
   /* SetStrokeEnd: */ 
SOURCE(34543, 1046)
   {
      word tmpAddr654;
      tmpAddr654 = (word) (( (ptr) &var←c91024)+5)/* var←c85328 */ ;
      (*  (ptr) tmpAddr654 ) = ( ((word)  (fPt) DoLineEnds←P6060) );
      (* (( (ptr) tmpAddr654) + 1) ) = 1;
      };
SOURCE(34619, 970)
   {
      word pd655;
      pd655 = (* (( (ptr) (* (( (ptr) gf←c91056)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd655 ))))((* (( (ptr) ggData←v9372)+11) ), 0, pd655))) {
SOURCE(34671, 122)
         {
            word pd656;
            pd656 = (* (( (ptr) (* (( (ptr) gf←c91056)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd656 ))))((* (( (ptr) ggData←v9372)+3) ), 0, (* (( (ptr) gf←c91056)+93) ), (* (( (ptr) gf←c91056)+141)
                ), pd656);
            };
         }
      else {
SOURCE(34793, 798)
         {
            /* declaration of currentEvent←v17764 skipped */ 
SOURCE(34952, 26)
            var←c91024.f7/* currentEvent←v17764 */  = 0;
SOURCE(34980, 81)
            {
               word pd657;
               pd657 = (* (( (ptr) (* (( (ptr) gf←c91056)+404)/* var←c81744 */  ))+10) );
               (void) ( *( (fPt) ((*  (ptr) pd657 ))))(ggData←v9372, 0, 0, 0, 1, 0
                  , 0, 0, 0, 0, pd657);
               };
SOURCE(35063, 61)
            {
               word pd658;
               pd658 = (* (( (ptr) (* (( (ptr) gf←c91056)+401)/* var←c81648 */  ))+4) );
               var←c91024.f7/* currentEvent←v17764 */  = (word) ( *( (fPt) ((*  (ptr) pd658 ))))((* (( (ptr) gf←c91056)+142) ), ggData←v9372, pd658)
               ;
               };
SOURCE(35126, 71)
            {
               word var←c85360;
               word pd659;
               pd659 = (* (( (ptr) (* (( (ptr) gf←c91056)+402)/* var←c81680 */  ))+32) );
               var←c85360 = (word) ( *( (fPt) ((*  (ptr) pd659 ))))((* (( (ptr) ggData←v9372)+11) ), 1, (word) (( (bPt) &var←c91024)+20)
                  /* var←c85328 */ , 0, 0, pd659);
               };
SOURCE(35199, 88)
            {
               word var←c85392;
               {
                  word pd660;
                  pd660 = (* (( (ptr) (* (( (ptr) gf←c91056)+402)/* var←c81680 */  ))+45) );
                  var←c85392 = (word) ( *( (fPt) ((*  (ptr) pd660 ))))((* (( (ptr) ggData←v9372)+11) ), 0, 0, pd660);
                  };
               {
                  word pd661;
                  pd661 = (* (( (ptr) (* (( (ptr) gf←c91056)+404)/* var←c81744 */  ))+11) );
                  (void) ( *( (fPt) ((*  (ptr) pd661 ))))(ggData←v9372, var←c85392, 0, pd661);
                  };
               };
SOURCE(35289, 29)
            {
               word pd662;
               pd662 = (* (( (ptr) (* (( (ptr) gf←c91056)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd662 ))))(ggData←v9372, pd662);
               };
SOURCE(35320, 119)
            {
               word var←c85424;
               var←c85424 = (word) GetEndRope←P2760(var←c91024.f4/* strokeEnd←v9400 */ );
               {
                  W2 var←c85456;
                  var←c85456.f0 = 11;
                  var←c85456.f1 = var←c85424;
                  {
                     word pd663;
                     pd663 = (* (( (ptr) (* (( (ptr) gf←c91056)+395)/* var←c80976 */  ))+14) );
                     (void) ( *( (fPt) ((*  (ptr) pd663 ))))((* (( (ptr) ggData←v9372)+3) ), 0, (* (( (ptr) gf←c91056)+53) ), (* (( (ptr) gf←c91056)+143)
                         ), var←c85456, pd663);
                     };
                  };
               };
SOURCE(35441, 148)
            {
               word pd664;
               pd664 = (* (( (ptr) (* (( (ptr) gf←c91056)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd664 ))))((* (( (ptr) gf←c91056)+26) ), ggData←v9372, 4, 1, 0, 0, pd664);
               };
            };
         };
      };
   }

static word DoLineEnds←P6060(sliceD←v17840, formal←c91120)
   word sliceD←v17840;
   word formal←c91120;
   {
   register ptr gf←c91088 =  (ptr) &globalframe;
   word done←v17884;
   formal←c91120 = (formal←c91120 - 20);
   /* DoLineEnds: */ 
SOURCE(34795, 18)
SOURCE(34795, 18)
   done←v17884 = 0;
SOURCE(34871, 76)
   {
      word pd665;
      pd665 = (* (( (ptr) (* (( (ptr) gf←c91088)+418)/* var←c83152 */  ))+55) );
      (void) ( *( (fPt) ((*  (ptr) pd665 ))))((*  (ptr) sliceD←v17840 ), (* (( (ptr) sliceD←v17840)+1) ), (* (( (ptr) formal←c91120)+4)
          ), (* (( (ptr) formal←c91120)+7) ), pd665);
      };
SOURCE(34795, 18)
   return(done←v17884);
   }

static void TrajJoints←P2100(ggData←v33444, event←v33472)
   word ggData←v33444;
   word event←v33472;
   {
   W8 var←c91152;
   register ptr gf←c91184 =  (ptr) &globalframe;
   /* declaration of var←c85488 skipped */ 
   /* TrajJoints: */ 
SOURCE(35598, 1469)
   {
      word tmpAddr666;
      tmpAddr666 = (word) (( (ptr) &var←c91152)+4)/* var←c85488 */ ;
      (*  (ptr) tmpAddr666 ) = ( ((word)  (fPt) DoTrajJoints←P6168) );
      (* (( (ptr) tmpAddr666) + 1) ) = 1;
      };
SOURCE(35635, 1432)
   {
      word pd667;
      pd667 = (* (( (ptr) (* (( (ptr) gf←c91184)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd667 ))))((* (( (ptr) ggData←v33444)+11) ), 0, pd667))) {
SOURCE(35687, 130)
         {
            word pd668;
            pd668 = (* (( (ptr) (* (( (ptr) gf←c91184)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd668 ))))((* (( (ptr) ggData←v33444)+3) ), 0, (* (( (ptr) gf←c91184)+93) ), (* (( (ptr) gf←c91184)+144)
                ), pd668);
            };
         }
      else {
SOURCE(35817, 1252)
         {
            /* declaration of currentEvent←v17940 skipped */ 
            /* declaration of strokeJoint←v17968 skipped */ 
            word argRope←v17996;
SOURCE(35982, 26)
            var←c91152.f6/* currentEvent←v17940 */  = 0;
SOURCE(36036, 45)
            argRope←v17996 = XR←Narrow((*  (ptr) (* (( (ptr) event←v33472)+1) ) ), (* (( (ptr) gf←c91184)+20) ));
            if ((argRope←v17996 == 0)) {
               goto lab←L100054;
               };
            if (( (unsigned) (*(int*)argRope←v17996<0) == 0)) {
               goto lab←L100054;
               };
            (void) XR←RaiseError(XR←NarrowFault, 0);
            lab←L100054: ;
            {
               word pd669;
               pd669 = (* (( (ptr) (* (( (ptr) gf←c91184)+421)/* var←c84272 */  ))+8) );
               if ((0 != (word) ( *( (fPt) ((*  (ptr) pd669 ))))(argRope←v17996, (* (( (ptr) gf←c91184)+139) ), 0, pd669))) {
SOURCE(36139, 19)
                  var←c91152.f7/* strokeJoint←v17968 */  = 2;
                  }
               else {
                  {
                     word pd670;
                     pd670 = (* (( (ptr) (* (( (ptr) gf←c91184)+421)/* var←c84272 */  ))+8) );
                     if ((0 != (word) ( *( (fPt) ((*  (ptr) pd670 ))))(argRope←v17996, (* (( (ptr) gf←c91184)+145) ), 0, pd670))) {
SOURCE(36199, 19)
                        var←c91152.f7/* strokeJoint←v17968 */  = 0;
                        }
                     else {
                        {
                           word pd671;
                           pd671 = (* (( (ptr) (* (( (ptr) gf←c91184)+421)/* var←c84272 */  ))+8) );
                           if ((0 != (word) ( *( (fPt) ((*  (ptr) pd671 ))))(argRope←v17996, (* (( (ptr) gf←c91184)+146) ), 0, pd671))) {
SOURCE(36259, 19)
/*1*/   var←c91152.f7/* strokeJoint←v17968 */  = 1;
/*1*/   }
                           else {
SOURCE(36293, 134)
/*1*/   {
/*1*/      word pd672;
/*1*/      pd672 = (* (( (ptr) (* (( (ptr) gf←c91184)+395)/* var←c80976 */  ))+12) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd672 ))))((* (( (ptr) ggData←v33444)+3) ), 0, (* (( (ptr) gf←c91184)+93) ), (* (( (ptr) gf←c91184)+147)
/*1*/          ), pd672);
/*1*/      };
SOURCE(36429, 6)
/*1*/   return;
/*1*/   };
                           };
                        };
                     };
                  };
               };
SOURCE(36440, 81)
            {
               word pd673;
               pd673 = (* (( (ptr) (* (( (ptr) gf←c91184)+404)/* var←c81744 */  ))+10) );
               (void) ( *( (fPt) ((*  (ptr) pd673 ))))(ggData←v33444, 0, 0, 0, 1, 0
                  , 0, 0, 0, 0, pd673);
               };
SOURCE(36523, 63)
            {
               word pd674;
               pd674 = (* (( (ptr) (* (( (ptr) gf←c91184)+401)/* var←c81648 */  ))+4) );
               var←c91152.f6/* currentEvent←v17940 */  = (word) ( *( (fPt) ((*  (ptr) pd674 ))))((* (( (ptr) gf←c91184)+148) ), ggData←v33444, pd674)
               ;
               };
SOURCE(36588, 73)
            {
               word var←c85552;
               word pd675;
               pd675 = (* (( (ptr) (* (( (ptr) gf←c91184)+402)/* var←c81680 */  ))+32) );
               var←c85552 = (word) ( *( (fPt) ((*  (ptr) pd675 ))))((* (( (ptr) ggData←v33444)+11) ), 1, (word) (( (bPt) &var←c91152)+16)
                  /* var←c85488 */ , 0, 0, pd675);
               };
SOURCE(36663, 88)
            {
               word var←c85584;
               {
                  word pd676;
                  pd676 = (* (( (ptr) (* (( (ptr) gf←c91184)+402)/* var←c81680 */  ))+45) );
                  var←c85584 = (word) ( *( (fPt) ((*  (ptr) pd676 ))))((* (( (ptr) ggData←v33444)+11) ), 0, 0, pd676);
                  };
               {
                  word pd677;
                  pd677 = (* (( (ptr) (* (( (ptr) gf←c91184)+404)/* var←c81744 */  ))+11) );
                  (void) ( *( (fPt) ((*  (ptr) pd677 ))))(ggData←v33444, var←c85584, 0, pd677);
                  };
               };
SOURCE(36753, 29)
            {
               word pd678;
               pd678 = (* (( (ptr) (* (( (ptr) gf←c91184)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd678 ))))(ggData←v33444, pd678);
               };
SOURCE(36784, 133)
            {
               W2 var←c85616;
               var←c85616.f0 = 11;
               var←c85616.f1 = argRope←v17996;
               {
                  word pd679;
                  pd679 = (* (( (ptr) (* (( (ptr) gf←c91184)+395)/* var←c80976 */  ))+14) );
                  (void) ( *( (fPt) ((*  (ptr) pd679 ))))((* (( (ptr) ggData←v33444)+3) ), 0, (* (( (ptr) gf←c91184)+53) ), (* (( (ptr) gf←c91184)+149)
                      ), var←c85616, pd679);
                  };
               };
SOURCE(36919, 148)
            {
               word pd680;
               pd680 = (* (( (ptr) (* (( (ptr) gf←c91184)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd680 ))))((* (( (ptr) gf←c91184)+26) ), ggData←v33444, 4, 1, 0, 0, pd680);
               };
            };
         };
      };
   }

static word DoTrajJoints←P6168(sliceD←v18072, formal←c91248)
   word sliceD←v18072;
   word formal←c91248;
   {
   register ptr gf←c91216 =  (ptr) &globalframe;
   word done←v18116;
   formal←c91248 = (formal←c91248 - 16);
   /* DoTrajJoints: */ 
SOURCE(35819, 20)
SOURCE(35819, 20)
   done←v18116 = 0;
SOURCE(35897, 80)
   {
      word pd681;
      pd681 = (* (( (ptr) (* (( (ptr) gf←c91216)+418)/* var←c83152 */  ))+57) );
      (void) ( *( (fPt) ((*  (ptr) pd681 ))))((*  (ptr) sliceD←v18072 ), (* (( (ptr) sliceD←v18072)+1) ), (* (( (ptr) formal←c91248)+7)
          ), (* (( (ptr) formal←c91248)+6) ), pd681);
      };
SOURCE(35819, 20)
   return(done←v18116);
   }

static void DashesFromSelection←P2160(formal←c01057, formal←c01058)
   word formal←c01057;
   word formal←c01058;
   {
   W6 var←c91280;
   /* declaration of ggData←v33532 skipped */ 
   /* declaration of event←v33560 skipped */ 
   register ptr gf←c91312 =  (ptr) &globalframe;
   var←c91280.f4/* ggData←v33532 */  = formal←c01057;
   var←c91280.f5/* event←v33560 */  = formal←c01058;
   /* DashesFromSelection: */ 
SOURCE(37076, 732)
SOURCE(37120, 688)
SOURCE(37122, 507)
   {
      word var←c05;
      {
         word var←c0991;
         var←c0991 = (word) &var←c91280;
         var←c05 = (word) XR←Enable(( ((word)  (fPt) NoName←Q8760) ), ( ((word)  (fPt) NoName←Q8940) ), var←c0991);
         };
      if ((var←c05 == 3)) {
         goto lab←L100055;
         };
      };
   goto lab←L100063;
   lab←L100055: ;
SOURCE(37653, 152)
   {
      word pd682;
      pd682 = (* (( (ptr) (* (( (ptr) gf←c91312)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd682 ))))((* (( (ptr) var←c91280.f4/* ggData←v33532 */ )+3) ), 0, (* (( (ptr) gf←c91312)+93)
          ), (* (( (ptr) gf←c91312)+150) ), pd682);
      };
   lab←L100063: ;
   }

static word NoName←Q8760(formal←c0913)
   word formal←c0913;
   {
   register ptr gf←c0912 =  (ptr) &globalframe;
SOURCE(37172, 23)
   {
      word pattern←v18144 = 0;
      word offset←v18172;
      word length←v18200;
      word allZeroes←v18228 = 1;
      word argRope←v18256;
      word argStream←v18284;
SOURCE(37243, 45)
      argRope←v18256 = XR←Narrow((*  (ptr) (* (( (ptr) (* (( (ptr) formal←c0913)+5) ))+1) ) ), (* (( (ptr) gf←c0912)+20) ));
      if ((argRope←v18256 == 0)) {
         goto lab←L100058;
         };
      if (( (unsigned) (*(int*)argRope←v18256<0) == 0)) {
         goto lab←L100058;
         };
      (void) XR←RaiseError(XR←NarrowFault, 0);
      lab←L100058: ;
SOURCE(37290, 38)
      {
         word pd683;
         pd683 = (* (( (ptr) (* (( (ptr) gf←c0912)+393)/* var←c80880 */  ))+33) );
         argStream←v18284 = (word) ( *( (fPt) ((*  (ptr) pd683 ))))(argRope←v18256, 0, pd683);
         };
SOURCE(37331, 46)
      {
         word pd684;
         pd684 = (* (( (ptr) (* (( (ptr) gf←c0912)+430)/* var←c85648 */  ))+23) );
         pattern←v18144 = (word) ( *( (fPt) ((*  (ptr) pd684 ))))(argStream←v18284, pd684);
         };
SOURCE(37379, 38)
      {
         word pd685;
         pd685 = (* (( (ptr) (* (( (ptr) gf←c0912)+430)/* var←c85648 */  ))+27) );
         offset←v18172 = (word) ( *( (fPt) ((*  (ptr) pd685 ))))(argStream←v18284, pd685);
         };
SOURCE(37419, 38)
      {
         word pd686;
         pd686 = (* (( (ptr) (* (( (ptr) gf←c0912)+430)/* var←c85648 */  ))+27) );
         length←v18200 = (word) ( *( (fPt) ((*  (ptr) pd686 ))))(argStream←v18284, pd686);
         };
SOURCE(37459, 74)
      {
         register word i←v18328 = 0;
         register word noName←c85712;
         noName←c85712 = (*  (ptr) pattern←v18144 );
         if ((i←v18328 >= noName←c85712)) {
            goto lab←L100059;
            };
         lab←L100062: ;
SOURCE(37493, 40)
         {
            word limit687;
            word x688;
            word x689;
            if ((0 != allZeroes←v18228)) {
               allZeroes←v18228 =  (unsigned) ((
                  x688 = (* ((( (ptr) pattern←v18144)+1)+(
                        limit687 = (*  (ptr) pattern←v18144 ),
                        BCK(i←v18328, limit687)
                        )) ),  *(float*)&x688
                  ) == (
                  x689 = (*  (ptr) &fc358 ),  *(float*)&x689
                  ));
               }
            else {
               allZeroes←v18228 =  (unsigned) 0;
               };
            };
         i←v18328 = (i←v18328 + 1);
         if ((i←v18328 < noName←c85712)) {
            goto lab←L100062;
            };
         lab←L100059: ;
         };
SOURCE(37544, 18)
      if ((0 != allZeroes←v18228)) {
SOURCE(37562, 16)
         return(3);
         };
SOURCE(37581, 48)
      (void) SetDashed←P2220((* (( (ptr) formal←c0913)+4) ), 1, pattern←v18144, offset←v18172, length←v18200);
      };
   return(0);
   }

static void SetDashed←P2220(ggData←v9460, formal←c01059, formal←c01060, formal←c01061, formal←c01062)
   word ggData←v9460;
   word formal←c01059;
   word formal←c01060;
   word formal←c01061;
   word formal←c01062;
   {
   W11 var←c91344;
   /* declaration of dashed←v9488 skipped */ 
   /* declaration of pattern←v9516 skipped */ 
   /* declaration of offset←v9544 skipped */ 
   /* declaration of length←v9572 skipped */ 
   register ptr gf←c91376 =  (ptr) &globalframe;
   /* declaration of var←c85744 skipped */ 
   /* declaration of currentEvent←v18400 skipped */ 
   (* (( (ptr) &var←c91344)+4)/* dashed←v9488 */  ) = formal←c01059;
   (* (( (ptr) &var←c91344)+5)/* pattern←v9516 */  ) = formal←c01060;
   (* (( (ptr) &var←c91344)+6)/* offset←v9544 */  ) = formal←c01061;
   (* (( (ptr) &var←c91344)+7)/* length←v9572 */  ) = formal←c01062;
   /* SetDashed: */ 
SOURCE(37812, 1086)
   {
      word tmpAddr690;
      tmpAddr690 = (word) (( (ptr) &var←c91344)+8)/* var←c85744 */ ;
      (*  (ptr) tmpAddr690 ) = ( ((word)  (fPt) DoDashes←P6324) );
      (* (( (ptr) tmpAddr690) + 1) ) = 1;
      };
SOURCE(38124, 26)
   (* (( (ptr) &var←c91344)+10)/* currentEvent←v18400 */  ) = 0;
SOURCE(38153, 745)
   {
      word pd691;
      pd691 = (* (( (ptr) (* (( (ptr) gf←c91376)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd691 ))))((* (( (ptr) ggData←v9460)+11) ), 0, pd691))) {
SOURCE(38205, 124)
         {
            word pd692;
            pd692 = (* (( (ptr) (* (( (ptr) gf←c91376)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd692 ))))((* (( (ptr) ggData←v9460)+3) ), 0, (* (( (ptr) gf←c91376)+93) ), (* (( (ptr) gf←c91376)+151)
                ), pd692);
            };
         }
      else {
SOURCE(38331, 89)
         {
            word pd693;
            pd693 = (* (( (ptr) (* (( (ptr) gf←c91376)+401)/* var←c81648 */  ))+4) );
            (* (( (ptr) &var←c91344)+10)/* currentEvent←v18400 */  ) = (word) ( *( (fPt) ((*  (ptr) pd693 ))))( ( (0 != (* (( (ptr) &var←c91344)+4)
               /* dashed←v9488 */  )) ? (* (( (ptr) gf←c91376)+152) ) : (* (( (ptr) gf←c91376)+153) ) ) , ggData←v9460, pd693);
            };
SOURCE(38422, 81)
         {
            word pd694;
            pd694 = (* (( (ptr) (* (( (ptr) gf←c91376)+404)/* var←c81744 */  ))+10) );
            (void) ( *( (fPt) ((*  (ptr) pd694 ))))(ggData←v9460, 0, 0, 0, 1, 0
               , 0, 0, 0, 0, pd694);
            };
SOURCE(38505, 69)
         {
            word var←c85776;
            word pd695;
            pd695 = (* (( (ptr) (* (( (ptr) gf←c91376)+402)/* var←c81680 */  ))+32) );
            var←c85776 = (word) ( *( (fPt) ((*  (ptr) pd695 ))))((* (( (ptr) ggData←v9460)+11) ), 1, (word) (( (bPt) &var←c91344)+32)
               /* var←c85744 */ , 0, 0, pd695);
            };
SOURCE(38576, 29)
         {
            word pd696;
            pd696 = (* (( (ptr) (* (( (ptr) gf←c91376)+401)/* var←c81648 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd696 ))))(ggData←v9460, pd696);
            };
SOURCE(38607, 141)
         {
            word var←c85808;
            var←c85808 = (word) GetDashesRope←P2700((* (( (ptr) &var←c91344)+4)/* dashed←v9488 */  ), (* (( (ptr) &var←c91344)+5)/* pattern←v9516 */  ), (* (
                  ( (ptr) &var←c91344)+6)/* offset←v9544 */  ), (* (( (ptr) &var←c91344)+7)/* length←v9572 */  ));
            {
               W2 var←c85840;
               var←c85840.f0 = 11;
               var←c85840.f1 = var←c85808;
               {
                  word pd697;
                  pd697 = (* (( (ptr) (* (( (ptr) gf←c91376)+395)/* var←c80976 */  ))+14) );
                  (void) ( *( (fPt) ((*  (ptr) pd697 ))))((* (( (ptr) ggData←v9460)+3) ), 0, (* (( (ptr) gf←c91376)+53) ), (* (( (ptr) gf←c91376)+154)
                      ), var←c85840, pd697);
                  };
               };
            };
SOURCE(38750, 148)
         {
            word pd698;
            pd698 = (* (( (ptr) (* (( (ptr) gf←c91376)+405)/* var←c81776 */  ))+4) );
            (void) ( *( (fPt) ((*  (ptr) pd698 ))))((* (( (ptr) gf←c91376)+26) ), ggData←v9460, 4, 1, 0, 0, pd698);
            };
         };
      };
   }

static word DoDashes←P6324(sliceD←v18476, formal←c91440)
   word sliceD←v18476;
   word formal←c91440;
   {
   register ptr gf←c91408 =  (ptr) &globalframe;
   word done←v18520;
   formal←c91440 = (formal←c91440 - 32);
   /* DoDashes: */ 
SOURCE(37950, 169)
SOURCE(37950, 169)
   done←v18520 = 0;
SOURCE(38024, 95)
   {
      word pd699;
      pd699 = (* (( (ptr) (* (( (ptr) gf←c91408)+418)/* var←c83152 */  ))+65) );
      (void) ( *( (fPt) ((*  (ptr) pd699 ))))((*  (ptr) sliceD←v18476 ), (* (( (ptr) sliceD←v18476)+1) ), (* (( (ptr) formal←c91440)+4)
          ), (* (( (ptr) formal←c91440)+5) ), (* (( (ptr) formal←c91440)+6) ), (* (( (ptr) formal←c91440)+7) )
         , (* (( (ptr) formal←c91440)+10) ), pd699);
      };
SOURCE(37950, 169)
   return(done←v18520);
   }

static void DashesOff←P2280(ggData←v33620, event←v33648)
   word ggData←v33620;
   word event←v33648;
   {
   /* DashesOff: */ 
SOURCE(38907, 60)
SOURCE(38943, 24)
   (void) SetDashed←P2220(ggData←v33620, 0, 0, (*  (ptr) &fc358 ), (*  (ptr) &fc573 ));
   }

static void GetSelectedDashPattern←P2340(formal←c0499, ggData←v9632)
   word formal←c0499;
   word ggData←v9632;
   {
   W11 var←c91472;
   register ptr gf←c91504 =  (ptr) &globalframe;
   /* declaration of dashed←v9676 skipped */ 
   /* declaration of pattern←v9704 skipped */ 
   /* declaration of offset←v9732 skipped */ 
   /* declaration of length←v9760 skipped */ 
   word success←v9788;
   /* declaration of var←c85872 skipped */ 
   word scene←v18576;
   /* declaration of found←v18604 skipped */ 
   /* GetSelectedDashPattern: */ 
SOURCE(38973, 1004)
   {
      word tmpAddr700;
      tmpAddr700 = (word) (( (ptr) &var←c91472)+8)/* var←c85872 */ ;
      (*  (ptr) tmpAddr700 ) = ( ((word)  (fPt) DoCheckStrokeValues←P6384) );
      (* (( (ptr) tmpAddr700) + 1) ) = 1;
      };
SOURCE(38973, 1004)
   (* (( (ptr) &var←c91472)+4)/* dashed←v9676 */  ) = 0;
SOURCE(38973, 1004)
   (* (( (ptr) &var←c91472)+5)/* pattern←v9704 */  ) = 0;
SOURCE(38973, 1004)
   (* (( (ptr) &var←c91472)+6)/* offset←v9732 */  ) = (*  (ptr) &fc358 );
SOURCE(38973, 1004)
   (* (( (ptr) &var←c91472)+7)/* length←v9760 */  ) = (*  (ptr) &fc358 );
SOURCE(38973, 1004)
   success←v9788 = 1;
SOURCE(39844, 27)
   scene←v18576 = (* (( (ptr) ggData←v9632)+11) );
SOURCE(39873, 19)
   (* (( (ptr) &var←c91472)+10)/* found←v18604 */  ) = 0;
SOURCE(39894, 83)
   {
      word pd701;
      pd701 = (* (( (ptr) (* (( (ptr) gf←c91504)+402)/* var←c81680 */  ))+32) );
      success←v9788 =  (unsigned) (0 == (word) ( *( (fPt) ((*  (ptr) pd701 ))))(scene←v18576, 0, (word) (( (bPt) &var←c91472)+32)
         /* var←c85872 */ , 0, 0, pd701));
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0499 ) = (* (( (ptr) &var←c91472)+4)/* dashed←v9676 */  );
   (* (( (ptr) formal←c0499)+1) ) = (* (( (ptr) &var←c91472)+5)/* pattern←v9704 */  );
   (* (( (ptr) formal←c0499)+2) ) = (* (( (ptr) &var←c91472)+6)/* offset←v9732 */  );
   (* (( (ptr) formal←c0499)+3) ) = (* (( (ptr) &var←c91472)+7)/* length←v9760 */  );
   (* (( (ptr) formal←c0499)+4) ) = success←v9788;
   return;
   }

static word DoCheckStrokeValues←P6384(sliceD←v18680, formal←c91568)
   word sliceD←v18680;
   word formal←c91568;
   {
   register ptr gf←c91536 =  (ptr) &globalframe;
   word done←v18724;
   word thisDashed←v18752 = 0;
   word thisOffset←v18780;
   word thisLength←v18808;
   word thisPattern←v18836 = 0;
   word isUnique←v18864 = 0;
   formal←c91568 = (formal←c91568 - 32);
   /* DoCheckStrokeValues: */ 
SOURCE(39129, 707)
SOURCE(39129, 707)
   done←v18724 = 0;
SOURCE(39323, 110)
   {
      W5 var←c85904;
      {
         word pd702;
         pd702 = (* (( (ptr) (* (( (ptr) gf←c91536)+418)/* var←c83152 */  ))+66) );
         (void) ( *( (fPt) ((*  (ptr) pd702 ))))((word) &var←c85904, (*  (ptr) sliceD←v18680 ), (* (( (ptr) sliceD←v18680)+1) ), pd702)
         ;
         };
      isUnique←v18864 = var←c85904.f4;
      thisLength←v18808 = var←c85904.f3;
      thisOffset←v18780 = var←c85904.f2;
      thisPattern←v18836 = var←c85904.f1;
      thisDashed←v18752 = var←c85904.f0;
      };
SOURCE(39435, 121)
   if ((0 == isUnique←v18864)) {
SOURCE(39458, 19)
      (* (( (ptr) formal←c91568)+4) ) = thisDashed←v18752;
SOURCE(39479, 19)
      (* (( (ptr) formal←c91568)+6) ) = thisOffset←v18780;
SOURCE(39500, 19)
      (* (( (ptr) formal←c91568)+7) ) = thisLength←v18808;
SOURCE(39521, 21)
      (* (( (ptr) formal←c91568)+5) ) = thisPattern←v18836;
SOURCE(39544, 12)
      return(1);
      };
SOURCE(39561, 275)
   if ((0 != (* (( (ptr) formal←c91568)+10) ))) {
SOURCE(39578, 149)
      {
         word x703;
         word x704;
         word x705;
         word x706;
         word pd707;
         if ((thisDashed←v18752 != (* (( (ptr) formal←c91568)+4) ))) {
            done←v18724 =  (unsigned) 1;
            }
         else {
            if ((0 != thisDashed←v18752)) {
               if (((
                  x703 = thisOffset←v18780,  *(float*)&x703
                  ) != (
                  x704 = (* (( (ptr) formal←c91568)+6) ),  *(float*)&x704
                  )) || ((
                  x705 = thisLength←v18808,  *(float*)&x705
                  ) != (
                  x706 = (* (( (ptr) formal←c91568)+7) ),  *(float*)&x706
                  ))) {
                  done←v18724 =  (unsigned) 1;
                  }
               else {
                  pd707 = (* (( (ptr) (* (( (ptr) gf←c91536)+410)/* var←c82224 */  ))+38) );
                  done←v18724 =  (unsigned) (0 == (word) ( *( (fPt) ((*  (ptr) pd707 ))))(thisPattern←v18836, (* (( (ptr) formal←c91568)+5)
                      ), pd707));
                  };
               }
            else {
               done←v18724 =  (unsigned) 0;
               };
            };
         };
      }
   else {
SOURCE(39738, 12)
      (* (( (ptr) formal←c91568)+10) ) = 1;
SOURCE(39752, 19)
      (* (( (ptr) formal←c91568)+4) ) = thisDashed←v18752;
SOURCE(39773, 19)
      (* (( (ptr) formal←c91568)+6) ) = thisOffset←v18780;
SOURCE(39794, 19)
      (* (( (ptr) formal←c91568)+7) ) = thisLength←v18808;
SOURCE(39815, 21)
      (* (( (ptr) formal←c91568)+5) ) = thisPattern←v18836;
      };
SOURCE(39129, 707)
   return(done←v18724);
   }

static void GetSelectedStrokeWidth←P2400(formal←c0515, ggData←v9848)
   word formal←c0515;
   word ggData←v9848;
   {
   W8 var←c91600;
   register ptr gf←c91632 =  (ptr) &globalframe;
   /* declaration of strokeWidth←v9892 skipped */ 
   word success←v9920;
   /* declaration of var←c85936 skipped */ 
   word scene←v18936;
   /* declaration of found←v18964 skipped */ 
   /* GetSelectedStrokeWidth: */ 
SOURCE(39983, 594)
   {
      word tmpAddr708;
      tmpAddr708 = (word) (( (ptr) &var←c91600)+5)/* var←c85936 */ ;
      (*  (ptr) tmpAddr708 ) = ( ((word)  (fPt) DoCheckWidth←P6444) );
      (* (( (ptr) tmpAddr708) + 1) ) = 1;
      };
SOURCE(39983, 594)
   var←c91600.f4/* strokeWidth←v9892 */  = (*  (ptr) &fc709 );
SOURCE(39983, 594)
   success←v9920 = 1;
SOURCE(40451, 27)
   scene←v18936 = (* (( (ptr) ggData←v9848)+11) );
SOURCE(40480, 19)
   var←c91600.f7/* found←v18964 */  = 0;
SOURCE(40501, 76)
   {
      word pd710;
      pd710 = (* (( (ptr) (* (( (ptr) gf←c91632)+402)/* var←c81680 */  ))+32) );
      success←v9920 =  (unsigned) (0 == (word) ( *( (fPt) ((*  (ptr) pd710 ))))(scene←v18936, 0, (word) (( (bPt) &var←c91600)+20)
         /* var←c85936 */ , 0, 0, pd710));
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0515 ) = var←c91600.f4/* strokeWidth←v9892 */ ;
   (* (( (ptr) formal←c0515)+1) ) = success←v9920;
   return;
   }

static word DoCheckWidth←P6444(sliceD←v19040, formal←c91696)
   word sliceD←v19040;
   word formal←c91696;
   {
   register ptr gf←c91664 =  (ptr) &globalframe;
   word done←v19084;
   word thisWidth←v19112;
   word isUnique←v19140 = 0;
   formal←c91696 = (formal←c91696 - 20);
   /* DoCheckWidth: */ 
SOURCE(40090, 353)
SOURCE(40090, 353)
   done←v19084 = 0;
SOURCE(40209, 77)
   {
      W2 var←c85968;
      {
         word pd711;
         pd711 = (* (( (ptr) (* (( (ptr) gf←c91664)+418)/* var←c83152 */  ))+54) );
         (void) ( *( (fPt) ((*  (ptr) pd711 ))))((word) &var←c85968, (*  (ptr) sliceD←v19040 ), (* (( (ptr) sliceD←v19040)+1) ), pd711)
         ;
         };
      isUnique←v19140 = var←c85968.f1;
      thisWidth←v19112 = var←c85968.f0;
      };
SOURCE(40288, 60)
   if ((0 == isUnique←v19140)) {
SOURCE(40311, 23)
      (* (( (ptr) formal←c91696)+4) ) = thisWidth←v19112;
SOURCE(40336, 12)
      return(1);
      };
SOURCE(40353, 90)
   if ((0 != (* (( (ptr) formal←c91696)+7) ))) {
SOURCE(40368, 36)
      {
         word x712;
         word x713;
         done←v19084 =  (unsigned) ((
            x712 = thisWidth←v19112,  *(float*)&x712
            ) != (
            x713 = (* (( (ptr) formal←c91696)+4) ),  *(float*)&x713
            ));
         };
      }
   else {
SOURCE(40406, 12)
      (* (( (ptr) formal←c91696)+7) ) = 1;
SOURCE(40420, 23)
      (* (( (ptr) formal←c91696)+4) ) = thisWidth←v19112;
      };
SOURCE(40090, 353)
   return(done←v19084);
   }

static void GetSelectedStrokeEnd←P2460(formal←c0528, ggData←v9980)
   word formal←c0528;
   word ggData←v9980;
   {
   W8 var←c91728;
   register ptr gf←c91760 =  (ptr) &globalframe;
   /* declaration of strokeEnd←v10024 skipped */ 
   word success←v10052;
   /* declaration of var←c86000 skipped */ 
   word scene←v19212;
   /* declaration of found←v19240 skipped */ 
   /* GetSelectedStrokeEnd: */ 
SOURCE(40583, 580)
   {
      word tmpAddr714;
      tmpAddr714 = (word) (( (ptr) &var←c91728)+5)/* var←c86000 */ ;
      (*  (ptr) tmpAddr714 ) = ( ((word)  (fPt) DoCheckEnd←P6504) );
      (* (( (ptr) tmpAddr714) + 1) ) = 1;
      };
SOURCE(40583, 580)
   var←c91728.f4/* strokeEnd←v10024 */  = 0;
SOURCE(40583, 580)
   success←v10052 = 1;
SOURCE(41039, 27)
   scene←v19212 = (* (( (ptr) ggData←v9980)+11) );
SOURCE(41068, 19)
   var←c91728.f7/* found←v19240 */  = 0;
SOURCE(41089, 74)
   {
      word pd715;
      pd715 = (* (( (ptr) (* (( (ptr) gf←c91760)+402)/* var←c81680 */  ))+32) );
      success←v10052 =  (unsigned) (0 == (word) ( *( (fPt) ((*  (ptr) pd715 ))))(scene←v19212, 0, (word) (( (bPt) &var←c91728)+20)
         /* var←c86000 */ , 0, 0, pd715));
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0528 ) = var←c91728.f4/* strokeEnd←v10024 */ ;
   (* (( (ptr) formal←c0528)+1) ) = success←v10052;
   return;
   }

static word DoCheckEnd←P6504(sliceD←v19316, formal←c91824)
   word sliceD←v19316;
   word formal←c91824;
   {
   register ptr gf←c91792 =  (ptr) &globalframe;
   word done←v19360;
   word thisEnd←v19388;
   word isUnique←v19416 = 0;
   formal←c91824 = (formal←c91824 - 20);
   /* DoCheckEnd: */ 
SOURCE(40693, 338)
SOURCE(40693, 338)
   done←v19360 = 0;
SOURCE(40813, 73)
   {
      W2 var←c86032;
      {
         word pd716;
         pd716 = (* (( (ptr) (* (( (ptr) gf←c91792)+418)/* var←c83152 */  ))+56) );
         (void) ( *( (fPt) ((*  (ptr) pd716 ))))((word) &var←c86032, (*  (ptr) sliceD←v19316 ), (* (( (ptr) sliceD←v19316)+1) ), pd716)
         ;
         };
      isUnique←v19416 = var←c86032.f1;
      thisEnd←v19388 = var←c86032.f0;
      };
SOURCE(40888, 56)
   if ((0 == isUnique←v19416)) {
SOURCE(40911, 19)
      (* (( (ptr) formal←c91824)+4) ) = thisEnd←v19388;
SOURCE(40932, 12)
      return(1);
      };
SOURCE(40949, 82)
   if ((0 != (* (( (ptr) formal←c91824)+7) ))) {
SOURCE(40964, 32)
      done←v19360 =  (unsigned) (thisEnd←v19388 != (* (( (ptr) formal←c91824)+4) ));
      }
   else {
SOURCE(40998, 12)
      (* (( (ptr) formal←c91824)+7) ) = 1;
SOURCE(41012, 19)
      (* (( (ptr) formal←c91824)+4) ) = thisEnd←v19388;
      };
SOURCE(40693, 338)
   return(done←v19360);
   }

static void GetSelectedStrokeJoint←P2520(formal←c0541, ggData←v10112)
   word formal←c0541;
   word ggData←v10112;
   {
   W8 var←c91856;
   register ptr gf←c91888 =  (ptr) &globalframe;
   /* declaration of strokeJoint←v10156 skipped */ 
   word success←v10184;
   /* declaration of var←c86064 skipped */ 
   word scene←v19488;
   /* declaration of found←v19516 skipped */ 
   /* GetSelectedStrokeJoint: */ 
SOURCE(41169, 609)
   {
      word tmpAddr717;
      tmpAddr717 = (word) (( (ptr) &var←c91856)+5)/* var←c86064 */ ;
      (*  (ptr) tmpAddr717 ) = ( ((word)  (fPt) DoCheckJoint←P6564) );
      (* (( (ptr) tmpAddr717) + 1) ) = 1;
      };
SOURCE(41169, 609)
   var←c91856.f4/* strokeJoint←v10156 */  = 1;
SOURCE(41169, 609)
   success←v10184 = 1;
SOURCE(41652, 27)
   scene←v19488 = (* (( (ptr) ggData←v10112)+11) );
SOURCE(41681, 19)
   var←c91856.f7/* found←v19516 */  = 0;
SOURCE(41702, 76)
   {
      word pd718;
      pd718 = (* (( (ptr) (* (( (ptr) gf←c91888)+402)/* var←c81680 */  ))+32) );
      success←v10184 =  (unsigned) (0 == (word) ( *( (fPt) ((*  (ptr) pd718 ))))(scene←v19488, 0, (word) (( (bPt) &var←c91856)+20)
         /* var←c86064 */ , 0, 0, pd718));
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0541 ) = var←c91856.f4/* strokeJoint←v10156 */ ;
   (* (( (ptr) formal←c0541)+1) ) = success←v10184;
   return;
   }

static word DoCheckJoint←P6564(sliceD←v19592, formal←c91952)
   word sliceD←v19592;
   word formal←c91952;
   {
   register ptr gf←c91920 =  (ptr) &globalframe;
   word done←v19636;
   word thisJoint←v19664;
   word isUnique←v19692 = 0;
   formal←c91952 = (formal←c91952 - 20);
   /* DoCheckJoint: */ 
SOURCE(41284, 360)
SOURCE(41284, 360)
   done←v19636 = 0;
SOURCE(41410, 77)
   {
      W2 var←c86096;
      {
         word pd719;
         pd719 = (* (( (ptr) (* (( (ptr) gf←c91920)+418)/* var←c83152 */  ))+58) );
         (void) ( *( (fPt) ((*  (ptr) pd719 ))))((word) &var←c86096, (*  (ptr) sliceD←v19592 ), (* (( (ptr) sliceD←v19592)+1) ), pd719)
         ;
         };
      isUnique←v19692 = var←c86096.f1;
      thisJoint←v19664 = var←c86096.f0;
      };
SOURCE(41489, 60)
   if ((0 == isUnique←v19692)) {
SOURCE(41512, 23)
      (* (( (ptr) formal←c91952)+4) ) = thisJoint←v19664;
SOURCE(41537, 12)
      return(1);
      };
SOURCE(41554, 90)
   if ((0 != (* (( (ptr) formal←c91952)+7) ))) {
SOURCE(41569, 36)
      done←v19636 =  (unsigned) (thisJoint←v19664 != (* (( (ptr) formal←c91952)+4) ));
      }
   else {
SOURCE(41607, 12)
      (* (( (ptr) formal←c91952)+7) ) = 1;
SOURCE(41621, 23)
      (* (( (ptr) formal←c91952)+4) ) = thisJoint←v19664;
      };
SOURCE(41284, 360)
   return(done←v19636);
   }

static void PrintStrokeValues←P2580(ggData←v33772, event←v33800)
   word ggData←v33772;
   word event←v33800;
   {
   register ptr gf←c91984 =  (ptr) &globalframe;
   /* PrintStrokeValues: */ 
SOURCE(41784, 1167)
SOURCE(41828, 1123)
   {
      word pd720;
      pd720 = (* (( (ptr) (* (( (ptr) gf←c91984)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd720 ))))((* (( (ptr) ggData←v33772)+11) ), 0, pd720))) {
SOURCE(41880, 134)
         {
            word pd721;
            pd721 = (* (( (ptr) (* (( (ptr) gf←c91984)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd721 ))))((* (( (ptr) ggData←v33772)+3) ), 0, (* (( (ptr) gf←c91984)+93) ), (* (( (ptr) gf←c91984)+155)
                ), pd721);
            };
         }
      else {
SOURCE(42014, 937)
SOURCE(42016, 20)
         {
            word dashed←v19736 = 0;
            word pattern←v19764 = 0;
            word offset←v19792;
            word length←v19820;
            word strokeWidth←v19848;
            word strokeJoint←v19876;
            word strokeEnd←v19904;
            word success←v19932 = 1;
SOURCE(42169, 55)
            {
               W2 var←c86128;
               (void) GetSelectedStrokeWidth←P2400((word) &var←c86128, ggData←v33772);
               success←v19932 = var←c86128.f1;
               strokeWidth←v19848 = var←c86128.f0;
               };
SOURCE(42226, 20)
            if ((0 == success←v19932)) {
SOURCE(42246, 14)
               goto lab←L100068;
               };
SOURCE(42262, 51)
            {
               W2 var←c86160;
               (void) GetSelectedStrokeEnd←P2460((word) &var←c86160, ggData←v33772);
               success←v19932 = var←c86160.f1;
               strokeEnd←v19904 = var←c86160.f0;
               };
SOURCE(42315, 20)
            if ((0 == success←v19932)) {
SOURCE(42335, 14)
               goto lab←L100068;
               };
SOURCE(42351, 55)
            {
               W2 var←c86192;
               (void) GetSelectedStrokeJoint←P2520((word) &var←c86192, ggData←v33772);
               success←v19932 = var←c86192.f1;
               strokeJoint←v19876 = var←c86192.f0;
               };
SOURCE(42408, 20)
            if ((0 == success←v19932)) {
SOURCE(42428, 14)
               goto lab←L100068;
               };
SOURCE(42444, 75)
            {
               W5 var←c86224;
               (void) GetSelectedDashPattern←P2340((word) &var←c86224, ggData←v33772);
               success←v19932 = var←c86224.f4;
               length←v19820 = var←c86224.f3;
               offset←v19792 = var←c86224.f2;
               pattern←v19764 = var←c86224.f1;
               dashed←v19736 = var←c86224.f0;
               };
SOURCE(42521, 20)
            if ((0 == success←v19932)) {
SOURCE(42541, 14)
               goto lab←L100068;
               };
SOURCE(42558, 253)
            {
               word var←c86256;
               {
                  word var←c86288;
                  word var←c86320;
                  var←c86288 = XR←NewObject(12, (* (( (ptr) gf←c91984)+22) ));
                  var←c86320 = var←c86288;
                  (*  (ptr) var←c86320 ) = 8;
                  (* (( (ptr) var←c86320)+1) ) = strokeWidth←v19848;
                  (* (( (ptr) var←c86320)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c91984)+22) ));
                  var←c86320 = (* (( (ptr) var←c86320)+2) );
                  (*  (ptr) var←c86320 ) = 11;
                  (* (( (ptr) var←c86320)+1) ) = (word) GetEndRope←P2760(strokeEnd←v19904);
                  (* (( (ptr) var←c86320)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c91984)+22) ));
                  var←c86320 = (* (( (ptr) var←c86320)+2) );
                  (*  (ptr) var←c86320 ) = 11;
                  (* (( (ptr) var←c86320)+1) ) = (word) GetJointRope←P2820(strokeJoint←v19876);
                  (* (( (ptr) var←c86320)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c91984)+22) ));
                  var←c86320 = (* (( (ptr) var←c86320)+2) );
                  (*  (ptr) var←c86320 ) = 11;
                  (* (( (ptr) var←c86320)+1) ) = (word) GetDashesRope←P2700(dashed←v19736, pattern←v19764, offset←v19792, length←v19820);
                  var←c86256 = var←c86288;
                  };
               {
                  word pd722;
                  pd722 = (* (( (ptr) (* (( (ptr) gf←c91984)+395)/* var←c80976 */  ))+13) );
                  (void) ( *( (fPt) ((*  (ptr) pd722 ))))((* (( (ptr) ggData←v33772)+3) ), 0, (* (( (ptr) gf←c91984)+113) ), (* (( (ptr) gf←c91984)+156)
                      ), var←c86256, pd722);
                  };
               };
            };
         goto lab←L100069;
         lab←L100068: ;
SOURCE(42833, 116)
         {
            word pd723;
            pd723 = (* (( (ptr) (* (( (ptr) gf←c91984)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd723 ))))((* (( (ptr) ggData←v33772)+3) ), 0, (* (( (ptr) gf←c91984)+93) ), (* (( (ptr) gf←c91984)+158)
                ), pd723);
            };
         lab←L100069: ;
         };
      };
   }

static void CopyStrokeValues←P2640(ggData←v33860, event←v33888)
   word ggData←v33860;
   word event←v33888;
   {
   W15 var←c92016;
   register ptr gf←c92048 =  (ptr) &globalframe;
   /* declaration of var←c86448 skipped */ 
   word scene←v19976;
   /* declaration of lastDesc←v20004 skipped */ 
   word count←v20032;
   /* CopyStrokeValues: */ 
SOURCE(42958, 2411)
   {
      word tmpAddr724;
      tmpAddr724 = (word) (( (ptr) &var←c92016)+4)/* var←c86448 */ ;
      (*  (ptr) tmpAddr724 ) = ( ((word)  (fPt) DoCopyStroke←P6720) );
      (* (( (ptr) tmpAddr724) + 1) ) = 1;
      };
SOURCE(43001, 27)
   scene←v19976 = (* (( (ptr) ggData←v33860)+11) );
SOURCE(43030, 60)
   {
      word pd725;
      pd725 = (* (( (ptr) (* (( (ptr) gf←c92048)+406)/* var←c81840 */  ))+21) );
      (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ) = (word) ( *( (fPt) ((*  (ptr) pd725 ))))(scene←v19976, pd725);
      };
SOURCE(43092, 61)
   {
      word pd726;
      word idx727;
      pd726 = (* (( (ptr) (* (( (ptr) gf←c92048)+402)/* var←c81680 */  ))+36) );
      count←v20032 = (
         idx727 = (word) ( *( (fPt) ((*  (ptr) pd726 ))))(scene←v19976, 1, 0, 0, pd726),
         SGNCK(idx727)
         );
      };
SOURCE(43155, 2214)
   if (( (int)count←v20032 <  (int)2) || ((* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ) == 0)) {
SOURCE(43187, 149)
      {
         word pd728;
         pd728 = (* (( (ptr) (* (( (ptr) gf←c92048)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd728 ))))((* (( (ptr) ggData←v33860)+3) ), 0, (* (( (ptr) gf←c92048)+93) ), (* (( (ptr) gf←c92048)+159)
             ), pd728);
         };
      }
   else {
SOURCE(43336, 2033)
SOURCE(43338, 20)
      {
         /* declaration of dashed←v20104 skipped */ 
         /* declaration of pattern←v20132 skipped */ 
         /* declaration of offset←v20160 skipped */ 
         /* declaration of length←v20188 skipped */ 
         /* declaration of width←v20216 skipped */ 
         /* declaration of end←v20244 skipped */ 
         /* declaration of joint←v20272 skipped */ 
         word success←v20300 = 0;
         /* declaration of currentEvent←v20328 skipped */ 
SOURCE(43830, 20)
         (* (( (ptr) &var←c92016)+7)/* dashed←v20104 */  ) = 0;
SOURCE(43852, 23)
         (* (( (ptr) &var←c92016)+8)/* pattern←v20132 */  ) = 0;
SOURCE(43965, 26)
         (* (( (ptr) &var←c92016)+14)/* currentEvent←v20328 */  ) = 0;
SOURCE(43994, 76)
         {
            W2 var←c86480;
            {
               word pd729;
               pd729 = (* (( (ptr) (* (( (ptr) gf←c92048)+418)/* var←c83152 */  ))+54) );
               (void) ( *( (fPt) ((*  (ptr) pd729 ))))((word) &var←c86480, (*  (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ) ), (* (
                     ( (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ))+1) ), pd729);
               };
            success←v20300 = var←c86480.f1;
            (* (( (ptr) &var←c92016)+11)/* width←v20216 */  ) = var←c86480.f0;
            };
SOURCE(44072, 20)
         if ((0 == success←v20300)) {
SOURCE(44092, 14)
            goto lab←L100070;
            };
SOURCE(44108, 72)
         {
            W2 var←c86512;
            {
               word pd730;
               pd730 = (* (( (ptr) (* (( (ptr) gf←c92048)+418)/* var←c83152 */  ))+56) );
               (void) ( *( (fPt) ((*  (ptr) pd730 ))))((word) &var←c86512, (*  (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ) ), (* (
                     ( (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ))+1) ), pd730);
               };
            success←v20300 = var←c86512.f1;
            (* (( (ptr) &var←c92016)+12)/* end←v20244 */  ) = var←c86512.f0;
            };
SOURCE(44182, 20)
         if ((0 == success←v20300)) {
SOURCE(44202, 14)
            goto lab←L100070;
            };
SOURCE(44218, 76)
         {
            W2 var←c86544;
            {
               word pd731;
               pd731 = (* (( (ptr) (* (( (ptr) gf←c92048)+418)/* var←c83152 */  ))+58) );
               (void) ( *( (fPt) ((*  (ptr) pd731 ))))((word) &var←c86544, (*  (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ) ), (* (
                     ( (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ))+1) ), pd731);
               };
            success←v20300 = var←c86544.f1;
            (* (( (ptr) &var←c92016)+13)/* joint←v20272 */  ) = var←c86544.f0;
            };
SOURCE(44296, 20)
         if ((0 == success←v20300)) {
SOURCE(44316, 14)
            goto lab←L100070;
            };
SOURCE(44332, 97)
         {
            W5 var←c86576;
            {
               word pd732;
               pd732 = (* (( (ptr) (* (( (ptr) gf←c92048)+418)/* var←c83152 */  ))+66) );
               (void) ( *( (fPt) ((*  (ptr) pd732 ))))((word) &var←c86576, (*  (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ) ), (* (
                     ( (ptr) (* (( (ptr) &var←c92016)+6)/* lastDesc←v20004 */  ))+1) ), pd732);
               };
            success←v20300 = var←c86576.f4;
            (* (( (ptr) &var←c92016)+10)/* length←v20188 */  ) = var←c86576.f3;
            (* (( (ptr) &var←c92016)+9)/* offset←v20160 */  ) = var←c86576.f2;
            (* (( (ptr) &var←c92016)+8)/* pattern←v20132 */  ) = var←c86576.f1;
            (* (( (ptr) &var←c92016)+7)/* dashed←v20104 */  ) = var←c86576.f0;
            };
SOURCE(44431, 20)
         if ((0 == success←v20300)) {
SOURCE(44451, 14)
            goto lab←L100070;
            };
SOURCE(44467, 65)
         {
            word pd733;
            pd733 = (* (( (ptr) (* (( (ptr) gf←c92048)+401)/* var←c81648 */  ))+4) );
            (* (( (ptr) &var←c92016)+14)/* currentEvent←v20328 */  ) = (word) ( *( (fPt) ((*  (ptr) pd733 ))))((* (( (ptr) gf←c92048)+160)
                ), ggData←v33860, pd733);
            };
SOURCE(44534, 81)
         {
            word pd734;
            pd734 = (* (( (ptr) (* (( (ptr) gf←c92048)+404)/* var←c81744 */  ))+10) );
            (void) ( *( (fPt) ((*  (ptr) pd734 ))))(ggData←v33860, 0, 0, 0, 1, 0
               , 0, 0, 0, 0, pd734);
            };
SOURCE(44617, 66)
         {
            word var←c86608;
            word pd735;
            pd735 = (* (( (ptr) (* (( (ptr) gf←c92048)+402)/* var←c81680 */  ))+32) );
            var←c86608 = (word) ( *( (fPt) ((*  (ptr) pd735 ))))(scene←v19976, 1, (word) (( (bPt) &var←c92016)+16)/* var←c86448 */ , 0, 0, pd735)
            ;
            };
SOURCE(44685, 88)
         {
            word var←c86640;
            {
               word pd736;
               pd736 = (* (( (ptr) (* (( (ptr) gf←c92048)+402)/* var←c81680 */  ))+45) );
               var←c86640 = (word) ( *( (fPt) ((*  (ptr) pd736 ))))((* (( (ptr) ggData←v33860)+11) ), 0, 0, pd736);
               };
            {
               word pd737;
               pd737 = (* (( (ptr) (* (( (ptr) gf←c92048)+404)/* var←c81744 */  ))+11) );
               (void) ( *( (fPt) ((*  (ptr) pd737 ))))(ggData←v33860, var←c86640, 0, pd737);
               };
            };
SOURCE(44775, 29)
         {
            word pd738;
            pd738 = (* (( (ptr) (* (( (ptr) gf←c92048)+401)/* var←c81648 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd738 ))))(ggData←v33860, pd738);
            };
SOURCE(44806, 239)
         {
            word var←c86672;
            {
               word var←c86704;
               word var←c86736;
               var←c86704 = XR←NewObject(12, (* (( (ptr) gf←c92048)+22) ));
               var←c86736 = var←c86704;
               (*  (ptr) var←c86736 ) = 8;
               (* (( (ptr) var←c86736)+1) ) = (* (( (ptr) &var←c92016)+11)/* width←v20216 */  );
               (* (( (ptr) var←c86736)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c92048)+22) ));
               var←c86736 = (* (( (ptr) var←c86736)+2) );
               (*  (ptr) var←c86736 ) = 11;
               (* (( (ptr) var←c86736)+1) ) = (word) GetEndRope←P2760((* ((( (ptr) &var←c92016)+12)/* end←v20244 */ ) ));
               (* (( (ptr) var←c86736)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c92048)+22) ));
               var←c86736 = (* (( (ptr) var←c86736)+2) );
               (*  (ptr) var←c86736 ) = 11;
               (* (( (ptr) var←c86736)+1) ) = (word) GetJointRope←P2820((* ((( (ptr) &var←c92016)+13)/* joint←v20272 */ ) ));
               (* (( (ptr) var←c86736)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c92048)+22) ));
               var←c86736 = (* (( (ptr) var←c86736)+2) );
               (*  (ptr) var←c86736 ) = 11;
               (* (( (ptr) var←c86736)+1) ) = (word) GetDashesRope←P2700((* (( (ptr) &var←c92016)+7)/* dashed←v20104 */  ), (* (( (ptr) &var←c92016)+8)
                  /* pattern←v20132 */  ), (* (( (ptr) &var←c92016)+9)/* offset←v20160 */  ), (* (( (ptr) &var←c92016)+10)/* length←v20188 */  ))
               ;
               var←c86672 = var←c86704;
               };
            {
               word pd739;
               pd739 = (* (( (ptr) (* (( (ptr) gf←c92048)+395)/* var←c80976 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd739 ))))((* (( (ptr) ggData←v33860)+3) ), 0, (* (( (ptr) gf←c92048)+53) ), (* (( (ptr) gf←c92048)+161)
                   ), var←c86672, pd739);
               };
            };
SOURCE(45047, 148)
         {
            word pd740;
            pd740 = (* (( (ptr) (* (( (ptr) gf←c92048)+405)/* var←c81776 */  ))+4) );
            (void) ( *( (fPt) ((*  (ptr) pd740 ))))((* (( (ptr) gf←c92048)+26) ), ggData←v33860, 4, 1, 0, 0, pd740);
            };
         };
      goto lab←L100071;
      lab←L100070: ;
SOURCE(45216, 151)
      {
         word pd741;
         pd741 = (* (( (ptr) (* (( (ptr) gf←c92048)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd741 ))))((* (( (ptr) ggData←v33860)+3) ), 0, (* (( (ptr) gf←c92048)+93) ), (* (( (ptr) gf←c92048)+162)
             ), pd741);
         };
      lab←L100071: ;
      };
   }

static word DoCopyStroke←P6720(sliceD←v20404, formal←c92112)
   word sliceD←v20404;
   word formal←c92112;
   {
   register ptr gf←c92080 =  (ptr) &globalframe;
   word done←v20448;
   formal←c92112 = (formal←c92112 - 16);
   /* DoCopyStroke: */ 
SOURCE(43338, 20)
SOURCE(43338, 20)
   done←v20448 = 0;
SOURCE(43416, 406)
   if ((sliceD←v20404 != (* (( (ptr) formal←c92112)+6) ))) {
SOURCE(43442, 79)
      {
         word var←c86864;
         word pd742;
         pd742 = (* (( (ptr) (* (( (ptr) gf←c92080)+418)/* var←c83152 */  ))+53) );
         var←c86864 = (word) ( *( (fPt) ((*  (ptr) pd742 ))))((*  (ptr) sliceD←v20404 ), (* (( (ptr) sliceD←v20404)+1) ), (* (( (ptr) formal←c92112)+11)
             ), (* (( (ptr) formal←c92112)+14) ), pd742);
         };
SOURCE(43523, 70)
      {
         word pd743;
         pd743 = (* (( (ptr) (* (( (ptr) gf←c92080)+418)/* var←c83152 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd743 ))))((*  (ptr) sliceD←v20404 ), (* (( (ptr) sliceD←v20404)+1) ), (* (( (ptr) formal←c92112)+12)
             ), (* (( (ptr) formal←c92112)+14) ), pd743);
         };
SOURCE(43595, 74)
      {
         word pd744;
         pd744 = (* (( (ptr) (* (( (ptr) gf←c92080)+418)/* var←c83152 */  ))+57) );
         (void) ( *( (fPt) ((*  (ptr) pd744 ))))((*  (ptr) sliceD←v20404 ), (* (( (ptr) sliceD←v20404)+1) ), (* (( (ptr) formal←c92112)+13)
             ), (* (( (ptr) formal←c92112)+14) ), pd744);
         };
SOURCE(43671, 151)
      {
         word pd745;
         pd745 = (* (( (ptr) (* (( (ptr) gf←c92080)+418)/* var←c83152 */  ))+65) );
         (void) ( *( (fPt) ((*  (ptr) pd745 ))))((*  (ptr) sliceD←v20404 ), (* (( (ptr) sliceD←v20404)+1) ), (* (( (ptr) formal←c92112)+7)
             ), (* (( (ptr) formal←c92112)+8) ), (* (( (ptr) formal←c92112)+9) ), (* (( (ptr) formal←c92112)+10) )
            , (* (( (ptr) formal←c92112)+14) ), pd745);
         };
      };
SOURCE(43338, 20)
   return(done←v20448);
   }

static word GetDashesRope←P2700(dashed←v10244, pattern←v10272, offset←v10300, length←v10328)
   word dashed←v10244;
   word pattern←v10272;
   word offset←v10300;
   word length←v10328;
   {
   register ptr gf←c92144 =  (ptr) &globalframe;
   word r←v10372;
   word s←v20476 = 0;
   /* GetDashesRope: */ 
SOURCE(45376, 390)
SOURCE(45376, 390)
   r←v10372 = 0;
SOURCE(45499, 39)
   if ((0 == dashed←v10244)) {
SOURCE(45518, 20)
      return((* (( (ptr) gf←c92144)+163) ));
      };
SOURCE(45540, 12)
   {
      word pd746;
      pd746 = (* (( (ptr) (* (( (ptr) gf←c92144)+393)/* var←c80880 */  ))+34) );
      s←v20476 = (word) ( *( (fPt) ((*  (ptr) pd746 ))))(0, pd746);
      };
SOURCE(45554, 15)
   {
      word pd747;
      pd747 = (* (( (ptr) (* (( (ptr) gf←c92144)+393)/* var←c80880 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd747 ))))(s←v20476, 91, pd747);
      };
SOURCE(45587, 95)
   {
      register word index←v20520 = 0;
      register word noName←c86896;
      noName←c86896 = (*  (ptr) pattern←v10272 );
      if ((index←v20520 >= noName←c86896)) {
         goto lab←L100072;
         };
      lab←L100075: ;
SOURCE(45643, 39)
      {
         W2 var←c86928;
         var←c86928.f0 = 8;
         {
            word limit748;
            var←c86928.f1 = (* ((( (ptr) pattern←v10272)+1)+(
                  limit748 = (*  (ptr) pattern←v10272 ),
                  BCK(index←v20520, limit748)
                  )) );
            };
         {
            word pd749;
            pd749 = (* (( (ptr) (* (( (ptr) gf←c92144)+393)/* var←c80880 */  ))+61) );
            (void) ( *( (fPt) ((*  (ptr) pd749 ))))(s←v20476, (* (( (ptr) gf←c92144)+164) ), var←c86928, pd749);
            };
         };
      index←v20520 = (index←v20520 + 1);
      if ((index←v20520 < noName←c86896)) {
         goto lab←L100075;
         };
      lab←L100072: ;
      };
SOURCE(45693, 50)
   {
      W2 var←c86960;
      W2 var←c86992;
      W2 var←c0992;
      var←c86960.f0 = 8;
      var←c86960.f1 = offset←v10300;
      var←c86992.f0 = 8;
      var←c86992.f1 = length←v10328;
      (*  (ptr) (word) &var←c0992 ) = 0;
      (* (( (ptr) (word) &var←c0992) + 1) ) = 0;
      {
         word pd750;
         pd750 = (* (( (ptr) (* (( (ptr) gf←c92144)+393)/* var←c80880 */  ))+60) );
         (void) ( *( (fPt) ((*  (ptr) pd750 ))))(s←v20476, (* (( (ptr) gf←c92144)+165) ), var←c86960, var←c86992, var←c0992, pd750)
         ;
         };
      };
SOURCE(45745, 21)
   {
      word pd751;
      pd751 = (* (( (ptr) (* (( (ptr) gf←c92144)+393)/* var←c80880 */  ))+35) );
      r←v10372 = (word) ( *( (fPt) ((*  (ptr) pd751 ))))(s←v20476, 1, pd751);
      };
SOURCE(45376, 390)
   return(r←v10372);
   }

static word GetEndRope←P2760(strokeEnd←v10432)
   word strokeEnd←v10432;
   {
   register ptr gf←c92176 =  (ptr) &globalframe;
   word r←v10476;
   /* GetEndRope: */ 
SOURCE(45772, 164)
SOURCE(45772, 164)
   r←v10476 = 0;
SOURCE(45839, 97)
   {
      word var←c87056;
      var←c87056 = strokeEnd←v10432;
      switch (var←c87056) {
         case 2: 
            r←v10476 = (* (( (ptr) gf←c92176)+139) );
            break;
         case 1: 
            r←v10476 = (* (( (ptr) gf←c92176)+138) );
            break;
         case 0: 
            r←v10476 = (* (( (ptr) gf←c92176)+137) );
            break;
         default: 
            r←v10476 = (* (( (ptr) gf←c92176)+166) );
            break;
         };
      };
SOURCE(45772, 164)
   return(r←v10476);
   }

static word GetJointRope←P2820(jointEnd←v10536)
   word jointEnd←v10536;
   {
   register ptr gf←c92208 =  (ptr) &globalframe;
   word r←v10580;
   /* GetJointRope: */ 
SOURCE(45942, 166)
SOURCE(45942, 166)
   r←v10580 = 0;
SOURCE(46012, 96)
   {
      word var←c87088;
      var←c87088 = jointEnd←v10536;
      switch (var←c87088) {
         case 2: 
            r←v10580 = (* (( (ptr) gf←c92208)+139) );
            break;
         case 1: 
            r←v10580 = (* (( (ptr) gf←c92208)+146) );
            break;
         case 0: 
            r←v10580 = (* (( (ptr) gf←c92208)+145) );
            break;
         default: 
            r←v10580 = (* (( (ptr) gf←c92208)+166) );
            break;
         };
      };
SOURCE(45942, 166)
   return(r←v10580);
   }

static void SelectMatchingWidth←P2880(ggData←v33948, event←v33976)
   word ggData←v33948;
   word event←v33976;
   {
   W8 var←c92240;
   register ptr gf←c92272 =  (ptr) &globalframe;
   /* declaration of var←c87120 skipped */ 
   /* declaration of scene←v20564 skipped */ 
   /* declaration of width←v20592 skipped */ 
   /* SelectMatchingWidth: */ 
SOURCE(46114, 1221)
   {
      word tmpAddr752;
      tmpAddr752 = (word) (( (ptr) &var←c92240)+4)/* var←c87120 */ ;
      (*  (ptr) tmpAddr752 ) = ( ((word)  (fPt) DoSelectMatching←P6972) );
      (* (( (ptr) tmpAddr752) + 1) ) = 1;
      };
SOURCE(46160, 27)
   var←c92240.f6/* scene←v20564 */  = (* (( (ptr) ggData←v33948)+11) );
SOURCE(46189, 48)
   {
      word var←c87152;
      word var←c87184;
      var←c87152 = (*  (ptr) (* (( (ptr) event←v33976)+1) ) );
      if ((var←c87152 == 0)) {
         goto lab←L100076;
         };
      var←c87184 = XR←GetReferentType(var←c87152);
      if (((* (( (ptr) gf←c92272)+14) ) == var←c87184)) {
         {
            word real←v20636;
            real←v20636 = var←c87152;
            var←c92240.f7/* width←v20592 */  = (*  (ptr) real←v20636 );
            };
         }
      else {
         if (((* (( (ptr) gf←c92272)+23) ) == var←c87184)) {
            {
               word int←v20692;
               int←v20692 = var←c87152;
               {
                  float tf753;
                  var←c92240.f7/* width←v20592 */  = (
                     tf753 = (float)(int)(*  (ptr) int←v20692 ),  *(word*)&tf753
                     );
                  };
               };
            }
         else {
            lab←L100076: ;
            var←c92240.f7/* width←v20592 */  = 2139095039;
            };
         };
      };
SOURCE(46321, 1014)
   {
      word x754;
      word x755;
      word x756;
      word x757;
      word x758;
      word x759;
      if ((((
         x754 = var←c92240.f7/* width←v20592 */ ,  *(float*)&x754
         ) > (
         x755 = (*  (ptr) &fc532 ),  *(float*)&x755
         )) || ((
         x756 = var←c92240.f7/* width←v20592 */ ,  *(float*)&x756
         ) == (
         x757 = (*  (ptr) &fc636 ),  *(float*)&x757
         ))) || ((
         x758 = var←c92240.f7/* width←v20592 */ ,  *(float*)&x758
         ) < (
         x759 = (*  (ptr) &fc358 ),  *(float*)&x759
         ))) {
SOURCE(46381, 134)
         {
            word pd760;
            pd760 = (* (( (ptr) (* (( (ptr) gf←c92272)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd760 ))))((* (( (ptr) ggData←v33948)+3) ), 0, (* (( (ptr) gf←c92272)+93) ), (* (( (ptr) gf←c92272)+167)
                ), pd760);
            };
         }
      else {
SOURCE(46515, 822)
SOURCE(46882, 79)
         {
            word pd761;
            pd761 = (* (( (ptr) (* (( (ptr) gf←c92272)+404)/* var←c81744 */  ))+10) );
            (void) ( *( (fPt) ((*  (ptr) pd761 ))))(ggData←v33948, 0, 0, 0, 0, 0
               , 1, 0, 0, 0, pd761);
            };
SOURCE(46963, 35)
         {
            word pd762;
            pd762 = (* (( (ptr) (* (( (ptr) gf←c92272)+406)/* var←c81840 */  ))+13) );
            (void) ( *( (fPt) ((*  (ptr) pd762 ))))(var←c92240.f6/* scene←v20564 */ , 0, pd762);
            };
SOURCE(47000, 54)
         {
            word var←c87216;
            word pd763;
            pd763 = (* (( (ptr) (* (( (ptr) gf←c92272)+402)/* var←c81680 */  ))+31) );
            var←c87216 = (word) ( *( (fPt) ((*  (ptr) pd763 ))))(var←c92240.f6/* scene←v20564 */ , 1, (word) (( (bPt) &var←c92240)+16)
               /* var←c87120 */ , 0, pd763);
            };
SOURCE(47056, 117)
         {
            W2 var←c87248;
            var←c87248.f0 = 8;
            var←c87248.f1 = var←c92240.f7/* width←v20592 */ ;
            {
               word pd764;
               pd764 = (* (( (ptr) (* (( (ptr) gf←c92272)+395)/* var←c80976 */  ))+14) );
               (void) ( *( (fPt) ((*  (ptr) pd764 ))))((* (( (ptr) ggData←v33948)+3) ), 0, (* (( (ptr) gf←c92272)+53) ), (* (( (ptr) gf←c92272)+168)
                   ), var←c87248, pd764);
               };
            };
SOURCE(47175, 160)
         {
            word pd765;
            pd765 = (* (( (ptr) (* (( (ptr) gf←c92272)+405)/* var←c81776 */  ))+4) );
            (void) ( *( (fPt) ((*  (ptr) pd765 ))))((* (( (ptr) gf←c92272)+79) ), ggData←v33948, 4, 0, 1, 0, pd765);
            };
         };
      };
   }

static word DoSelectMatching←P6972(slice←v20852, formal←c92368)
   word slice←v20852;
   word formal←c92368;
   {
   W6 var←c92304;
   register ptr gf←c92336 =  (ptr) &globalframe;
   word done←v20896;
   /* declaration of var←c87280 skipped */ 
   word sliceD←v20952;
   formal←c92368 = (formal←c92368 - 16);
   var←c92304.f0 = formal←c92368;
   /* DoSelectMatching: */ 
SOURCE(46541, 24)
   {
      word tmpAddr766;
      tmpAddr766 = (word) (( (ptr) &var←c92304)+4)/* var←c87280 */ ;
      (*  (ptr) tmpAddr766 ) = ( ((word)  (fPt) WidthProc←P7032) );
      (* (( (ptr) tmpAddr766) + 1) ) = 1;
      };
SOURCE(46541, 24)
   done←v20896 = 0;
SOURCE(46710, 67)
   {
      word pd767;
      pd767 = (* (( (ptr) (* (( (ptr) gf←c92336)+418)/* var←c83152 */  ))+40) );
      sliceD←v20952 = (word) ( *( (fPt) ((*  (ptr) pd767 ))))(slice←v20852, (word) (( (bPt) &var←c92304)+16)/* var←c87280 */ , pd767)
      ;
      };
SOURCE(46817, 43)
   {
      word pd768;
      pd768 = (* (( (ptr) (* (( (ptr) gf←c92336)+406)/* var←c81840 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd768 ))))(sliceD←v20952, (* (( (ptr) formal←c92368)+6) ), 0, pd768);
      };
SOURCE(46541, 24)
   return(done←v20896);
   }

static word WidthProc←P7032(seg←v68948, transform←v68976, formal←c92400)
   word seg←v68948;
   word transform←v68976;
   word formal←c92400;
   {
   word keep←v69020;
   formal←c92400 = (formal←c92400 - 16);
   /* WidthProc: */ 
SOURCE(46612, 22)
SOURCE(46637, 68)
   {
      word tc769;
      word x770;
      word x771;
      float tf772;
      word x773;
      word x774;
      word x776;
      if (((
         x770 = (* (( (ptr) seg←v68948)+2) ),  *(float*)&x770
         ) == (
         x771 = (* (( (ptr) (*  (ptr) formal←c92400 ))+7) ),  *(float*)&x771
         ))) {
         tc769 =  (word)  (unsigned) 1;
         }
      else {
         tc769 =  (word)  (unsigned) (FABS(((
               x773 = (* (( (ptr) seg←v68948)+2) ),  *(float*)&x773
               ) - (
               x774 = (* (( (ptr) (*  (ptr) formal←c92400 ))+7) ),  *(float*)&x774
               )), tf772) < (
            x776 = (*  (ptr) &fc775 ),  *(float*)&x776
            ));
         };
      return(tc769);
      };
   }

static void SelectMatchingDashes←P2940(formal←c01063, formal←c01064)
   word formal←c01063;
   word formal←c01064;
   {
   W11 var←c92432;
   /* declaration of ggData←v34036 skipped */ 
   /* declaration of event←v34064 skipped */ 
   register ptr gf←c92464 =  (ptr) &globalframe;
   /* declaration of var←c87312 skipped */ 
   (* (( (ptr) &var←c92432)+4)/* ggData←v34036 */  ) = formal←c01063;
   (* (( (ptr) &var←c92432)+5)/* event←v34064 */  ) = formal←c01064;
   /* SelectMatchingDashes: */ 
SOURCE(47344, 1629)
   {
      word tmpAddr777;
      tmpAddr777 = (word) (( (ptr) &var←c92432)+6)/* var←c87312 */ ;
      (*  (ptr) tmpAddr777 ) = ( ((word)  (fPt) DoSelectMatching←P7140) );
      (* (( (ptr) tmpAddr777) + 1) ) = 1;
      };
SOURCE(47389, 1584)
SOURCE(47391, 1426)
   {
      /* declaration of pattern←v21136 skipped */ 
      /* declaration of offset←v21164 skipped */ 
      /* declaration of length←v21192 skipped */ 
      word var←c06;
      {
         word var←c0993;
         var←c0993 = (word) &var←c92432;
         var←c06 = (word) XR←Enable(( ((word)  (fPt) NoName←Q8820) ), ( ((word)  (fPt) NoName←Q8880) ), var←c0993);
         };
      if ((var←c06 == 4)) {
         goto lab←L100077;
         };
      };
   goto lab←L100081;
   lab←L100077: ;
SOURCE(48840, 131)
   {
      word pd778;
      pd778 = (* (( (ptr) (* (( (ptr) gf←c92464)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd778 ))))((* (( (ptr) (* (( (ptr) &var←c92432)+4)/* ggData←v34036 */  ))+3) ), 0, (* (( (ptr) gf←c92464)+93)
          ), (* (( (ptr) gf←c92464)+170) ), pd778);
      };
   lab←L100081: ;
   }

static word NoName←Q8820(formal←c0942)
   word formal←c0942;
   {
   register ptr gf←c0941 =  (ptr) &globalframe;
SOURCE(47441, 24)
   {
      word scene←v21024;
      word argRope←v21052;
      word argStream←v21080;
      word dashed←v21108 = 0;
SOURCE(48030, 27)
      scene←v21024 = (* (( (ptr) (* (( (ptr) formal←c0942)+4) ))+11) );
SOURCE(48059, 45)
      argRope←v21052 = XR←Narrow((*  (ptr) (* (( (ptr) (* (( (ptr) formal←c0942)+5) ))+1) ) ), (* (( (ptr) gf←c0941)+20) ));
      if ((argRope←v21052 == 0)) {
         goto lab←L100080;
         };
      if (( (unsigned) (*(int*)argRope←v21052<0) == 0)) {
         goto lab←L100080;
         };
      (void) XR←RaiseError(XR←NarrowFault, 0);
      lab←L100080: ;
SOURCE(48106, 38)
      {
         word pd779;
         pd779 = (* (( (ptr) (* (( (ptr) gf←c0941)+393)/* var←c80880 */  ))+33) );
         argStream←v21080 = (word) ( *( (fPt) ((*  (ptr) pd779 ))))(argRope←v21052, 0, pd779);
         };
SOURCE(48168, 23)
      (* (( (ptr) formal←c0942)+8) ) = 0;
SOURCE(48216, 46)
      {
         word pd780;
         pd780 = (* (( (ptr) (* (( (ptr) gf←c0941)+430)/* var←c85648 */  ))+23) );
         (* (( (ptr) formal←c0942)+8) ) = (word) ( *( (fPt) ((*  (ptr) pd780 ))))(argStream←v21080, pd780);
         };
SOURCE(48264, 38)
      {
         word pd781;
         pd781 = (* (( (ptr) (* (( (ptr) gf←c0941)+430)/* var←c85648 */  ))+27) );
         (* (( (ptr) formal←c0942)+9) ) = (word) ( *( (fPt) ((*  (ptr) pd781 ))))(argStream←v21080, pd781);
         };
SOURCE(48304, 38)
      {
         word pd782;
         pd782 = (* (( (ptr) (* (( (ptr) gf←c0941)+430)/* var←c85648 */  ))+27) );
         (* (( (ptr) formal←c0942)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd782 ))))(argStream←v21080, pd782);
         };
SOURCE(48344, 79)
      {
         word pd783;
         pd783 = (* (( (ptr) (* (( (ptr) gf←c0941)+404)/* var←c81744 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd783 ))))((* (( (ptr) formal←c0942)+4) ), 0, 0, 0, 0, 0
            , 1, 0, 0, 0, pd783);
         };
SOURCE(48425, 42)
      {
         word pd784;
         pd784 = (* (( (ptr) (* (( (ptr) gf←c0941)+406)/* var←c81840 */  ))+13) );
         (void) ( *( (fPt) ((*  (ptr) pd784 ))))((* (( (ptr) (* (( (ptr) formal←c0942)+4) ))+11) ), 0, pd784);
         };
SOURCE(48469, 61)
      {
         word var←c87376;
         word pd785;
         pd785 = (* (( (ptr) (* (( (ptr) gf←c0941)+402)/* var←c81680 */  ))+31) );
         var←c87376 = (word) ( *( (fPt) ((*  (ptr) pd785 ))))((* (( (ptr) (* (( (ptr) formal←c0942)+4) ))+11) ), 1, (word) (( (bPt) formal←c0942)+24)
            , 0, pd785);
         };
SOURCE(48532, 123)
      {
         W2 var←c87408;
         var←c87408.f0 = 11;
         var←c87408.f1 = argRope←v21052;
         {
            word pd786;
            pd786 = (* (( (ptr) (* (( (ptr) gf←c0941)+395)/* var←c80976 */  ))+14) );
            (void) ( *( (fPt) ((*  (ptr) pd786 ))))((* (( (ptr) (* (( (ptr) formal←c0942)+4) ))+3) ), 0, (* (( (ptr) gf←c0941)+53) ), (* (
                  ( (ptr) gf←c0941)+169) ), var←c87408, pd786);
            };
         };
SOURCE(48657, 160)
      {
         word pd787;
         pd787 = (* (( (ptr) (* (( (ptr) gf←c0941)+405)/* var←c81776 */  ))+4) );
         (void) ( *( (fPt) ((*  (ptr) pd787 ))))((* (( (ptr) gf←c0941)+79) ), (* (( (ptr) formal←c0942)+4) ), 4, 0, 1, 0, pd787);
         };
      };
   return(0);
   }

static word DoSelectMatching←P7140(slice←v21268, formal←c92560)
   word slice←v21268;
   word formal←c92560;
   {
   W6 var←c92496;
   register ptr gf←c92528 =  (ptr) &globalframe;
   word done←v21312;
   /* declaration of var←c87440 skipped */ 
   word sliceD←v21368;
   formal←c92560 = (formal←c92560 - 24);
   var←c92496.f0 = formal←c92560;
   /* DoSelectMatching: */ 
SOURCE(47441, 24)
   {
      word tmpAddr788;
      tmpAddr788 = (word) (( (ptr) &var←c92496)+4)/* var←c87440 */ ;
      (*  (ptr) tmpAddr788 ) = ( ((word)  (fPt) DashProc←P7200) );
      (* (( (ptr) tmpAddr788) + 1) ) = 1;
      };
SOURCE(47441, 24)
   done←v21312 = 0;
SOURCE(47852, 66)
   {
      word pd789;
      pd789 = (* (( (ptr) (* (( (ptr) gf←c92528)+418)/* var←c83152 */  ))+40) );
      sliceD←v21368 = (word) ( *( (fPt) ((*  (ptr) pd789 ))))(slice←v21268, (word) (( (bPt) &var←c92496)+16)/* var←c87440 */ , pd789)
      ;
      };
SOURCE(47958, 50)
   {
      word pd790;
      pd790 = (* (( (ptr) (* (( (ptr) gf←c92528)+406)/* var←c81840 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd790 ))))(sliceD←v21368, (* (( (ptr) (* (( (ptr) formal←c92560)+4) ))+11) ), 0, pd790);
      };
SOURCE(47441, 24)
   return(done←v21312);
   }

static word DashProc←P7200(seg←v69572, transform←v69600, formal←c92592)
   word seg←v69572;
   word transform←v69600;
   word formal←c92592;
   {
   word keep←v69644;
   formal←c92592 = (formal←c92592 - 16);
   /* DashProc: */ 
SOURCE(47512, 21)
SOURCE(47535, 12)
   keep←v69644 = 0;
SOURCE(47549, 297)
   {
      word x791;
      word x792;
      word x793;
      word x794;
      if ( (  (  ( (0 != (* (( (ptr) seg←v69572)+4) )) ? ((*  (ptr) (* (( (ptr) seg←v69572)+5) ) ) == (*  (ptr) (* (( (ptr) (*  (ptr) formal←c92592 ))+8)
       ) )) : 0 )  ? ((
         x791 = (* (( (ptr) seg←v69572)+6) ),  *(float*)&x791
         ) == (
         x792 = (* (( (ptr) (*  (ptr) formal←c92592 ))+9) ),  *(float*)&x792
         )) : 0 )  ? ((
         x793 = (* (( (ptr) seg←v69572)+7) ),  *(float*)&x793
         ) == (
         x794 = (* (( (ptr) (*  (ptr) formal←c92592 ))+10) ),  *(float*)&x794
         )) : 0 ) ) {
SOURCE(47644, 202)
SOURCE(47646, 98)
         {
            register word index←v21412 = 0;
            register word noName←c87472;
            word var←c87504;
            word var←c0994;
            noName←c87472 = (*  (ptr) (* (( (ptr) (*  (ptr) formal←c92592 ))+8) ) );
            if ((index←v21412 >= noName←c87472)) {
               goto lab←L100083;
               };
            lab←L100086: ;
SOURCE(47702, 42)
            {
               word x796;
               word limit797;
               word x798;
               var←c87504 = (* (( (ptr) seg←v69572)+5) );
               {
                  word limit795;
                  var←c0994 = (* ((( (ptr) var←c87504)+1)+(
                        limit795 = (*  (ptr) var←c87504 ),
                        BCK(index←v21412, limit795)
                        )) );
                  };
               if (((
                  x796 = var←c0994,  *(float*)&x796
                  ) != (
                  x798 = (* ((( (ptr) (* (( (ptr) (*  (ptr) formal←c92592 ))+8) ))+1)+(
                        limit797 = (*  (ptr) (* (( (ptr) (*  (ptr) formal←c92592 ))+8) ) ),
                        BCK(index←v21412, limit797)
                        )) ),  *(float*)&x798
                  ))) {
SOURCE(47744, 13)
                  goto lab←L100082;
                  };
               };
            index←v21412 = (index←v21412 + 1);
            if ((index←v21412 < noName←c87472)) {
               goto lab←L100086;
               };
            lab←L100083: ;
            };
SOURCE(47768, 12)
         return(1);
         /* c2c skipped dead code */ 
         lab←L100082: ;
         };
      };
SOURCE(47512, 21)
   return(keep←v69644);
   }

static void SetDefaultStrokeValues←P3000(ggData←v34124, event←v34152)
   word ggData←v34124;
   word event←v34152;
   {
   register ptr gf←c92624 =  (ptr) &globalframe;
   /* SetDefaultStrokeValues: */ 
SOURCE(48977, 1288)
SOURCE(49026, 1239)
   {
      word pd799;
      pd799 = (* (( (ptr) (* (( (ptr) gf←c92624)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd799 ))))((* (( (ptr) ggData←v34124)+11) ), 0, pd799))) {
SOURCE(49078, 134)
         {
            word pd800;
            pd800 = (* (( (ptr) (* (( (ptr) gf←c92624)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd800 ))))((* (( (ptr) ggData←v34124)+3) ), 0, (* (( (ptr) gf←c92624)+93) ), (* (( (ptr) gf←c92624)+171)
                ), pd800);
            };
         }
      else {
SOURCE(49212, 1053)
SOURCE(49214, 20)
         {
            word dashed←v21456 = 0;
            word pattern←v21484 = 0;
            word offset←v21512;
            word length←v21540;
            word strokeWidth←v21568;
            word strokeJoint←v21596;
            word strokeEnd←v21624;
            word success←v21652 = 0;
SOURCE(49368, 75)
            {
               W5 var←c87536;
               (void) GetSelectedDashPattern←P2340((word) &var←c87536, ggData←v34124);
               success←v21652 = var←c87536.f4;
               length←v21540 = var←c87536.f3;
               offset←v21512 = var←c87536.f2;
               pattern←v21484 = var←c87536.f1;
               dashed←v21456 = var←c87536.f0;
               };
SOURCE(49445, 20)
            if ((0 == success←v21652)) {
SOURCE(49465, 14)
               goto lab←L100088;
               };
SOURCE(49481, 55)
            {
               W2 var←c87568;
               (void) GetSelectedStrokeWidth←P2400((word) &var←c87568, ggData←v34124);
               success←v21652 = var←c87568.f1;
               strokeWidth←v21568 = var←c87568.f0;
               };
SOURCE(49538, 20)
            if ((0 == success←v21652)) {
SOURCE(49558, 14)
               goto lab←L100088;
               };
SOURCE(49574, 55)
            {
               W2 var←c87600;
               (void) GetSelectedStrokeJoint←P2520((word) &var←c87600, ggData←v34124);
               success←v21652 = var←c87600.f1;
               strokeJoint←v21596 = var←c87600.f0;
               };
SOURCE(49631, 20)
            if ((0 == success←v21652)) {
SOURCE(49651, 14)
               goto lab←L100088;
               };
SOURCE(49667, 51)
            {
               W2 var←c87632;
               (void) GetSelectedStrokeEnd←P2460((word) &var←c87632, ggData←v34124);
               success←v21652 = var←c87632.f1;
               strokeEnd←v21624 = var←c87632.f0;
               };
SOURCE(49720, 20)
            if ((0 == success←v21652)) {
SOURCE(49740, 14)
               goto lab←L100088;
               };
SOURCE(49756, 290)
            {
               word var←c87664;
               {
                  word pd801;
                  pd801 = (* (( (ptr) (* (( (ptr) gf←c92624)+410)/* var←c82224 */  ))+37) );
                  var←c87664 = (word) ( *( (fPt) ((*  (ptr) pd801 ))))(pattern←v21484, pd801);
                  };
               {
                  word var←c87728;
                  word var←c87792;
                  word var←c87856;
                  word var←c87888;
                  var←c87728 = (* (( (ptr) (* (( (ptr) ggData←v34124)+30) ))+7) );
                  var←c87792 = (* (( (ptr) (* (( (ptr) ggData←v34124)+30) ))+8) );
                  var←c87856 = (* (( (ptr) (* (( (ptr) ggData←v34124)+30) ))+9) );
                  var←c87888 = (* (( (ptr) ggData←v34124)+30) );
                  (*  (ptr) var←c87888 ) = strokeWidth←v21568;
                  (* (( (ptr) var←c87888)+1) ) = strokeJoint←v21596;
                  (* (( (ptr) var←c87888)+2) ) = strokeEnd←v21624;
                  (* (( (ptr) var←c87888)+3) ) = dashed←v21456;
                  (* (( (ptr) var←c87888)+4) ) = var←c87664;
                  (* (( (ptr) var←c87888)+5) ) = offset←v21512;
                  (* (( (ptr) var←c87888)+6) ) = length←v21540;
                  (* (( (ptr) var←c87888)+7) ) = var←c87728;
                  (* (( (ptr) var←c87888)+8) ) = var←c87792;
                  (* (( (ptr) var←c87888)+9) ) = var←c87856;
                  (* (( (ptr) var←c87888)+10) ) = 0;
                  (* (( (ptr) var←c87888)+11) ) = 0;
                  (* (( (ptr) var←c87888)+12) ) = (*  (ptr) &fc802 );
                  (* (( (ptr) var←c87888)+13) ) = (*  (ptr) &fc802 );
                  (* (( (ptr) var←c87888)+14) ) = 0;
                  };
               };
SOURCE(50048, 38)
            (void) ShowDefaultStrokeValues←P3060(ggData←v34124, event←v34152);
            };
         goto lab←L100089;
         lab←L100088: ;
SOURCE(50107, 156)
         {
            word pd803;
            pd803 = (* (( (ptr) (* (( (ptr) gf←c92624)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd803 ))))((* (( (ptr) ggData←v34124)+3) ), 0, (* (( (ptr) gf←c92624)+93) ), (* (( (ptr) gf←c92624)+174)
                ), pd803);
            };
         lab←L100089: ;
         };
      };
   }

static void ShowDefaultStrokeValues←P3060(ggData←v34212, event←v34240)
   word ggData←v34212;
   word event←v34240;
   {
   register ptr gf←c92656 =  (ptr) &globalframe;
   /* ShowDefaultStrokeValues: */ 
SOURCE(50272, 423)
SOURCE(50322, 373)
   {
      word var←c87920;
      {
         word var←c87952;
         word var←c87984;
         var←c87952 = XR←NewObject(12, (* (( (ptr) gf←c92656)+22) ));
         var←c87984 = var←c87952;
         (*  (ptr) var←c87984 ) = 8;
         (* (( (ptr) var←c87984)+1) ) = (*  (ptr) (* (( (ptr) ggData←v34212)+30) ) );
         (* (( (ptr) var←c87984)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c92656)+22) ));
         var←c87984 = (* (( (ptr) var←c87984)+2) );
         (*  (ptr) var←c87984 ) = 11;
         (* (( (ptr) var←c87984)+1) ) = (word) GetEndRope←P2760((* ((( (ptr) (* (( (ptr) ggData←v34212)+30) ))+2)) ));
         (* (( (ptr) var←c87984)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c92656)+22) ));
         var←c87984 = (* (( (ptr) var←c87984)+2) );
         (*  (ptr) var←c87984 ) = 11;
         (* (( (ptr) var←c87984)+1) ) = (word) GetJointRope←P2820((* ((( (ptr) (* (( (ptr) ggData←v34212)+30) ))+1)) ));
         (* (( (ptr) var←c87984)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c92656)+22) ));
         var←c87984 = (* (( (ptr) var←c87984)+2) );
         (*  (ptr) var←c87984 ) = 11;
         (* (( (ptr) var←c87984)+1) ) = (word) GetDashesRope←P2700((* (( (ptr) (* (( (ptr) ggData←v34212)+30) ))+3) ), (* (( (ptr) (* (
                  ( (ptr) ggData←v34212)+30) ))+4) ), (* (( (ptr) (* (( (ptr) ggData←v34212)+30) ))+5) ), (* (( (ptr) (* (( (ptr) ggData←v34212)+30)
                ))+6) ));
         var←c87920 = var←c87952;
         };
      {
         word pd804;
         pd804 = (* (( (ptr) (* (( (ptr) gf←c92656)+395)/* var←c80976 */  ))+13) );
         (void) ( *( (fPt) ((*  (ptr) pd804 ))))((* (( (ptr) ggData←v34212)+3) ), 0, (* (( (ptr) gf←c92656)+113) ), (* (( (ptr) gf←c92656)+175)
             ), var←c87920, pd804);
         };
      };
   }

static void Arrows←P3120(ggData←v34300, event←v34328)
   word ggData←v34300;
   word event←v34328;
   {
   W9 var←c92688;
   register ptr gf←c92720 =  (ptr) &globalframe;
   /* declaration of var←c88112 skipped */ 
   /* Arrows: */ 
SOURCE(50701, 1965)
   {
      word tmpAddr805;
      tmpAddr805 = (word) (( (ptr) &var←c92688)+4)/* var←c88112 */ ;
      (*  (ptr) tmpAddr805 ) = ( ((word)  (fPt) DoArrows←P7404) );
      (* (( (ptr) tmpAddr805) + 1) ) = 1;
      };
SOURCE(50734, 1932)
   {
      word pd806;
      pd806 = (* (( (ptr) (* (( (ptr) gf←c92720)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd806 ))))((* (( (ptr) ggData←v34300)+11) ), 0, pd806))) {
SOURCE(50786, 107)
         {
            word pd807;
            pd807 = (* (( (ptr) (* (( (ptr) gf←c92720)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd807 ))))((* (( (ptr) ggData←v34300)+3) ), 0, (* (( (ptr) gf←c92720)+93) ), (* (( (ptr) gf←c92720)+176)
                ), pd807);
            };
         }
      else {
SOURCE(50893, 1775)
         {
            /* declaration of currentEvent←v21724 skipped */ 
            /* declaration of leftArrows←v21752 skipped */ 
            /* declaration of rightArrows←v21780 skipped */ 
            word arrowType←v21808;
SOURCE(51421, 26)
            (* (( (ptr) &var←c92688)+6)/* currentEvent←v21724 */  ) = 0;
SOURCE(51449, 37)
            (* (( (ptr) &var←c92688)+7)/* leftArrows←v21752 */  ) = 0;
            (* (( (ptr) &var←c92688)+8)/* rightArrows←v21780 */  ) = 0;
SOURCE(51488, 51)
            arrowType←v21808 = (*  (ptr) XR←Narrow((*  (ptr) (* (( (ptr) event←v34328)+1) ) ), (* (( (ptr) gf←c92720)+23) )) );
SOURCE(51541, 739)
            {
               word var←c88144;
               var←c88144 = arrowType←v21808;
               switch (var←c88144) {
                  case 0: 
SOURCE(51570, 92)
                     {
                        word pd808;
                        pd808 = (* (( (ptr) (* (( (ptr) gf←c92720)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd808 ))))((* (( (ptr) ggData←v34300)+3) ), 0, (* (( (ptr) gf←c92720)+53) ), (* (( (ptr) gf←c92720)+177)
                            ), pd808);
                        };
SOURCE(51664, 18)
                     (* (( (ptr) &var←c92688)+7)/* leftArrows←v21752 */  ) = 0;
SOURCE(51684, 19)
                     (* (( (ptr) &var←c92688)+8)/* rightArrows←v21780 */  ) = 0;
                     break;
                  case 1: 
SOURCE(51715, 99)
                     {
                        word pd809;
                        pd809 = (* (( (ptr) (* (( (ptr) gf←c92720)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd809 ))))((* (( (ptr) ggData←v34300)+3) ), 0, (* (( (ptr) gf←c92720)+53) ), (* (( (ptr) gf←c92720)+178)
                            ), pd809);
                        };
SOURCE(51816, 17)
                     (* (( (ptr) &var←c92688)+7)/* leftArrows←v21752 */  ) = 1;
SOURCE(51835, 19)
                     (* (( (ptr) &var←c92688)+8)/* rightArrows←v21780 */  ) = 0;
                     break;
                  case 2: 
SOURCE(51866, 98)
                     {
                        word pd810;
                        pd810 = (* (( (ptr) (* (( (ptr) gf←c92720)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd810 ))))((* (( (ptr) ggData←v34300)+3) ), 0, (* (( (ptr) gf←c92720)+53) ), (* (( (ptr) gf←c92720)+179)
                            ), pd810);
                        };
SOURCE(51966, 18)
                     (* (( (ptr) &var←c92688)+7)/* leftArrows←v21752 */  ) = 0;
SOURCE(51986, 18)
                     (* (( (ptr) &var←c92688)+8)/* rightArrows←v21780 */  ) = 1;
                     break;
                  case 3: 
SOURCE(52016, 102)
                     {
                        word pd811;
                        pd811 = (* (( (ptr) (* (( (ptr) gf←c92720)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd811 ))))((* (( (ptr) ggData←v34300)+3) ), 0, (* (( (ptr) gf←c92720)+53) ), (* (( (ptr) gf←c92720)+180)
                            ), pd811);
                        };
SOURCE(52120, 17)
                     (* (( (ptr) &var←c92688)+7)/* leftArrows←v21752 */  ) = 1;
SOURCE(52139, 18)
                     (* (( (ptr) &var←c92688)+8)/* rightArrows←v21780 */  ) = 1;
                     break;
                  default: 
SOURCE(52175, 97)
                     {
                        word pd812;
                        pd812 = (* (( (ptr) (* (( (ptr) gf←c92720)+395)/* var←c80976 */  ))+12) );
                        (void) ( *( (fPt) ((*  (ptr) pd812 ))))((* (( (ptr) ggData←v34300)+3) ), 0, (* (( (ptr) gf←c92720)+53) ), (* (( (ptr) gf←c92720)+181)
                            ), pd812);
                        };
SOURCE(52274, 6)
                     return;
                  };
               };
SOURCE(52285, 57)
            {
               word pd813;
               pd813 = (* (( (ptr) (* (( (ptr) gf←c92720)+401)/* var←c81648 */  ))+4) );
               (* (( (ptr) &var←c92688)+6)/* currentEvent←v21724 */  ) = (word) ( *( (fPt) ((*  (ptr) pd813 ))))((* (( (ptr) gf←c92720)+182)
                   ), ggData←v34300, pd813);
               };
SOURCE(52344, 76)
            {
               word var←c88176;
               word pd814;
               pd814 = (* (( (ptr) (* (( (ptr) gf←c92720)+402)/* var←c81680 */  ))+32) );
               var←c88176 = (word) ( *( (fPt) ((*  (ptr) pd814 ))))((* (( (ptr) ggData←v34300)+11) ), 1, (word) (( (bPt) &var←c92688)+16)
                  /* var←c88112 */ , 0, (* (( (ptr) gf←c92720)+183) ), pd814);
               };
SOURCE(52422, 29)
            {
               word pd815;
               pd815 = (* (( (ptr) (* (( (ptr) gf←c92720)+401)/* var←c81648 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd815 ))))(ggData←v34300, pd815);
               };
SOURCE(52453, 72)
            {
               word pd816;
               pd816 = (* (( (ptr) (* (( (ptr) gf←c92720)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd816 ))))((* (( (ptr) ggData←v34300)+3) ), 0, (* (( (ptr) gf←c92720)+53) ), (* (( (ptr) gf←c92720)+184)
                   ), pd816);
               };
SOURCE(52527, 139)
            {
               word pd817;
               pd817 = (* (( (ptr) (* (( (ptr) gf←c92720)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd817 ))))((* (( (ptr) gf←c92720)+64) ), ggData←v34300, 4, 1, 0, 0, pd817);
               };
            };
         };
      };
   }

static word DoArrows←P7404(sliceD←v21884, formal←c92784)
   word sliceD←v21884;
   word formal←c92784;
   {
   register ptr gf←c92752 =  (ptr) &globalframe;
   word done←v21928;
   word loIsLeft←v21968 = 0;
   W2 loPoint←v21996;
   W2 hiPoint←v22024;
   formal←c92784 = (formal←c92784 - 16);
   /* DoArrows: */ 
SOURCE(50895, 16)
SOURCE(50895, 16)
   done←v21928 = 0;
SOURCE(50993, 54)
   {
      word pd818;
      pd818 = (* (( (ptr) (* (( (ptr) gf←c92752)+425)/* var←c84784 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd818 ))))((word) &loPoint←v21996, (*  (ptr) sliceD←v21884 ), 0, pd818);
      };
SOURCE(51049, 50)
   {
      word pd819;
      pd819 = (* (( (ptr) (* (( (ptr) gf←c92752)+425)/* var←c84784 */  ))+35) );
      (void) ( *( (fPt) ((*  (ptr) pd819 ))))((word) &hiPoint←v22024, (*  (ptr) sliceD←v21884 ), pd819);
      };
SOURCE(51101, 133)
   {
      word x820;
      word x821;
      word x822;
      word x823;
      word x824;
      word x825;
      if (((
         x820 = loPoint←v21996.f0,  *(float*)&x820
         ) < (
         x821 = hiPoint←v22024.f0,  *(float*)&x821
         ))) {
         loIsLeft←v21968 = 1;
         }
      else {
         if ( ( ((
            x822 = loPoint←v21996.f0,  *(float*)&x822
            ) == (
            x823 = hiPoint←v22024.f0,  *(float*)&x823
            )) ? ((
            x824 = loPoint←v21996.f1,  *(float*)&x824
            ) <= (
            x825 = hiPoint←v22024.f1,  *(float*)&x825
            )) : 0 ) ) {
            loIsLeft←v21968 = 1;
            }
         else {
            loIsLeft←v21968 = 0;
            };
         };
      };
SOURCE(51236, 179)
   if ((0 != loIsLeft←v21968)) {
SOURCE(51253, 84)
      {
         word pd826;
         pd826 = (* (( (ptr) (* (( (ptr) gf←c92752)+418)/* var←c83152 */  ))+63) );
         (void) ( *( (fPt) ((*  (ptr) pd826 ))))((*  (ptr) sliceD←v21884 ), 0, (* (( (ptr) formal←c92784)+7) ), (* (( (ptr) formal←c92784)+8)
             ), (* (( (ptr) formal←c92784)+6) ), pd826);
         };
      }
   else {
SOURCE(51337, 78)
      {
         word pd827;
         pd827 = (* (( (ptr) (* (( (ptr) gf←c92752)+418)/* var←c83152 */  ))+63) );
         (void) ( *( (fPt) ((*  (ptr) pd827 ))))((*  (ptr) sliceD←v21884 ), 0, (* (( (ptr) formal←c92784)+8) ), (* (( (ptr) formal←c92784)+7)
             ), (* (( (ptr) formal←c92784)+6) ), pd827);
         };
      };
SOURCE(50895, 16)
   return(done←v21928);
   }

static void SelectAll←P3180(ggData←v34388, event←v34416)
   word ggData←v34388;
   word event←v34416;
   {
   register ptr gf←c92816 =  (ptr) &globalframe;
   /* SelectAll: */ 
SOURCE(52675, 472)
SOURCE(52704, 41)
   {
      word pd828;
      pd828 = (* (( (ptr) (* (( (ptr) gf←c92816)+431)/* var←c88208 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd828 ))))((* (( (ptr) gf←c92816)+185) ), (* (( (ptr) gf←c92816)+186) ), pd828);
      };
SOURCE(52747, 40)
   {
      word pd829;
      pd829 = (* (( (ptr) (* (( (ptr) gf←c92816)+406)/* var←c81840 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd829 ))))((* (( (ptr) ggData←v34388)+11) ), 0, pd829);
      };
SOURCE(52789, 34)
   {
      word pd830;
      pd830 = (* (( (ptr) (* (( (ptr) gf←c92816)+407)/* var←c82032 */  ))+36) );
      (void) ( *( (fPt) ((*  (ptr) pd830 ))))(ggData←v34388, 0, pd830);
      };
SOURCE(52825, 30)
   {
      word pd831;
      pd831 = (* (( (ptr) (* (( (ptr) gf←c92816)+404)/* var←c81744 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd831 ))))(ggData←v34388, pd831);
      };
SOURCE(52857, 160)
   {
      word pd832;
      pd832 = (* (( (ptr) (* (( (ptr) gf←c92816)+405)/* var←c81776 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd832 ))))((* (( (ptr) gf←c92816)+79) ), ggData←v34388, 4, 0, 1, 0, pd832);
      };
SOURCE(53019, 40)
   {
      word pd833;
      pd833 = (* (( (ptr) (* (( (ptr) gf←c92816)+431)/* var←c88208 */  ))+14) );
      (void) ( *( (fPt) ((*  (ptr) pd833 ))))((* (( (ptr) gf←c92816)+185) ), (* (( (ptr) gf←c92816)+186) ), pd833);
      };
SOURCE(53061, 86)
   {
      word pd834;
      pd834 = (* (( (ptr) (* (( (ptr) gf←c92816)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd834 ))))((* (( (ptr) ggData←v34388)+3) ), 0, (* (( (ptr) gf←c92816)+53) ), (* (( (ptr) gf←c92816)+187)
          ), pd834);
      };
   }

static void DeselectAll←P3240(ggData←v34476, event←v34504)
   word ggData←v34476;
   word event←v34504;
   {
   register ptr gf←c92848 =  (ptr) &globalframe;
   /* DeselectAll: */ 
SOURCE(53154, 444)
SOURCE(53185, 79)
   {
      word pd835;
      pd835 = (* (( (ptr) (* (( (ptr) gf←c92848)+404)/* var←c81744 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd835 ))))(ggData←v34476, 0, 0, 0, 0, 0
         , 1, 0, 0, 0, pd835);
      };
SOURCE(53266, 42)
   {
      word pd836;
      pd836 = (* (( (ptr) (* (( (ptr) gf←c92848)+406)/* var←c81840 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd836 ))))((* (( (ptr) ggData←v34476)+11) ), 0, pd836);
      };
SOURCE(53310, 34)
   {
      word pd837;
      pd837 = (* (( (ptr) (* (( (ptr) gf←c92848)+407)/* var←c82032 */  ))+36) );
      (void) ( *( (fPt) ((*  (ptr) pd837 ))))(ggData←v34476, 0, pd837);
      };
SOURCE(53346, 160)
   {
      word pd838;
      pd838 = (* (( (ptr) (* (( (ptr) gf←c92848)+405)/* var←c81776 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd838 ))))((* (( (ptr) gf←c92848)+79) ), ggData←v34476, 4, 0, 1, 0, pd838);
      };
SOURCE(53508, 90)
   {
      word pd839;
      pd839 = (* (( (ptr) (* (( (ptr) gf←c92848)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd839 ))))((* (( (ptr) ggData←v34476)+3) ), 0, (* (( (ptr) gf←c92848)+53) ), (* (( (ptr) gf←c92848)+188)
          ), pd839);
      };
   }

static void CycleSelection←P3300(ggData←v34564, event←v34592)
   word ggData←v34564;
   word event←v34592;
   {
   register ptr gf←c92880 =  (ptr) &globalframe;
   W2 point←v22068;
   W2 normal←v22096;
   word feature←v22124 = 0;
   word hitData←v22152 = 0;
   word featureCycler←v22180;
   word direction←v22208;
   /* CycleSelection: */ 
SOURCE(53604, 683)
SOURCE(53704, 65)
   {
      word pd840;
      pd840 = (* (( (ptr) (* (( (ptr) gf←c92880)+400)/* var←c81616 */  ))+108) );
      featureCycler←v22180 = (word) ( *( (fPt) ((*  (ptr) pd840 ))))(ggData←v34564, pd840);
      };
SOURCE(53771, 42)
   direction←v22208 = XR←Narrow((*  (ptr) (* (( (ptr) event←v34592)+1) ) ), (* (( (ptr) gf←c92880)+7) ));
SOURCE(53815, 144)
   if ((featureCycler←v22180 == 0)) {
SOURCE(53843, 108)
      {
         word pd841;
         pd841 = (* (( (ptr) (* (( (ptr) gf←c92880)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd841 ))))((* (( (ptr) ggData←v34564)+3) ), 0, (* (( (ptr) gf←c92880)+93) ), (* (( (ptr) gf←c92880)+189)
             ), pd841);
         };
SOURCE(53953, 6)
      return;
      };
SOURCE(53964, 207)
   {
      word var←c88240;
      var←c88240 = direction←v22208;
      if ((var←c88240 == (* (( (ptr) gf←c92880)+190) ))) {
SOURCE(53998, 77)
         {
            W6 var←c88304;
            {
               word pd842;
               pd842 = (* (( (ptr) (* (( (ptr) gf←c92880)+432)/* var←c88272 */  ))+14) );
               (void) ( *( (fPt) ((*  (ptr) pd842 ))))((word) &var←c88304, featureCycler←v22180, pd842);
               };
            hitData←v22152 = var←c88304.f5;
            feature←v22124 = var←c88304.f4;
            normal←v22096 = (*  (W2Pt) (( (ptr) &var←c88304)+2) );
            point←v22068 = (*  (W2Pt) &var←c88304 );
            };
         }
      else {
         if ((var←c88240 == (* (( (ptr) gf←c92880)+191) ))) {
SOURCE(54090, 81)
            {
               W6 var←c88336;
               {
                  word pd843;
                  pd843 = (* (( (ptr) (* (( (ptr) gf←c92880)+432)/* var←c88272 */  ))+15) );
                  (void) ( *( (fPt) ((*  (ptr) pd843 ))))((word) &var←c88336, featureCycler←v22180, pd843);
                  };
               hitData←v22152 = var←c88336.f5;
               feature←v22124 = var←c88336.f4;
               normal←v22096 = (*  (W2Pt) (( (ptr) &var←c88336)+2) );
               point←v22068 = (*  (W2Pt) &var←c88336 );
               };
            }
         else {
SOURCE(54184, 5)
            (void) XR←RaiseUnnamedError();
            };
         };
      };
SOURCE(54191, 96)
   {
      word pd844;
      pd844 = (* (( (ptr) (* (( (ptr) gf←c92880)+433)/* var←c88368 */  ))+8) );
      (void) ( *( (fPt) ((*  (ptr) pd844 ))))(ggData←v34564, (*  (W2Pt) (( (ptr) featureCycler←v22180)+3) ), point←v22068, normal←v22096, feature←v22124, hitData←v22152, pd844)
      ;
      };
   }

static void MoveSelection←P3360(ggData←v34652, event←v34680)
   word ggData←v34652;
   word event←v34680;
   {
   register ptr gf←c92912 =  (ptr) &globalframe;
   word action←v22264;
   word scene←v22292;
   word normalLast←v22320;
   word newLast←v22348 = 0;
   word opName←v22376;
   /* MoveSelection: */ 
SOURCE(54293, 1264)
SOURCE(54326, 39)
   action←v22264 = XR←Narrow((*  (ptr) (* (( (ptr) event←v34680)+1) ) ), (* (( (ptr) gf←c92912)+7) ));
SOURCE(54367, 27)
   scene←v22292 = (* (( (ptr) ggData←v34652)+11) );
SOURCE(54396, 62)
   {
      word pd845;
      pd845 = (* (( (ptr) (* (( (ptr) gf←c92912)+406)/* var←c81840 */  ))+21) );
      normalLast←v22320 = (word) ( *( (fPt) ((*  (ptr) pd845 ))))(scene←v22292, pd845);
      };
SOURCE(54486, 204)
   {
      word var←c88400;
      var←c88400 = action←v22264;
      if ((var←c88400 == (* (( (ptr) gf←c92912)+190) ))) {
         opName←v22376 = (* (( (ptr) gf←c92912)+192) );
         goto endif0846;
         };
      if ((var←c88400 == (* (( (ptr) gf←c92912)+191) ))) {
         opName←v22376 = (* (( (ptr) gf←c92912)+193) );
         goto endif0846;
         };
      if ((var←c88400 == (* (( (ptr) gf←c92912)+194) ))) {
         opName←v22376 = (* (( (ptr) gf←c92912)+195) );
         goto endif0846;
         };
      if ((var←c88400 == (* (( (ptr) gf←c92912)+196) ))) {
         opName←v22376 = (* (( (ptr) gf←c92912)+197) );
         goto endif0846;
         };
      if ((var←c88400 == (* (( (ptr) gf←c92912)+198) ))) {
         opName←v22376 = (* (( (ptr) gf←c92912)+199) );
         goto endif0846;
         };
      opName←v22376 = (
         XR←RaiseUnnamedError(), 0
         );
      goto endif0846;
      endif0846: ;
      };
SOURCE(54692, 865)
SOURCE(54698, 25)
   if ((normalLast←v22320 == 0)) {
SOURCE(54723, 20)
      goto lab←L100090;
      };
SOURCE(54745, 51)
   {
      word pd847;
      pd847 = (* (( (ptr) (* (( (ptr) gf←c92912)+418)/* var←c83152 */  ))+34) );
      newLast←v22348 = (word) ( *( (fPt) ((*  (ptr) pd847 ))))(normalLast←v22320, action←v22264, pd847);
      };
SOURCE(54798, 605)
   if ((newLast←v22348 == 0)) {
SOURCE(54818, 132)
      {
         word var←c88432;
         {
            word pd848;
            pd848 = (* (( (ptr) (* (( (ptr) gf←c92912)+421)/* var←c84272 */  ))+6) );
            var←c88432 = (word) ( *( (fPt) ((*  (ptr) pd848 ))))(opName←v22376, (* (( (ptr) gf←c92912)+200) ), pd848);
            };
         {
            word pd849;
            pd849 = (* (( (ptr) (* (( (ptr) gf←c92912)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd849 ))))((* (( (ptr) ggData←v34652)+3) ), 0, (* (( (ptr) gf←c92912)+93) ), var←c88432, pd849)
            ;
            };
         };
      }
   else {
SOURCE(54952, 79)
      {
         word pd850;
         pd850 = (* (( (ptr) (* (( (ptr) gf←c92912)+404)/* var←c81744 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd850 ))))(ggData←v34652, 0, 0, 0, 0, 0
            , 1, 0, 0, 0, pd850);
         };
SOURCE(55033, 73)
      {
         word pd851;
         pd851 = (* (( (ptr) (* (( (ptr) gf←c92912)+406)/* var←c81840 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd851 ))))((*  (ptr) normalLast←v22320 ), (* (( (ptr) normalLast←v22320)+1) ), scene←v22292, 0, pd851)
         ;
         };
SOURCE(55108, 44)
      {
         word pd852;
         pd852 = (* (( (ptr) (* (( (ptr) gf←c92912)+406)/* var←c81840 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd852 ))))(newLast←v22348, scene←v22292, 0, pd852);
         };
SOURCE(55154, 87)
      {
         word var←c88464;
         {
            word pd853;
            pd853 = (* (( (ptr) (* (( (ptr) gf←c92912)+421)/* var←c84272 */  ))+6) );
            var←c88464 = (word) ( *( (fPt) ((*  (ptr) pd853 ))))(opName←v22376, (* (( (ptr) gf←c92912)+201) ), pd853);
            };
         {
            word pd854;
            pd854 = (* (( (ptr) (* (( (ptr) gf←c92912)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd854 ))))((* (( (ptr) ggData←v34652)+3) ), 0, (* (( (ptr) gf←c92912)+53) ), var←c88464, pd854)
            ;
            };
         };
SOURCE(55243, 160)
      {
         word pd855;
         pd855 = (* (( (ptr) (* (( (ptr) gf←c92912)+405)/* var←c81776 */  ))+4) );
         (void) ( *( (fPt) ((*  (ptr) pd855 ))))((* (( (ptr) gf←c92912)+79) ), ggData←v34652, 4, 0, 1, 0, pd855);
         };
      };
   goto lab←L100091;
   lab←L100090: ;
SOURCE(55435, 117)
   {
      word var←c88496;
      {
         word pd856;
         pd856 = (* (( (ptr) (* (( (ptr) gf←c92912)+421)/* var←c84272 */  ))+6) );
         var←c88496 = (word) ( *( (fPt) ((*  (ptr) pd856 ))))(opName←v22376, (* (( (ptr) gf←c92912)+202) ), pd856);
         };
      {
         word pd857;
         pd857 = (* (( (ptr) (* (( (ptr) gf←c92912)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd857 ))))((* (( (ptr) ggData←v34652)+3) ), 0, (* (( (ptr) gf←c92912)+93) ), var←c88496, pd857)
         ;
         };
      };
   lab←L100091: ;
   }

static void AreaSelectNew←P3420(ggData←v34740, event←v34768)
   word ggData←v34740;
   word event←v34768;
   {
   register ptr gf←c92944 =  (ptr) &globalframe;
   /* AreaSelectNew: */ 
SOURCE(55566, 155)
SOURCE(55599, 33)
   (void) AreaSelectAux←P3600(ggData←v34740, 1, 1);
SOURCE(55634, 87)
   {
      word pd858;
      pd858 = (* (( (ptr) (* (( (ptr) gf←c92944)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd858 ))))((* (( (ptr) ggData←v34740)+3) ), 0, (* (( (ptr) gf←c92944)+53) ), (* (( (ptr) gf←c92944)+203)
          ), pd858);
      };
   }

static void AreaSelectNewAndDelete←P3480(ggData←v34828, event←v34856)
   word ggData←v34828;
   word event←v34856;
   {
   W8 var←c92976;
   register ptr gf←c93008 =  (ptr) &globalframe;
   /* declaration of var←c88528 skipped */ 
   word scene←v22420;
   /* AreaSelectNewAndDelete: */ 
SOURCE(55727, 1209)
   {
      word tmpAddr859;
      tmpAddr859 = (word) (( (ptr) &var←c92976)+4)/* var←c88528 */ ;
      (*  (ptr) tmpAddr859 ) = ( ((word)  (fPt) DoDelete←P7512) );
      (* (( (ptr) tmpAddr859) + 1) ) = 1;
      };
SOURCE(55776, 27)
   scene←v22420 = (* (( (ptr) ggData←v34828)+11) );
SOURCE(55805, 1131)
   {
      word pd860;
      pd860 = (* (( (ptr) (* (( (ptr) gf←c93008)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd860 ))))(scene←v22420, 0, pd860))) {
SOURCE(55850, 138)
         {
            word pd861;
            pd861 = (* (( (ptr) (* (( (ptr) gf←c93008)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd861 ))))((* (( (ptr) ggData←v34828)+3) ), 0, (* (( (ptr) gf←c93008)+93) ), (* (( (ptr) gf←c93008)+204)
                ), pd861);
            };
         }
      else {
SOURCE(55988, 950)
         {
            /* declaration of newSelectList←v22492 skipped */ 
            /* declaration of ptr←v22520 skipped */ 
SOURCE(56183, 20)
            var←c92976.f6/* newSelectList←v22492 */  = 0;
            var←c92976.f7/* ptr←v22520 */  = 0;
SOURCE(56218, 49)
            {
               W2 var←c88560;
               {
                  word pd862;
                  pd862 = (* (( (ptr) (* (( (ptr) gf←c93008)+410)/* var←c82224 */  ))+20) );
                  (void) ( *( (fPt) ((*  (ptr) pd862 ))))((word) (&var←c88560), pd862);
                  };
               var←c92976.f7/* ptr←v22520 */  = var←c88560.f1;
               var←c92976.f6/* newSelectList←v22492 */  = var←c88560.f0;
               };
SOURCE(56269, 81)
            {
               word pd863;
               pd863 = (* (( (ptr) (* (( (ptr) gf←c93008)+404)/* var←c81744 */  ))+10) );
               (void) ( *( (fPt) ((*  (ptr) pd863 ))))(ggData←v34828, 0, 0, 0, 1, 0
                  , 0, 0, 0, 0, pd863);
               };
SOURCE(56352, 54)
            (void) AreaSelectAux←P3600(ggData←v34828, 1, 0);
SOURCE(56408, 63)
            {
               word var←c88592;
               word pd864;
               pd864 = (* (( (ptr) (* (( (ptr) gf←c93008)+402)/* var←c81680 */  ))+32) );
               var←c88592 = (word) ( *( (fPt) ((*  (ptr) pd864 ))))(scene←v22420, 0, (word) (( (bPt) &var←c92976)+16)/* var←c88528 */ , 0, 0, pd864)
               ;
               };
SOURCE(56473, 116)
            {
               register word list←v22752;
               list←v22752 = var←c92976.f6/* newSelectList←v22492 */ ;
               lab←L100095: ;
               if ((list←v22752 != 0)) {
                  }
               else {
                  goto lab←L100092;
                  };
SOURCE(56544, 45)
               {
                  word pd865;
                  pd865 = (* (( (ptr) (* (( (ptr) gf←c93008)+402)/* var←c81680 */  ))+13) );
                  (void) ( *( (fPt) ((*  (ptr) pd865 ))))((* (( (ptr) ggData←v34828)+11) ), (*  (ptr) list←v22752 ), pd865);
                  };
               list←v22752 = (* (( (ptr) list←v22752)+1) );
               goto lab←L100095;
               lab←L100092: ;
               };
SOURCE(56600, 33)
            {
               word pd866;
               pd866 = (* (( (ptr) (* (( (ptr) gf←c93008)+422)/* var←c84432 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd866 ))))((* ((( (ptr) ggData←v34828)+13)) ), pd866);
               };
SOURCE(56635, 32)
            {
               word pd867;
               pd867 = (* (( (ptr) (* (( (ptr) gf←c93008)+422)/* var←c84432 */  ))+9) );
               (void) ( *( (fPt) ((*  (ptr) pd867 ))))((* (( (ptr) ggData←v34828)+13) ), 0, pd867);
               };
SOURCE(56669, 87)
            {
               word pd868;
               pd868 = (* (( (ptr) (* (( (ptr) gf←c93008)+395)/* var←c80976 */  ))+12) );
               (void) ( *( (fPt) ((*  (ptr) pd868 ))))((* (( (ptr) ggData←v34828)+3) ), 0, (* (( (ptr) gf←c93008)+53) ), (* (( (ptr) gf←c93008)+203)
                   ), pd868);
               };
SOURCE(56758, 178)
            {
               word pd869;
               pd869 = (* (( (ptr) (* (( (ptr) gf←c93008)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd869 ))))((* (( (ptr) gf←c93008)+26) ), ggData←v34828, 0, 1, 1, 0, pd869);
               };
            };
         };
      };
   }

static word DoDelete←P7512(sliceD←v22596, formal←c93072)
   word sliceD←v22596;
   word formal←c93072;
   {
   register ptr gf←c93040 =  (ptr) &globalframe;
   word done←v22640;
   formal←c93072 = (formal←c93072 - 16);
   /* DoDelete: */ 
SOURCE(56029, 16)
SOURCE(56029, 16)
   done←v22640 = 0;
SOURCE(56103, 75)
   {
      W2 var←c88624;
      {
         word pd870;
         pd870 = (* (( (ptr) (* (( (ptr) gf←c93040)+410)/* var←c82224 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd870 ))))((word) &var←c88624, (*  (ptr) sliceD←v22596 ), (* (( (ptr) formal←c93072)+6) ), (* (
               ( (ptr) formal←c93072)+7) ), pd870);
         };
      (* (( (ptr) formal←c93072)+7) ) = var←c88624.f1;
      (* (( (ptr) formal←c93072)+6) ) = var←c88624.f0;
      };
SOURCE(56029, 16)
   return(done←v22640);
   }

static void AreaSelectExtend←P3540(ggData←v34916, event←v34944)
   word ggData←v34916;
   word event←v34944;
   {
   register ptr gf←c93104 =  (ptr) &globalframe;
   /* AreaSelectExtend: */ 
SOURCE(56945, 162)
SOURCE(56981, 34)
   (void) AreaSelectAux←P3600(ggData←v34916, 0, 1);
SOURCE(57017, 90)
   {
      word pd871;
      pd871 = (* (( (ptr) (* (( (ptr) gf←c93104)+395)/* var←c80976 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd871 ))))((* (( (ptr) ggData←v34916)+3) ), 0, (* (( (ptr) gf←c93104)+53) ), (* (( (ptr) gf←c93104)+205)
          ), pd871);
      };
   }

static void AreaSelectAux←P3600(ggData←v10640, new←v10668, paint←v10696)
   word ggData←v10640;
   word new←v10668;
   word paint←v10696;
   {
   W9 var←c93136;
   register ptr gf←c93168 =  (ptr) &globalframe;
   /* declaration of var←c88656 skipped */ 
   /* declaration of newSelectList←v22880 skipped */ 
   /* declaration of ptr←v22908 skipped */ 
   /* declaration of scene←v22936 skipped */ 
   /* AreaSelectAux: */ 
SOURCE(57113, 1391)
   {
      word tmpAddr872;
      tmpAddr872 = (word) (( (ptr) &var←c93136)+4)/* var←c88656 */ ;
      (*  (ptr) tmpAddr872 ) = ( ((word)  (fPt) DoTestAllSlices←P7620) );
      (* (( (ptr) tmpAddr872) + 1) ) = 1;
      };
SOURCE(57192, 20)
   (* (( (ptr) &var←c93136)+6)/* newSelectList←v22880 */  ) = 0;
   (* (( (ptr) &var←c93136)+7)/* ptr←v22908 */  ) = 0;
SOURCE(57227, 27)
   (* (( (ptr) &var←c93136)+8)/* scene←v22936 */  ) = (* (( (ptr) ggData←v10640)+11) );
SOURCE(57742, 762)
   {
      word pd873;
      pd873 = (* (( (ptr) (* (( (ptr) gf←c93168)+406)/* var←c81840 */  ))+19) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd873 ))))((* (( (ptr) &var←c93136)+8)/* scene←v22936 */  ), 0, pd873))) {
SOURCE(57787, 125)
         {
            word pd874;
            pd874 = (* (( (ptr) (* (( (ptr) gf←c93168)+395)/* var←c80976 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd874 ))))((* (( (ptr) ggData←v10640)+3) ), 0, (* (( (ptr) gf←c93168)+93) ), (* (( (ptr) gf←c93168)+206)
                ), pd874);
            };
         }
      else {
SOURCE(57914, 79)
         {
            word pd875;
            pd875 = (* (( (ptr) (* (( (ptr) gf←c93168)+404)/* var←c81744 */  ))+10) );
            (void) ( *( (fPt) ((*  (ptr) pd875 ))))(ggData←v10640, 0, 0, 0, 0, 0
               , 1, 0, 0, 0, pd875);
            };
SOURCE(57995, 49)
         {
            W2 var←c88688;
            {
               word pd876;
               pd876 = (* (( (ptr) (* (( (ptr) gf←c93168)+410)/* var←c82224 */  ))+20) );
               (void) ( *( (fPt) ((*  (ptr) pd876 ))))((word) (&var←c88688), pd876);
               };
            (* (( (ptr) &var←c93136)+7)/* ptr←v22908 */  ) = var←c88688.f1;
            (* (( (ptr) &var←c93136)+6)/* newSelectList←v22880 */  ) = var←c88688.f0;
            };
SOURCE(58046, 70)
         {
            word var←c88720;
            word pd877;
            pd877 = (* (( (ptr) (* (( (ptr) gf←c93168)+402)/* var←c81680 */  ))+32) );
            var←c88720 = (word) ( *( (fPt) ((*  (ptr) pd877 ))))((* (( (ptr) &var←c93136)+8)/* scene←v22936 */  ), 0, (word) (( (bPt) &var←c93136)+16)
               /* var←c88656 */ , 0, 0, pd877);
            };
SOURCE(58118, 47)
         if ((0 != new←v10668)) {
SOURCE(58130, 35)
            {
               word pd878;
               pd878 = (* (( (ptr) (* (( (ptr) gf←c93168)+406)/* var←c81840 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd878 ))))((* (( (ptr) &var←c93136)+8)/* scene←v22936 */  ), 0, pd878);
               };
            };
SOURCE(58195, 124)
         {
            register word list←v23196;
            list←v23196 = (* (( (ptr) &var←c93136)+6)/* newSelectList←v22880 */  );
            lab←L100099: ;
            if ((list←v23196 != 0)) {
               }
            else {
               goto lab←L100096;
               };
SOURCE(58266, 53)
            {
               word pd879;
               pd879 = (* (( (ptr) (* (( (ptr) gf←c93168)+406)/* var←c81840 */  ))+5) );
               (void) ( *( (fPt) ((*  (ptr) pd879 ))))((*  (ptr) list←v23196 ), (* (( (ptr) &var←c93136)+8)/* scene←v22936 */  ), 0, pd879)
               ;
               };
            list←v23196 = (* (( (ptr) list←v23196)+1) );
            goto lab←L100099;
            lab←L100096: ;
            };
SOURCE(58330, 174)
         if ((0 != paint←v10696)) {
SOURCE(58344, 160)
            {
               word pd880;
               pd880 = (* (( (ptr) (* (( (ptr) gf←c93168)+405)/* var←c81776 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd880 ))))((* (( (ptr) gf←c93168)+79) ), ggData←v10640, 4, 0, 1, 0, pd880);
               };
            };
         };
      };
   }

static word DoTestAllSlices←P7620(formal←c01065, formal←c93264)
   word formal←c01065;
   word formal←c93264;
   {
   W8 var←c93200;
   /* declaration of sliceD←v23124 skipped */ 
   register ptr gf←c93232 =  (ptr) &globalframe;
   word done←v23168;
   /* declaration of var←c88752 skipped */ 
   /* declaration of sBox←v23324 skipped */ 
   formal←c93264 = (formal←c93264 - 16);
   var←c93200.f4/* sliceD←v23124 */  = formal←c01065;
   var←c93200.f0 = formal←c93264;
   /* DoTestAllSlices: */ 
SOURCE(57256, 481)
   {
      word tmpAddr881;
      tmpAddr881 = (word) (( (ptr) &var←c93200)+5)/* var←c88752 */ ;
      (*  (ptr) tmpAddr881 ) = ( ((word)  (fPt) DoTestSlice←P7728) );
      (* (( (ptr) tmpAddr881) + 1) ) = 1;
      };
SOURCE(57256, 481)
   done←v23168 = 0;
SOURCE(57337, 68)
   {
      word pd882;
      pd882 = (* (( (ptr) (* (( (ptr) gf←c93232)+418)/* var←c83152 */  ))+9) );
      var←c93200.f7/* sBox←v23324 */  = (word) ( *( (fPt) ((*  (ptr) pd882 ))))((*  (ptr) var←c93200.f4/* sliceD←v23124 */  ), (* (
            ( (ptr) var←c93200.f4/* sliceD←v23124 */ )+1) ), pd882);
      };
SOURCE(57687, 50)
   {
      word var←c88784;
      word pd883;
      pd883 = (* (( (ptr) (* (( (ptr) gf←c93232)+402)/* var←c81680 */  ))+31) );
      var←c88784 = (word) ( *( (fPt) ((*  (ptr) pd883 ))))((* (( (ptr) formal←c93264)+8) ), 0, (word) (( (bPt) &var←c93200)+20)
         /* var←c88752 */ , 0, pd883);
      };
SOURCE(57256, 481)
   return(done←v23168);
   }

static word DoTestSlice←P7728(next←v23428, formal←c93328)
   word next←v23428;
   word formal←c93328;
   {
   register ptr gf←c93296 =  (ptr) &globalframe;
   word done←v23472;
   formal←c93328 = (formal←c93328 - 20);
   /* DoTestSlice: */ 
SOURCE(57407, 275)
SOURCE(57407, 275)
   done←v23472 = 0;
SOURCE(57472, 32)
   if ((next←v23428 == (*  (ptr) (* (( (ptr) formal←c93328)+4) ) ))) {
SOURCE(57498, 6)
      return(done←v23472);
      };
SOURCE(57506, 176)
   {
      word tc884;
      word pd885;
      word pd886;
      pd885 = (* (( (ptr) (* (( (ptr) gf←c93296)+406)/* var←c81840 */  ))+17) );
      if ((0 == (word) ( *( (fPt) ((*  (ptr) pd885 ))))(next←v23428, (* (( (ptr) (*  (ptr) formal←c93328 ))+8) ), 0, pd885))) {
         pd886 = (* (( (ptr) (* (( (ptr) gf←c93296)+418)/* var←c83152 */  ))+72) );
         tc884 =  (word) (0 != (word) ( *( (fPt) ((*  (ptr) pd886 ))))(next←v23428, (* (( (ptr) formal←c93328)+7) ), pd886));
         }
      else {
         tc884 =  (word) 0;
         };
      if (tc884) {
SOURCE(57607, 75)
         {
            W2 var←c88816;
            {
               word pd887;
               pd887 = (* (( (ptr) (* (( (ptr) gf←c93296)+410)/* var←c82224 */  ))+21) );
               (void) ( *( (fPt) ((*  (ptr) pd887 ))))((word) &var←c88816, (*  (ptr) (* (( (ptr) formal←c93328)+4) ) ), (* (( (ptr) (*  (ptr) formal←c93328 ))+6)
                   ), (* (( (ptr) (*  (ptr) formal←c93328 ))+7) ), pd887);
               };
            (* (( (ptr) (*  (ptr) formal←c93328 ))+7) ) = var←c88816.f1;
            (* (( (ptr) (*  (ptr) formal←c93328 ))+6) ) = var←c88816.f0;
            };
         };
      };
SOURCE(57407, 275)
   return(done←v23472);
   }

static void SelectCoincident←P3660(formal←c01066, event←v35032)
   word formal←c01066;
   word event←v35032;
   {
   W8 var←c93360;
   /* declaration of ggData←v35004 skipped */ 
   register ptr gf←c93392 =  (ptr) &globalframe;
   /* declaration of var←c88848 skipped */ 
   /* declaration of count←v23528 skipped */ 
   var←c93360.f4/* ggData←v35004 */  = formal←c01066;
   /* SelectCoincident: */ 
SOURCE(58534, 1006)
   {
      word tmpAddr888;
      tmpAddr888 = (word) (( (ptr) &var←c93360)+5)/* var←c88848 */ ;
      (*  (ptr) tmpAddr888 ) = ( ((word)  (fPt) DoCheckSegments←P7788) );
      (* (( (ptr) tmpAddr888) + 1) ) = 1;
      };
SOURCE(59060, 14)
   var←c93360.f7/* count←v23528 */  = 0;
SOURCE(59076, 79)
   {
      word pd889;
      pd889 = (* (( (ptr) (* (( (ptr) gf←c93392)+404)/* var←c81744 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd889 ))))(var←c93360.f4/* ggData←v35004 */ , 0, 0, 0, 0, 0
         , 1, 0, 0, 0, pd889);
      };
SOURCE(59157, 42)
   {
      word pd890;
      pd890 = (* (( (ptr) (* (( (ptr) gf←c93392)+406)/* var←c81840 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd890 ))))((* (( (ptr) var←c93360.f4/* ggData←v35004 */ )+11) ), 0, pd890);
      };
SOURCE(59201, 60)
   {
      word var←c88880;
      word pd891;
      pd891 = (* (( (ptr) (* (( (ptr) gf←c93392)+402)/* var←c81680 */  ))+31) );
      var←c88880 = (word) ( *( (fPt) ((*  (ptr) pd891 ))))((* (( (ptr) var←c93360.f4/* ggData←v35004 */ )+11) ), 1, (word) (( (bPt) &var←c93360)+20)
         /* var←c88848 */ , 0, pd891);
      };
SOURCE(59263, 115)
   {
      W2 var←c88912;
      var←c88912.f0 = 5;
      var←c88912.f1 = var←c93360.f7/* count←v23528 */ ;
      {
         word pd892;
         pd892 = (* (( (ptr) (* (( (ptr) gf←c93392)+395)/* var←c80976 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd892 ))))((* (( (ptr) var←c93360.f4/* ggData←v35004 */ )+3) ), 0, (* (( (ptr) gf←c93392)+53)
             ), (* (( (ptr) gf←c93392)+207) ), var←c88912, pd892);
         };
      };
SOURCE(59380, 160)
   {
      word pd893;
      pd893 = (* (( (ptr) (* (( (ptr) gf←c93392)+405)/* var←c81776 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd893 ))))((* (( (ptr) gf←c93392)+79) ), var←c93360.f4/* ggData←v35004 */ , 4, 0, 1, 0, pd893)
      ;
      };
   }

static word DoCheckSegments←P7788(slice←v23604, formal←c93488)
   word slice←v23604;
   word formal←c93488;
   {
   W6 var←c93424;
   register ptr gf←c93456 =  (ptr) &globalframe;
   word done←v23648;
   /* declaration of var←c88944 skipped */ 
   word sliceD←v23704;
   formal←c93488 = (formal←c93488 - 20);
   var←c93424.f0 = formal←c93488;
   /* DoCheckSegments: */ 
SOURCE(58570, 482)
   {
      word tmpAddr894;
      tmpAddr894 = (word) (( (ptr) &var←c93424)+4)/* var←c88944 */ ;
      (*  (ptr) tmpAddr894 ) = ( ((word)  (fPt) CoincidentProc←P7848) );
      (* (( (ptr) tmpAddr894) + 1) ) = 1;
      };
SOURCE(58570, 482)
   done←v23648 = 0;
SOURCE(58834, 72)
   {
      word pd895;
      pd895 = (* (( (ptr) (* (( (ptr) gf←c93456)+418)/* var←c83152 */  ))+40) );
      sliceD←v23704 = (word) ( *( (fPt) ((*  (ptr) pd895 ))))(slice←v23604, (word) (( (bPt) &var←c93424)+16)/* var←c88944 */ , pd895)
      ;
      };
SOURCE(58908, 144)
   {
      word tc896;
      word pd897;
      if ((sliceD←v23704 != 0)) {
         pd897 = (* (( (ptr) (* (( (ptr) gf←c93456)+418)/* var←c83152 */  ))+27) );
         tc896 =  (word) (0 == (word) ( *( (fPt) ((*  (ptr) pd897 ))))(sliceD←v23704, pd897));
         }
      else {
         tc896 =  (word) 0;
         };
      if (tc896) {
SOURCE(58969, 50)
         {
            word pd898;
            pd898 = (* (( (ptr) (* (( (ptr) gf←c93456)+406)/* var←c81840 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd898 ))))(sliceD←v23704, (* (( (ptr) (* (( (ptr) formal←c93488)+4) ))+11) ), 0, pd898);
            };
SOURCE(59035, 17)
         (* (( (ptr) formal←c93488)+7) ) = ((* (( (ptr) formal←c93488)+7) ) + 1);
         };
      };
SOURCE(58570, 482)
   return(done←v23648);
   }

static word CoincidentProc←P7848(seg←v23780, transform←v23808, formal←c93520)
   word seg←v23780;
   word transform←v23808;
   word formal←c93520;
   {
   word keep←v23852;
   formal←c93520 = (formal←c93520 - 16);
   /* CoincidentProc: */ 
SOURCE(58640, 157)
SOURCE(58749, 48)
   {
      word tc899;
      word x900;
      word x901;
      word x902;
      word x903;
      if (((
         x900 = (* (( (ptr) seg←v23780)+9) ),  *(float*)&x900
         ) == (
         x901 = (* (( (ptr) seg←v23780)+11) ),  *(float*)&x901
         ))) {
         tc899 =  (word)  (unsigned) ((
            x902 = (* (( (ptr) seg←v23780)+10) ),  *(float*)&x902
            ) == (
            x903 = (* (( (ptr) seg←v23780)+12) ),  *(float*)&x903
            ));
         }
      else {
         tc899 =  (word)  (unsigned) 0;
         };
      return(tc899);
      };
   }

static void SelectUnseeableSegs←P3720(formal←c01067, event←v35120)
   word formal←c01067;
   word event←v35120;
   {
   W8 var←c93552;
   /* declaration of ggData←v35092 skipped */ 
   register ptr gf←c93584 =  (ptr) &globalframe;
   /* declaration of var←c88976 skipped */ 
   /* declaration of count←v23908 skipped */ 
   var←c93552.f4/* ggData←v35092 */  = formal←c01067;
   /* SelectUnseeableSegs: */ 
SOURCE(59546, 964)
   {
      word tmpAddr904;
      tmpAddr904 = (word) (( (ptr) &var←c93552)+5)/* var←c88976 */ ;
      (*  (ptr) tmpAddr904 ) = ( ((word)  (fPt) DoCheckSegments←P7908) );
      (* (( (ptr) tmpAddr904) + 1) ) = 1;
      };
SOURCE(60028, 14)
   var←c93552.f7/* count←v23908 */  = 0;
SOURCE(60044, 79)
   {
      word pd905;
      pd905 = (* (( (ptr) (* (( (ptr) gf←c93584)+404)/* var←c81744 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd905 ))))(var←c93552.f4/* ggData←v35092 */ , 0, 0, 0, 0, 0
         , 1, 0, 0, 0, pd905);
      };
SOURCE(60125, 42)
   {
      word pd906;
      pd906 = (* (( (ptr) (* (( (ptr) gf←c93584)+406)/* var←c81840 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd906 ))))((* (( (ptr) var←c93552.f4/* ggData←v35092 */ )+11) ), 0, pd906);
      };
SOURCE(60169, 60)
   {
      word var←c89008;
      word pd907;
      pd907 = (* (( (ptr) (* (( (ptr) gf←c93584)+402)/* var←c81680 */  ))+31) );
      var←c89008 = (word) ( *( (fPt) ((*  (ptr) pd907 ))))((* (( (ptr) var←c93552.f4/* ggData←v35092 */ )+11) ), 1, (word) (( (bPt) &var←c93552)+20)
         /* var←c88976 */ , 0, pd907);
      };
SOURCE(60231, 117)
   {
      W2 var←c89040;
      var←c89040.f0 = 5;
      var←c89040.f1 = var←c93552.f7/* count←v23908 */ ;
      {
         word pd908;
         pd908 = (* (( (ptr) (* (( (ptr) gf←c93584)+395)/* var←c80976 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd908 ))))((* (( (ptr) var←c93552.f4/* ggData←v35092 */ )+3) ), 0, (* (( (ptr) gf←c93584)+53)
             ), (* (( (ptr) gf←c93584)+208) ), var←c89040, pd908);
         };
      };
SOURCE(60350, 160)
   {
      word pd909;
      pd909 = (* (( (ptr) (* (( (ptr) gf←c93584)+405)/* var←c81776 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd909 ))))((* (( (ptr) gf←c93584)+79) ), var←c93552.f4/* ggData←v35092 */ , 4, 0, 1, 0, pd909)
      ;
      };
   }

static word DoCheckSegments←P7908(slice←v23984, formal←c93680)
   word slice←v23984;
   word formal←c93680;
   {
   W6 var←c93616;
   register ptr gf←c93648 =  (ptr) &globalframe;
   word done←v24028;
   /* declaration of var←c89072 skipped */ 
   word type←v24056;
   formal←c93680 = (formal←c93680 - 20);
   var←c93616.f0 = formal←c93680;
   /* DoCheckSegments: */ 
SOURCE(59585, 432)
   {
      word tmpAddr910;
      tmpAddr910 = (word) (( (ptr) &var←c93616)+4)/* var←c89072 */ ;
      (*  (ptr) tmpAddr910 ) = ( ((word)  (fPt) UnseeProc←P8016) );
      (* (( (ptr) tmpAddr910) + 1) ) = 1;
      };
SOURCE(59585, 432)
   done←v24028 = 0;
SOURCE(59655, 38)
   {
      word pd911;
      pd911 = (* (( (ptr) (* (( (ptr) gf←c93648)+418)/* var←c83152 */  ))+6) );
      type←v24056 = (word) ( *( (fPt) ((*  (ptr) pd911 ))))(slice←v23984, pd911);
      };
SOURCE(59695, 322)
   if ( ( (type←v24056 != (* (( (ptr) gf←c93648)+209) )) ? (type←v24056 != (* (( (ptr) gf←c93648)+210) )) : 0 ) ) {
SOURCE(59727, 295)
      {
         word sliceD←v24128;
SOURCE(59804, 67)
         {
            word pd912;
            pd912 = (* (( (ptr) (* (( (ptr) gf←c93648)+418)/* var←c83152 */  ))+40) );
            sliceD←v24128 = (word) ( *( (fPt) ((*  (ptr) pd912 ))))(slice←v23984, (word) (( (bPt) &var←c93616)+16)/* var←c89072 */ , pd912)
            ;
            };
SOURCE(59873, 144)
         {
            word tc913;
            word pd914;
            if ((sliceD←v24128 != 0)) {
               pd914 = (* (( (ptr) (* (( (ptr) gf←c93648)+418)/* var←c83152 */  ))+27) );
               tc913 =  (word) (0 == (word) ( *( (fPt) ((*  (ptr) pd914 ))))(sliceD←v24128, pd914));
               }
            else {
               tc913 =  (word) 0;
               };
            if (tc913) {
SOURCE(59934, 50)
               {
                  word pd915;
                  pd915 = (* (( (ptr) (* (( (ptr) gf←c93648)+406)/* var←c81840 */  ))+6) );
                  (void) ( *( (fPt) ((*  (ptr) pd915 ))))(sliceD←v24128, (* (( (ptr) (* (( (ptr) formal←c93680)+4) ))+11) ), 0, pd915);
                  };
SOURCE(60000, 17)
               (* (( (ptr) formal←c93680)+7) ) = ((* (( (ptr) formal←c93680)+7) ) + 1);
               };
            };
         };
      };
SOURCE(59585, 432)
   return(done←v24028);
   }

static word UnseeProc←P8016(seg←v75172, transform←v75200, formal←c93712)
   word seg←v75172;
   word transform←v75200;
   word formal←c93712;
   {
   word keep←v75244;
   formal←c93712 = (formal←c93712 - 16);
   /* UnseeProc: */ 
SOURCE(59729, 22)
SOURCE(59753, 46)
   {
      word tc916;
      word x917;
      word x918;
      if (((
         x917 = (* (( (ptr) seg←v75172)+2) ),  *(float*)&x917
         ) <= (
         x918 = (*  (ptr) &fc358 ),  *(float*)&x918
         ))) {
         tc916 =  (word)  (unsigned) 1;
         }
      else {
         tc916 =  (word)  (unsigned) ((* (( (ptr) seg←v75172)+8) ) == 0);
         };
      return(tc916);
      };
   }

static void SelectUnseeableObjs←P3780(formal←c01068, event←v35208)
   word formal←c01068;
   word event←v35208;
   {
   W9 var←c93744;
   /* declaration of ggData←v35180 skipped */ 
   register ptr gf←c93776 =  (ptr) &globalframe;
   /* declaration of var←c89104 skipped */ 
   /* declaration of count←v24200 skipped */ 
   /* declaration of epsilon←v24228 skipped */ 
   (* (( (ptr) &var←c93744)+4)/* ggData←v35180 */  ) = formal←c01068;
   /* SelectUnseeableObjs: */ 
SOURCE(60516, 2837)
   {
      word tmpAddr919;
      tmpAddr919 = (word) (( (ptr) &var←c93744)+5)/* var←c89104 */ ;
      (*  (ptr) tmpAddr919 ) = ( ((word)  (fPt) DoCheckSegments←P8076) );
      (* (( (ptr) tmpAddr919) + 1) ) = 1;
      };
SOURCE(62813, 14)
   (* (( (ptr) &var←c93744)+7)/* count←v24200 */  ) = 0;
SOURCE(62829, 25)
   {
      word x920;
      word x922;
      *(float*)(( (ptr) &var←c93744)+8)/* epsilon←v24228 */  = (
         x920 = (*  (ptr) &fc382 ),  *(float*)&x920
         ) / (
         x922 = (*  (ptr) &fc921 ),  *(float*)&x922
         );
      };
SOURCE(62890, 79)
   {
      word pd923;
      pd923 = (* (( (ptr) (* (( (ptr) gf←c93776)+404)/* var←c81744 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd923 ))))((* (( (ptr) &var←c93744)+4)/* ggData←v35180 */  ), 0, 0, 0, 0, 0
         , 1, 0, 0, 0, pd923);
      };
SOURCE(62971, 42)
   {
      word pd924;
      pd924 = (* (( (ptr) (* (( (ptr) gf←c93776)+406)/* var←c81840 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd924 ))))((* (( (ptr) (* (( (ptr) &var←c93744)+4)/* ggData←v35180 */  ))+11) ), 0, pd924);
      };
SOURCE(63015, 59)
   {
      word var←c89136;
      word pd925;
      pd925 = (* (( (ptr) (* (( (ptr) gf←c93776)+402)/* var←c81680 */  ))+31) );
      var←c89136 = (word) ( *( (fPt) ((*  (ptr) pd925 ))))((* (( (ptr) (* (( (ptr) &var←c93744)+4)/* ggData←v35180 */  ))+11) ), 2, (word) (
            ( (bPt) &var←c93744)+20)/* var←c89104 */ , 0, pd925);
      };
SOURCE(63076, 115)
   {
      W2 var←c89168;
      var←c89168.f0 = 5;
      var←c89168.f1 = (* (( (ptr) &var←c93744)+7)/* count←v24200 */  );
      {
         word pd926;
         pd926 = (* (( (ptr) (* (( (ptr) gf←c93776)+395)/* var←c80976 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd926 ))))((* (( (ptr) (* (( (ptr) &var←c93744)+4)/* ggData←v35180 */  ))+3) ), 0, (* (( (ptr) gf←c93776)+53)
             ), (* (( (ptr) gf←c93776)+211) ), var←c89168, pd926);
         };
      };
SOURCE(63193, 160)
   {
      word pd927;
      pd927 = (* (( (ptr) (* (( (ptr) gf←c93776)+405)/* var←c81776 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd927 ))))((* (( (ptr) gf←c93776)+79) ), (* (( (ptr) &var←c93744)+4)/* ggData←v35180 */  ), 4, 0, 1, 0, pd927)
      ;
      };
   }

static word DoCheckSegments←P8076(slice←v24304, formal←c93872)
   word slice←v24304;
   word formal←c93872;
   {
   W8 var←c93808;
   register ptr gf←c93840 =  (ptr) &globalframe;
   word done←v24348;
   /* declaration of var←c89200 skipped */ 
   /* declaration of var←c89232 skipped */ 
   word tallyD←v24432 = 0;
   word aborted←v24460 = 0;
   formal←c93872 = (formal←c93872 - 20);
   var←c93808.f0 = formal←c93872;
   /* DoCheckSegments: */ 
SOURCE(60555, 2249)
   {
      word tmpAddr928;
      tmpAddr928 = (word) (( (ptr) &var←c93808)+4)/* var←c89200 */ ;
      (*  (ptr) tmpAddr928 ) = ( ((word)  (fPt) TallyUnseeableObjects←P8196) );
      (* (( (ptr) tmpAddr928) + 1) ) = 1;
      };
   {
      word tmpAddr929;
      tmpAddr929 = (word) (( (ptr) &var←c93808)+6)/* var←c89232 */ ;
      (*  (ptr) tmpAddr929 ) = ( ((word)  (fPt) UnseeProc←P8136) );
      (* (( (ptr) tmpAddr929) + 1) ) = 1;
      };
SOURCE(60555, 2249)
   done←v24348 = 0;
SOURCE(62584, 72)
   {
      W2 var←c89296;
      {
         word pd930;
         pd930 = (* (( (ptr) (* (( (ptr) gf←c93840)+434)/* var←c89264 */  ))+80) );
         (void) ( *( (fPt) ((*  (ptr) pd930 ))))((word) &var←c89296, slice←v24304, (word) (( (bPt) &var←c93808)+16)/* var←c89200 */ , pd930)
         ;
         };
      aborted←v24460 = var←c89296.f1;
      tallyD←v24432 = var←c89296.f0;
      };
SOURCE(62658, 146)
   {
      word tc931;
      word pd932;
      if ( ( (0 == aborted←v24460) ? (tallyD←v24432 != 0) : 0 ) ) {
         pd932 = (* (( (ptr) (* (( (ptr) gf←c93840)+418)/* var←c83152 */  ))+27) );
         tc931 =  (word) (0 == (word) ( *( (fPt) ((*  (ptr) pd932 ))))(tallyD←v24432, pd932));
         }
      else {
         tc931 =  (word) 0;
         };
      if (tc931) {
SOURCE(62735, 50)
         {
            word pd933;
            pd933 = (* (( (ptr) (* (( (ptr) gf←c93840)+406)/* var←c81840 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd933 ))))(tallyD←v24432, (* (( (ptr) (* (( (ptr) formal←c93872)+4) ))+11) ), 0, pd933);
            };
SOURCE(62787, 17)
         (* (( (ptr) formal←c93872)+7) ) = ((* (( (ptr) formal←c93872)+7) ) + 1);
         };
      };
SOURCE(60555, 2249)
   return(done←v24348);
   }

static word UnseeProc←P8136(seg←v75368, transform←v75396, formal←c93904)
   word seg←v75368;
   word transform←v75396;
   word formal←c93904;
   {
   word keep←v75440;
   formal←c93904 = (formal←c93904 - 24);
   /* UnseeProc: */ 
SOURCE(60625, 70)
SOURCE(60649, 46)
   {
      word tc934;
      word x935;
      word x936;
      if (((
         x935 = (* (( (ptr) seg←v75368)+2) ),  *(float*)&x935
         ) <= (
         x936 = (*  (ptr) &fc358 ),  *(float*)&x936
         ))) {
         tc934 =  (word)  (unsigned) 1;
         }
      else {
         tc934 =  (word)  (unsigned) ((* (( (ptr) seg←v75368)+8) ) == 0);
         };
      return(tc934);
      };
   }

static void TallyUnseeableObjects←P8196(formal←c0826, slice←v24536, formal←c94000)
   word formal←c0826;
   word slice←v24536;
   word formal←c94000;
   {
   W6 var←c93936;
   register ptr gf←c93968 =  (ptr) &globalframe;
   word visitChildren←v24580;
   word keep←v24608;
   word done←v24636;
   /* declaration of var←c89328 skipped */ 
   word sliceD←v24692 = 0;
   formal←c94000 = (formal←c94000 - 16);
   var←c93936.f0 = formal←c94000;
   /* TallyUnseeableObjects: */ 
SOURCE(60700, 1830)
   {
      word tmpAddr937;
      tmpAddr937 = (word) (( (ptr) &var←c93936)+4)/* var←c89328 */ ;
      (*  (ptr) tmpAddr937 ) = ( ((word)  (fPt) IsBlackHole←P8256) );
      (* (( (ptr) tmpAddr937) + 1) ) = 1;
      };
SOURCE(60700, 1830)
   keep←v24608 = 0;
SOURCE(60700, 1830)
   done←v24636 = 0;
SOURCE(61506, 60)
   {
      word pd938;
      pd938 = (* (( (ptr) (* (( (ptr) gf←c93968)+434)/* var←c89264 */  ))+62) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd938 ))))(slice←v24536, pd938))) {
SOURCE(61539, 27)
         visitChildren←v24580 = 1;
         keep←v24608 = 0;
         done←v24636 = 0;
         goto lab←L100100;
         };
      };
SOURCE(61568, 50)
   {
      word pd939;
      pd939 = (* (( (ptr) (* (( (ptr) gf←c93968)+418)/* var←c83152 */  ))+40) );
      sliceD←v24692 = (word) ( *( (fPt) ((*  (ptr) pd939 ))))(slice←v24536, (word) (( (bPt) formal←c94000)+24), pd939);
      };
SOURCE(61662, 75)
   {
      word pd940;
      pd940 = (* (( (ptr) (* (( (ptr) gf←c93968)+418)/* var←c83152 */  ))+28) );
      if ((0 == (word) ( *( (fPt) ((*  (ptr) pd940 ))))(sliceD←v24692, pd940))) {
SOURCE(61709, 28)
         visitChildren←v24580 = 0;
         keep←v24608 = 0;
         done←v24636 = 0;
         goto lab←L100100;
         };
      };
SOURCE(61739, 763)
   {
      word var←c89360;
      W2 var←c0824;
      {
         word pd941;
         pd941 = (* (( (ptr) (* (( (ptr) gf←c93968)+418)/* var←c83152 */  ))+6) );
         var←c89360 = (word) ( *( (fPt) ((*  (ptr) pd941 ))))((*  (ptr) (sliceD←v24692) ), pd941);
         };
      if ((var←c89360 == (* (( (ptr) gf←c93968)+183) ))) {
SOURCE(61793, 256)
         {
            word color←v24840 = 0;
            word success←v24868 = 0;
SOURCE(61832, 81)
            {
               W2 var←c89424;
               {
                  word var←c89392;
                  {
                     word pd943;
                     pd943 = (* (( (ptr) (* (( (ptr) gf←c93968)+434)/* var←c89264 */  ))+64) );
                     var←c89392 = (word) ( *( (fPt) ((*  (ptr) pd943 ))))((*  (ptr) (sliceD←v24692) ), pd943);
                     };
                  {
                     word pd944;
                     pd944 = (* (( (ptr) (* (( (ptr) gf←c93968)+418)/* var←c83152 */  ))+62) );
                     (void) ( *( (fPt) ((*  (ptr) pd944 ))))((word) &var←c89424, var←c89392, 0, pd944);
                     };
                  };
               success←v24868 = var←c89424.f1;
               color←v24840 = var←c89424.f0;
               };
SOURCE(61915, 132)
            {
               word pd945;
               pd945 = (* (( (ptr) (* (( (ptr) gf←c93968)+425)/* var←c84784 */  ))+16) );
               if (((word) ( *( (fPt) ((*  (ptr) pd945 ))))((*  (ptr) (sliceD←v24692) ), pd945) == 2) ||  ( (0 != success←v24868) ? (color←v24840 == 0) : 0 ) ) {
                  keep←v24608 =  (unsigned) 1;
                  }
               else {
                  keep←v24608 =  (unsigned) (0 != (word) IsBlackHole←P8256(sliceD←v24692, (word) (( (bPt) &var←c93936)+16)/* var←c89328 */ )
                  );
                  };
               };
            };
         goto endif0942;
         };
      if ((var←c89360 == (* (( (ptr) gf←c93968)+212) )) || (var←c89360 == (* (( (ptr) gf←c93968)+213) ))) {
SOURCE(62101, 83)
         {
            word pd946;
            pd946 = (* (( (ptr) (* (( (ptr) gf←c93968)+418)/* var←c83152 */  ))+62) );
            (void) ( *( (fPt) ((*  (ptr) pd946 ))))((word) &var←c0824, (*  (ptr) sliceD←v24692 ), 0, pd946);
            };
         if ((var←c0824.f0 == 0)) {
            keep←v24608 =  (unsigned) 1;
            }
         else {
            keep←v24608 =  (unsigned) (0 != (word) IsBlackHole←P8256(sliceD←v24692, (word) (( (bPt) &var←c93936)+16)/* var←c89328 */ )
            );
            };
         goto endif0942;
         };
      if ((var←c89360 == (* (( (ptr) gf←c93968)+209) ))) {
SOURCE(62201, 41)
         {
            word pd947;
            pd947 = (* (( (ptr) (* (( (ptr) gf←c93968)+429)/* var←c84944 */  ))+27) );
            keep←v24608 = (word) ( *( (fPt) ((*  (ptr) pd947 ))))((*  (ptr) (sliceD←v24692) ), pd947);
            };
         goto endif0942;
         };
      if ((var←c89360 == (* (( (ptr) gf←c93968)+210) ))) {
SOURCE(62255, 126)
         {
            word box←v24912;
SOURCE(62257, 52)
            {
               word pd948;
               pd948 = (* (( (ptr) (* (( (ptr) gf←c93968)+418)/* var←c83152 */  ))+9) );
               box←v24912 = (word) ( *( (fPt) ((*  (ptr) pd948 ))))((*  (ptr) sliceD←v24692 ), 0, pd948);
               };
SOURCE(62311, 68)
            {
               float tf949;
               word x950;
               word x951;
               word x952;
               float tf953;
               word x954;
               word x955;
               word x956;
               if ((FABS(((
                     x950 = (* (( (ptr) box←v24912)+2) ),  *(float*)&x950
                     ) - (
                     x951 = (*  (ptr) box←v24912 ),  *(float*)&x951
                     )), tf949) < (
                  x952 = (* (( (ptr) (*  (ptr) formal←c94000 ))+8) ),  *(float*)&x952
                  ))) {
                  keep←v24608 =  (unsigned) (FABS(((
                        x954 = (* (( (ptr) box←v24912)+3) ),  *(float*)&x954
                        ) - (
                        x955 = (* (( (ptr) box←v24912)+1) ),  *(float*)&x955
                        )), tf953) < (
                     x956 = (* (( (ptr) (*  (ptr) formal←c94000 ))+8) ),  *(float*)&x956
                     ));
                  }
               else {
                  keep←v24608 =  (unsigned) 0;
                  };
               };
            };
         goto endif0942;
         };
SOURCE(62395, 107)
      {
         word pd957;
         pd957 = (* (( (ptr) (* (( (ptr) gf←c93968)+395)/* var←c80976 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd957 ))))((* (( (ptr) (* (( (ptr) (*  (ptr) formal←c94000 ))+4) ))+3) ), 0, (* (( (ptr) gf←c93968)+93)
             ), (* (( (ptr) gf←c93968)+214) ), pd957);
         };
      goto endif0942;
      endif0942: ;
      };
SOURCE(62504, 26)
   visitChildren←v24580 = 0;
   /* removed bogus assignment */ 
   done←v24636 = 0;
   /* removed tail goto */ 
   lab←L100100: ;
   (*  (ptr) formal←c0826 ) = visitChildren←v24580;
   (* (( (ptr) formal←c0826)+1) ) = keep←v24608;
   (* (( (ptr) formal←c0826)+2) ) = done←v24636;
   return;
   }

static word IsBlackHole←P8256(sliceD←v24768, formal←c94096)
   word sliceD←v24768;
   word formal←c94096;
   {
   W12 var←c94032;
   register ptr gf←c94064 =  (ptr) &globalframe;
   word var←c24812;
   /* declaration of var←c89456 skipped */ 
   /* declaration of p1←v24984 skipped */ 
   /* declaration of p2←v25012 skipped */ 
   /* declaration of line←v25040 skipped */ 
   /* declaration of colinear←v25068 skipped */ 
   formal←c94096 = (formal←c94096 - 16);
   (*  (ptr) &var←c94032 ) = formal←c94096;
   /* IsBlackHole: */ 
SOURCE(60817, 659)
   {
      word tmpAddr958;
      tmpAddr958 = (word) (( (ptr) &var←c94032)+4)/* var←c89456 */ ;
      (*  (ptr) tmpAddr958 ) = ( ((word)  (fPt) AllColinear←P8412) );
      (* (( (ptr) tmpAddr958) + 1) ) = 1;
      };
SOURCE(61261, 56)
   (* (( (ptr) &var←c94032)+6) ) = 2139095039;
   (* (( (ptr) &var←c94032)+7) ) = 2139095039;
   (*  (W2Pt) (( (ptr) &var←c94032)+8)/* p2←v25012 */  ) = (*  (W2Pt) (( (ptr) &var←c94032)+6)/* p1←v24984 */  );
SOURCE(61319, 24)
   (* (( (ptr) &var←c94032)+10)/* line←v25040 */  ) = 0;
SOURCE(61345, 21)
   (* (( (ptr) &var←c94032)+11)/* colinear←v25068 */  ) = 1;
SOURCE(61404, 54)
   {
      word pd959;
      pd959 = (* (( (ptr) (* (( (ptr) gf←c94064)+418)/* var←c83152 */  ))+37) );
      (void) ( *( (fPt) ((*  (ptr) pd959 ))))(sliceD←v24768, (word) (( (bPt) &var←c94032)+16)/* var←c89456 */ , pd959);
      };
SOURCE(61460, 16)
   return((* (( (ptr) &var←c94032)+11)/* colinear←v25068 */  ));
   }

static word AllColinear←P8412(point←v25144, formal←c94160)
   W2 point←v25144;
   word formal←c94160;
   {
   register ptr gf←c94128 =  (ptr) &globalframe;
   word done←v25188;
   formal←c94160 = (formal←c94160 - 16);
   /* AllColinear: */ 
SOURCE(60880, 376)
SOURCE(60880, 376)
   done←v25188 = 1;
SOURCE(60945, 58)
   {
      word x960;
      word x961;
      if (((
         x960 = (* (( (ptr) formal←c94160)+6) ),  *(float*)&x960
         ) == (
         x961 = 2139095039,  *(float*)&x961
         ))) {
SOURCE(60978, 10)
         (*  (W2Pt) (( (ptr) formal←c94160)+6) ) = point←v25144;
SOURCE(60990, 13)
         return(0);
         };
      };
SOURCE(61022, 58)
   {
      word x962;
      word x963;
      if (((
         x962 = (* (( (ptr) formal←c94160)+8) ),  *(float*)&x962
         ) == (
         x963 = 2139095039,  *(float*)&x963
         ))) {
SOURCE(61055, 10)
         (*  (W2Pt) (( (ptr) formal←c94160)+8) ) = point←v25144;
SOURCE(61067, 13)
         return(0);
         };
      };
SOURCE(61100, 54)
   if (((* (( (ptr) formal←c94160)+10) ) == 0)) {
SOURCE(61117, 37)
      {
         word pd964;
         pd964 = (* (( (ptr) (* (( (ptr) gf←c94128)+435)/* var←c89520 */  ))+8) );
         (* (( (ptr) formal←c94160)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd964 ))))((*  (W2Pt) (( (ptr) formal←c94160)+6) ), (*  (W2Pt) (
               ( (ptr) formal←c94160)+8) ), pd964);
         };
      };
SOURCE(61171, 85)
   {
      word pd965;
      word x966;
      word x967;
      pd965 = (* (( (ptr) (* (( (ptr) gf←c94128)+435)/* var←c89520 */  ))+39) );
      if (((
         x966 = (word) ( *( (fPt) ((*  (ptr) pd965 ))))(point←v25144, (* (( (ptr) formal←c94160)+10) ), pd965),  *(float*)&x966
         ) > (
         x967 = (* (( (ptr) (*  (ptr) (*  (ptr) (*  (ptr) formal←c94160 ) ) ))+8) ),  *(float*)&x967
         ))) {
SOURCE(61221, 22)
         (* (( (ptr) formal←c94160)+11) ) = 0;
         }
      else {
SOURCE(61243, 13)
         return(0);
         };
      };
SOURCE(60880, 376)
   return(done←v25188);
   }

static void RegisterEventProcs←P3840()
   {
   register ptr gf←c94192 =  (ptr) &globalframe;
   /* RegisterEventProcs: */ 
SOURCE(63359, 3162)
SOURCE(63407, 46)
   {
      word pd968;
      pd968 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd968 ))))((* (( (ptr) gf←c94192)+215) ), (word) (( (bPt) gf←c94192)+1316)/* var←c79824 */ , 4, 1, 0, pd968)
      ;
      };
SOURCE(63455, 40)
   {
      word pd969;
      pd969 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd969 ))))((* (( (ptr) gf←c94192)+216) ), (word) (( (bPt) gf←c94192)+1300)/* var←c79760 */ , 1, 1, 0, pd969)
      ;
      };
SOURCE(63497, 45)
   {
      word pd970;
      pd970 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd970 ))))((* (( (ptr) gf←c94192)+217) ), (word) (( (bPt) gf←c94192)+1284)/* var←c79696 */ , 1, 1, 0, pd970)
      ;
      };
SOURCE(63544, 63)
   {
      word pd971;
      pd971 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd971 ))))((* (( (ptr) gf←c94192)+218) ), (word) (( (bPt) gf←c94192)+1276)/* var←c79664 */ , 1, 1, 0, pd971)
      ;
      };
SOURCE(63609, 43)
   {
      word pd972;
      pd972 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd972 ))))((* (( (ptr) gf←c94192)+219) ), (word) (( (bPt) gf←c94192)+1260)/* var←c79600 */ , 0, 1, 0, pd972)
      ;
      };
SOURCE(63654, 59)
   {
      word pd973;
      pd973 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd973 ))))((* (( (ptr) gf←c94192)+220) ), (word) (( (bPt) gf←c94192)+1220)/* var←c79440 */ , 0, 1, 0, pd973)
      ;
      };
SOURCE(63715, 57)
   {
      word pd974;
      pd974 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd974 ))))((* (( (ptr) gf←c94192)+221) ), (word) (( (bPt) gf←c94192)+1212)/* var←c79408 */ , 0, 1, 0, pd974)
      ;
      };
SOURCE(63774, 66)
   {
      word pd975;
      pd975 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd975 ))))((* (( (ptr) gf←c94192)+222) ), (word) (( (bPt) gf←c94192)+1180)/* var←c79280 */ , 4, 1, 0, pd975)
      ;
      };
SOURCE(63842, 65)
   {
      word pd976;
      pd976 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd976 ))))((* (( (ptr) gf←c94192)+223) ), (word) (( (bPt) gf←c94192)+1172)/* var←c79248 */ , 1, 1, 0, pd976)
      ;
      };
SOURCE(63909, 69)
   {
      word pd977;
      pd977 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd977 ))))((* (( (ptr) gf←c94192)+224) ), (word) (( (bPt) gf←c94192)+1164)/* var←c79216 */ , 0, 1, 0, pd977)
      ;
      };
SOURCE(63980, 71)
   {
      word pd978;
      pd978 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd978 ))))((* (( (ptr) gf←c94192)+225) ), (word) (( (bPt) gf←c94192)+1156)/* var←c79184 */ , 0, 1, 0, pd978)
      ;
      };
SOURCE(64053, 37)
   {
      word pd979;
      pd979 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd979 ))))((* (( (ptr) gf←c94192)+226) ), (word) (( (bPt) gf←c94192)+1148)/* var←c79152 */ , 0, 1, 0, pd979)
      ;
      };
SOURCE(64093, 57)
   {
      word pd980;
      pd980 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd980 ))))((* (( (ptr) gf←c94192)+227) ), (word) (( (bPt) gf←c94192)+1372)/* var←c80048 */ , 3, 1, 0, pd980)
      ;
      };
SOURCE(64152, 52)
   {
      word pd981;
      pd981 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd981 ))))((* (( (ptr) gf←c94192)+228) ), (word) (( (bPt) gf←c94192)+1348)/* var←c79952 */ , 0, 1, 0, pd981)
      ;
      };
SOURCE(64206, 43)
   {
      word pd982;
      pd982 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd982 ))))((* (( (ptr) gf←c94192)+229) ), (word) (( (bPt) gf←c94192)+1356)/* var←c79984 */ , 0, 1, 0, pd982)
      ;
      };
SOURCE(64251, 37)
   {
      word pd983;
      pd983 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd983 ))))((* (( (ptr) gf←c94192)+230) ), (word) (( (bPt) gf←c94192)+1364)/* var←c80016 */ , 0, 1, 0, pd983)
      ;
      };
SOURCE(64290, 41)
   {
      word pd984;
      pd984 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd984 ))))((* (( (ptr) gf←c94192)+231) ), (word) (( (bPt) gf←c94192)+1340)/* var←c79920 */ , 0, 1, 0, pd984)
      ;
      };
SOURCE(64333, 35)
   {
      word pd985;
      pd985 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd985 ))))((* (( (ptr) gf←c94192)+232) ), (word) (( (bPt) gf←c94192)+1332)/* var←c79888 */ , 0, 1, 0, pd985)
      ;
      };
SOURCE(64370, 49)
   {
      word pd986;
      pd986 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd986 ))))((* (( (ptr) gf←c94192)+233) ), (word) (( (bPt) gf←c94192)+1324)/* var←c79856 */ , 0, 1, 0, pd986)
      ;
      };
SOURCE(64422, 31)
   {
      word pd987;
      pd987 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd987 ))))((* (( (ptr) gf←c94192)+234) ), (word) (( (bPt) gf←c94192)+1476)/* var←c80464 */ , 0, 1, 0, pd987)
      ;
      };
SOURCE(64455, 59)
   {
      word pd988;
      pd988 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd988 ))))((* (( (ptr) gf←c94192)+235) ), (word) (( (bPt) gf←c94192)+1468)/* var←c80432 */ , 0, 1, 0, pd988)
      ;
      };
SOURCE(64516, 37)
   {
      word pd989;
      pd989 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd989 ))))((* (( (ptr) gf←c94192)+236) ), (word) (( (bPt) gf←c94192)+1460)/* var←c80400 */ , 0, 1, 0, pd989)
      ;
      };
SOURCE(64555, 35)
   {
      word pd990;
      pd990 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd990 ))))((* (( (ptr) gf←c94192)+237) ), (word) (( (bPt) gf←c94192)+1452)/* var←c80368 */ , 0, 1, 0, pd990)
      ;
      };
SOURCE(64592, 77)
   {
      word pd991;
      pd991 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd991 ))))((* (( (ptr) gf←c94192)+238) ), (word) (( (bPt) gf←c94192)+1436)/* var←c80304 */ , 3, 1, 0, pd991)
      ;
      };
SOURCE(64671, 39)
   {
      word pd992;
      pd992 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd992 ))))((* (( (ptr) gf←c94192)+239) ), (word) (( (bPt) gf←c94192)+1444)/* var←c80336 */ , 0, 1, 0, pd992)
      ;
      };
SOURCE(64712, 45)
   {
      word pd993;
      pd993 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd993 ))))((* (( (ptr) gf←c94192)+240) ), (word) (( (bPt) gf←c94192)+1428)/* var←c80272 */ , 0, 1, 0, pd993)
      ;
      };
SOURCE(64759, 41)
   {
      word pd994;
      pd994 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd994 ))))((* (( (ptr) gf←c94192)+241) ), (word) (( (bPt) gf←c94192)+1412)/* var←c80208 */ , 0, 1, 0, pd994)
      ;
      };
SOURCE(64802, 43)
   {
      word pd995;
      pd995 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd995 ))))((* (( (ptr) gf←c94192)+242) ), (word) (( (bPt) gf←c94192)+1420)/* var←c80240 */ , 0, 1, 0, pd995)
      ;
      };
SOURCE(64847, 57)
   {
      word pd996;
      pd996 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd996 ))))((* (( (ptr) gf←c94192)+243) ), (word) (( (bPt) gf←c94192)+1404)/* var←c80176 */ , 3, 1, 0, pd996)
      ;
      };
SOURCE(64906, 55)
   {
      word pd997;
      pd997 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd997 ))))((* (( (ptr) gf←c94192)+244) ), (word) (( (bPt) gf←c94192)+1388)/* var←c80112 */ , 3, 1, 0, pd997)
      ;
      };
SOURCE(64963, 61)
   {
      word pd998;
      pd998 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd998 ))))((* (( (ptr) gf←c94192)+245) ), (word) (( (bPt) gf←c94192)+1396)/* var←c80144 */ , 3, 1, 0, pd998)
      ;
      };
SOURCE(65027, 41)
   {
      word pd999;
      pd999 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd999 ))))((* (( (ptr) gf←c94192)+29) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd999)
      ;
      };
SOURCE(65070, 49)
   {
      word pd1000;
      pd1000 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1000 ))))((* (( (ptr) gf←c94192)+30) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1000)
      ;
      };
SOURCE(65121, 44)
   {
      word pd1001;
      pd1001 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1001 ))))((* (( (ptr) gf←c94192)+31) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1001)
      ;
      };
SOURCE(65167, 55)
   {
      word pd1002;
      pd1002 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1002 ))))((* (( (ptr) gf←c94192)+32) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1002)
      ;
      };
SOURCE(65224, 44)
   {
      word pd1003;
      pd1003 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1003 ))))((* (( (ptr) gf←c94192)+28) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1003)
      ;
      };
SOURCE(65271, 59)
   {
      word pd1004;
      pd1004 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1004 ))))((* (( (ptr) gf←c94192)+246) ), (word) (( (bPt) gf←c94192)+1500)/* var←c80560 */ , 0, 1, 0, pd1004)
      ;
      };
SOURCE(65332, 44)
   {
      word pd1005;
      pd1005 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1005 ))))((* (( (ptr) gf←c94192)+247) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1005)
      ;
      };
SOURCE(65378, 47)
   {
      word pd1006;
      pd1006 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1006 ))))((* (( (ptr) gf←c94192)+33) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1006)
      ;
      };
SOURCE(65427, 52)
   {
      word pd1007;
      pd1007 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1007 ))))((* (( (ptr) gf←c94192)+36) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1007)
      ;
      };
SOURCE(65481, 47)
   {
      word pd1008;
      pd1008 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1008 ))))((* (( (ptr) gf←c94192)+38) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1008)
      ;
      };
SOURCE(65530, 58)
   {
      word pd1009;
      pd1009 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1009 ))))((* (( (ptr) gf←c94192)+37) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 0, 1, 0, pd1009)
      ;
      };
SOURCE(65590, 43)
   {
      word pd1010;
      pd1010 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1010 ))))((* (( (ptr) gf←c94192)+35) ), (word) (( (bPt) gf←c94192)+1492)/* var←c80528 */ , 1, 1, 0, pd1010)
      ;
      };
SOURCE(65635, 41)
   {
      word pd1011;
      pd1011 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1011 ))))((* (( (ptr) gf←c94192)+54) ), (word) (( (bPt) gf←c94192)+1484)/* var←c80496 */ , 0, 1, 0, pd1011)
      ;
      };
SOURCE(65678, 42)
   {
      word pd1012;
      pd1012 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1012 ))))((* (( (ptr) gf←c94192)+248) ), (word) (( (bPt) gf←c94192)+1484)/* var←c80496 */ , 0, 1, 0, pd1012)
      ;
      };
SOURCE(65722, 43)
   {
      word pd1013;
      pd1013 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1013 ))))((* (( (ptr) gf←c94192)+249) ), (word) (( (bPt) gf←c94192)+1484)/* var←c80496 */ , 0, 1, 0, pd1013)
      ;
      };
SOURCE(65768, 49)
   {
      word pd1014;
      pd1014 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1014 ))))((* (( (ptr) gf←c94192)+250) ), (word) (( (bPt) gf←c94192)+1556)/* var←c80784 */ , 0, 1, 0, pd1014)
      ;
      };
SOURCE(65819, 47)
   {
      word pd1015;
      pd1015 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1015 ))))((* (( (ptr) gf←c94192)+251) ), (word) (( (bPt) gf←c94192)+1548)/* var←c80752 */ , 0, 1, 0, pd1015)
      ;
      };
SOURCE(65869, 78)
   {
      word pd1016;
      pd1016 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1016 ))))((* (( (ptr) gf←c94192)+252) ), (* (( (ptr) (* (( (ptr) gf←c94192)+397)/* var←c81040 */  ))+10)
          ), 0, 1, 0, pd1016);
      };
SOURCE(65949, 53)
   {
      word pd1017;
      pd1017 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1017 ))))((* (( (ptr) gf←c94192)+253) ), (word) (( (bPt) gf←c94192)+1124)/* var←c79056 */ , 0, 1, 0, pd1017)
      ;
      };
SOURCE(66004, 51)
   {
      word pd1018;
      pd1018 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1018 ))))((* (( (ptr) gf←c94192)+254) ), (word) (( (bPt) gf←c94192)+1116)/* var←c79024 */ , 0, 1, 0, pd1018)
      ;
      };
SOURCE(66057, 51)
   {
      word pd1019;
      pd1019 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1019 ))))((* (( (ptr) gf←c94192)+255) ), (word) (( (bPt) gf←c94192)+1108)/* var←c78992 */ , 0, 1, 0, pd1019)
      ;
      };
SOURCE(66110, 69)
   {
      word pd1020;
      pd1020 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1020 ))))((* (( (ptr) gf←c94192)+256) ), (word) (( (bPt) gf←c94192)+1100)/* var←c78960 */ , 0, 1, 0, pd1020)
      ;
      };
SOURCE(66181, 57)
   {
      word pd1021;
      pd1021 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1021 ))))((* (( (ptr) gf←c94192)+257) ), (word) (( (bPt) gf←c94192)+1092)/* var←c78928 */ , 0, 1, 0, pd1021)
      ;
      };
SOURCE(66240, 43)
   {
      word pd1022;
      pd1022 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1022 ))))((* (( (ptr) gf←c94192)+185) ), (word) (( (bPt) gf←c94192)+1140)/* var←c79120 */ , 0, 1, 0, pd1022)
      ;
      };
SOURCE(66285, 47)
   {
      word pd1023;
      pd1023 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1023 ))))((* (( (ptr) gf←c94192)+258) ), (word) (( (bPt) gf←c94192)+1132)/* var←c79088 */ , 0, 1, 0, pd1023)
      ;
      };
SOURCE(66334, 57)
   {
      word pd1024;
      pd1024 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1024 ))))((* (( (ptr) gf←c94192)+259) ), (word) (( (bPt) gf←c94192)+1076)/* var←c78864 */ , 0, 1, 0, pd1024)
      ;
      };
SOURCE(66393, 63)
   {
      word pd1025;
      pd1025 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1025 ))))((* (( (ptr) gf←c94192)+260) ), (word) (( (bPt) gf←c94192)+1068)/* var←c78832 */ , 0, 1, 0, pd1025)
      ;
      };
SOURCE(66458, 63)
   {
      word pd1026;
      pd1026 = (* (( (ptr) (* (( (ptr) gf←c94192)+399)/* var←c81392 */  ))+10) );
      (void) ( *( (fPt) ((*  (ptr) pd1026 ))))((* (( (ptr) gf←c94192)+261) ), (word) (( (bPt) gf←c94192)+1060)/* var←c78800 */ , 0, 1, 0, pd1026)
      ;
      };
   }

static void NoName←Q8880(formal←c0843, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
   word formal←c0843;
   word formal←c200012;
   word formal←c200013;
   word formal←c200014;
   word formal←c200015;
   {
   register ptr gf←c0984 =  (ptr) &globalframe;
   if ((formal←c200013 == (* (( (ptr) (* (( (ptr) gf←c0984)+430)/* var←c85648 */  ))+4) ))) {
      {
         word position←v69456;
         word wasThere←v69484;
         word notThere←v69512;
         position←v69456 = (*  (ptr) formal←c200015 );
         wasThere←v69484 = (* (( (ptr) formal←c200015)+1) );
         notThere←v69512 = (* (( (ptr) formal←c200015)+2) );
SOURCE(47423, 16)
         (*  (ptr) formal←c0843 ) = 2;
         (* (( (ptr) formal←c0843)+1) ) = 4;
         return;
         };
      };
   (*  (ptr) formal←c0843 ) = 0;
   (* (( (ptr) formal←c0843)+1) ) = 0;
   return;
   }

static void NoName←Q8940(formal←c0851, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
   word formal←c0851;
   word formal←c200008;
   word formal←c200009;
   word formal←c200010;
   word formal←c200011;
   {
   register ptr gf←c0985 =  (ptr) &globalframe;
   if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0985)+430)/* var←c85648 */  ))+4) ))) {
      {
         word position←v65832;
         word wasThere←v65860;
         word notThere←v65888;
         position←v65832 = (*  (ptr) formal←c200011 );
         wasThere←v65860 = (* (( (ptr) formal←c200011)+1) );
         notThere←v65888 = (* (( (ptr) formal←c200011)+2) );
SOURCE(37154, 16)
         (*  (ptr) formal←c0851 ) = 2;
         (* (( (ptr) formal←c0851)+1) ) = 3;
         return;
         };
      };
   (*  (ptr) formal←c0851 ) = 0;
   (* (( (ptr) formal←c0851)+1) ) = 0;
   return;
   }

static void NoName←Q9000(formal←c0856, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
   word formal←c0856;
   word formal←c200004;
   word formal←c200005;
   word formal←c200006;
   word formal←c200007;
   {
   if ((formal←c200005 == XR←Unwind)) {
SOURCE(8102, 35)
      (*  (ptr) (* (( (ptr) (* (( (ptr) (*  (ptr) formal←c200004 ))+4) ))+15) ) ) = (* (( (ptr) (*  (ptr) formal←c200004 ))+8) );
SOURCE(8139, 38)
      (* (( (ptr) (* (( (ptr) (* (( (ptr) (*  (ptr) formal←c200004 ))+4) ))+15) ))+1) ) = (* (( (ptr) (*  (ptr) formal←c200004 ))+9)
       );
      };
   (*  (ptr) formal←c0856 ) = 0;
   (* (( (ptr) formal←c0856)+1) ) = 0;
   return;
   }

static void NoName←Q9060(formal←c0861, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
   word formal←c0861;
   word formal←c200000;
   word formal←c200001;
   word formal←c200002;
   word formal←c200003;
   {
   register ptr gf←c0986 =  (ptr) &globalframe;
   if ((formal←c200001 == (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c0986)+408)/* var←c82128 */  ))+4) ) )) || (formal←c200001 == (* (
      ( (ptr) (* (( (ptr) gf←c0986)+393)/* var←c80880 */  ))+5) ))) {
SOURCE(7251, 10)
      (*  (ptr) formal←c0861 ) = 2;
      (* (( (ptr) formal←c0861)+1) ) = 2;
      return;
      };
   (*  (ptr) formal←c0861 ) = 0;
   (* (( (ptr) formal←c0861)+1) ) = 0;
   return;
   }

/* file: GGEventImplF, module: GGEventImplF, compiled at: July 13, 1993 1:36:14 pm PDT */ 
extern void XR←install←GGEventImplF() {
   NoName←Q8580();
   }
extern void XR←run←GGEventImplF() { XR←Start(&globalframe); }