/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: July 11, 1993 7:58:14 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: GGFileImpl, module: GGFileImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [447707424,3287972372] GGFileImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2;} W3;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; W3 r;} W11;
typedef struct {word f0, f1;} W2;
typedef struct {W8 f; W2 r;} W10;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
#define SOURCE(p, l) /* source p, l */
static float fc122 = 32767.0;
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
static float fc127 = 1.0;
static float fc148 = 100.0;
static float fc153 = 8607.17;
static float fc240 = 8706.16;
static float fc278 = 0.0;
static float fc279 = -1.0;
static float fc335 = 8605.22;
static float fc338 = 8705.14;
static void NoName←Q4740();
static void GGFileImpl←P0();
static word CreateOutputColorTable←P60();
static word PickANumber←P120();
static void FindColorInIntensityTable←P180();
static void AddColorToOutputTable←P240();
static void FileinSceneAndOptions←P300();
static word NoName←Q4800();
static void FileinSceneOnly←P360();
static word NoName←Q4860();
static void FileinOptionsOnly←P420();
static word NoName←Q4920();
static void ReadHeaderAndOptions←P480();
static void ReadSceneFields←P540();
static void ReadOptions←P600();
static word ReadListOfAtom←P660();
static word NoName←Q4980();
static word AtomsOnOneLineOrParenProc←P3516();
static word AppendAtomToAtomList←P720();
static word FindOption←P780();
static void RegisterAllOptions←P840();
static void RegisterOption←P3576();
static void RegisterSceneField←P3636();
static void ProcessSceneField←P900();
static void ProcessOption←P960();
static void ProcessViewTransform←P1020();
static void ProcessPaletteForFillColor←P1080();
static void ProcessPaletteForStrokeColor←P1140();
static void ProcessPalette←P1200();
static void ProcessScripts←P1260();
static void ProcessSlope←P1320();
static void ProcessAngle←P1380();
static void ProcessRadius←P1440();
static void ProcessLineDistance←P1500();
static void ProcessAnchor←P1560();
static void ProcessMidpoints←P1620();
static void ProcessHeuristics←P1680();
static void ProcessShowAlignments←P1740();
static void ProcessShowColors←P1800();
static void ProcessGravity←P1860();
static void ProcessScaleUnit←P1920();
static void ProcessDisplayStyle←P1980();
static void ProcessGravityExtent←P2040();
static void ProcessGravityType←P2100();
static void ProcessDefaultFont←P2160();
static word NoName←Q5040();
static void ProcessDefaults←P2220();
static void ProcessDashed←P2280();
static void ProcessShadows←P2340();
static void ProcessActive←P2400();
static void ProcessBackgroundColor←P2460();
static void SkipOptions←P2520();
static word FileinEntity←P2580();
static void FileoutSceneAndOptions←P2640();
static word DoFileOut←P4464();
static void FileoutSceneOnly←P2700();
static word DoFileOut←P4524();
static void FileoutSceneFields←P2760();
static void FileoutOptions←P2820();
static word IsEndLine←P2880();
static void NoName←Q5100();
static void NoName←Q5160();
static void NoName←Q5220();
static void NoName←Q5280();
static void NoName←Q5340();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\032\257\171\040\300\303\372\172\024\100\214\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\004\035\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\032\257\171\040\300\303\372\172\024\100\200\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\003\001\000"};
static struct {unsigned f; char r[12];} string5 = {524300, "\210\241\000\300\177\377\377\377\000\000\000"};
static struct {unsigned f; char r[4];} string6 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string7 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string8 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\032\257\171\040\300\303\372\172\024\101\320\000\000"};
static struct {unsigned f; char r[44];} string10 = {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];} string11 = {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[24];} string12 = {1310744, "\260\006\005\146\151\162\163\164\216\251\005\004\162\145\163\164\214\216\251\261\000\000\000"};
static struct {unsigned f; char r[4];} string13 = {131074, "\004\003\000"};
static struct {unsigned f; char r[20];} string14 = {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[12];} string15 = {524300, "Gargoyle\000\000\000"};
static struct {unsigned f; char r[28];} string16 = {1638428, "Gargoyle file for scene: \000\000"};
static struct {unsigned f; char r[20];} string17 = {1245204, "Produced by version"};
static struct {unsigned f; char r[12];} string18 = {720908, "ReadOptions"};
static struct {unsigned f; char r[4];} string19 = {131076, "]:\000"};
static struct {unsigned f; char r[12];} string20 = {589836, "Entities:\000\000"};
static struct {unsigned f; char r[44];} string21 = {2621484, "position: %g, wasThere: %g, notThere: %g\000\000\000"};
static struct {unsigned f; char r[16];} string22 = {851984, "ViewTransform\000\000"};
static struct {unsigned f; char r[20];} string23 = {1245204, "PaletteForFillColor"};
static struct {unsigned f; char r[24];} string24 = {1376280, "PaletteForStrokeColor\000\000"};
static struct {unsigned f; char r[8];} string25 = {458760, "Palette"};
static struct {unsigned f; char r[8];} string26 = {458760, "Scripts"};
static struct {unsigned f; char r[8];} string27 = {327688, "Slope\000\000"};
static struct {unsigned f; char r[8];} string28 = {327688, "Angle\000\000"};
static struct {unsigned f; char r[8];} string29 = {393224, "Radius\000"};
static struct {unsigned f; char r[16];} string30 = {786448, "LineDistance\000\000\000"};
static struct {unsigned f; char r[8];} string31 = {393224, "Anchor\000"};
static struct {unsigned f; char r[12];} string32 = {589836, "Midpoints\000\000"};
static struct {unsigned f; char r[12];} string33 = {655372, "Heuristics\000"};
static struct {unsigned f; char r[16];} string34 = {917520, "ShowAlignments\000"};
static struct {unsigned f; char r[12];} string35 = {655372, "ShowColors\000"};
static struct {unsigned f; char r[8];} string36 = {458760, "Gravity"};
static struct {unsigned f; char r[12];} string37 = {589836, "ScaleUnit\000\000"};
static struct {unsigned f; char r[16];} string38 = {786448, "DisplayStyle\000\000\000"};
static struct {unsigned f; char r[16];} string39 = {851984, "GravityExtent\000\000"};
static struct {unsigned f; char r[12];} string40 = {720908, "GravityType"};
static struct {unsigned f; char r[12];} string41 = {720908, "DefaultFont"};
static struct {unsigned f; char r[12];} string42 = {524300, "Defaults\000\000\000"};
static struct {unsigned f; char r[8];} string43 = {393224, "Dashed\000"};
static struct {unsigned f; char r[8];} string44 = {458760, "Shadows"};
static struct {unsigned f; char r[8];} string45 = {393224, "Active\000"};
static struct {unsigned f; char r[16];} string46 = {983056, "BackgroundColor"};
static struct {unsigned f; char r[40];} string47 = {2359336, "Unknown keyword in gargoyle file: %g\000\000\000"};
static struct {unsigned f; char r[8];} string48 = {327688, "Error\000\000"};
static struct {unsigned f; char r[8];} string49 = {327688, "miter\000\000"};
static struct {unsigned f; char r[8];} string50 = {327688, "bevel\000\000"};
static struct {unsigned f; char r[8];} string51 = {393224, "square\000"};
static struct {unsigned f; char r[8];} string52 = {262152, "butt\000\000\000"};
static struct {unsigned f; char r[12];} string53 = {524300, "Outline:\000\000\000"};
static struct {unsigned f; char r[8];} string54 = {458760, "Outline"};
static struct {unsigned f; char r[8];} string55 = {327688, "Slice\000\000"};
static struct {unsigned f; char r[8];} string56 = {458760, "Cluster"};
static struct {unsigned f; char r[32];} string57 = {1835040, "Gargoyle file for scene: %g\012\000\000\000"};
static struct {unsigned f; char r[28];} string58 = {1572892, "Produced by version %g\012\012\000\000\000"};
static struct {unsigned f; char r[20];} string59 = {1114132, "Entities: [%g]:\012\012\000\000"};
static struct {unsigned f; char r[20];} string60 = {1114132, "BackgroundColor: \000\000"};
static struct {unsigned f; char r[16];} string61 = {983056, "ViewTransform: "};
static struct {unsigned f; char r[12];} string62 = {589836, "Scripts: \000\000"};
static struct {unsigned f; char r[8];} string63 = {458760, "Slope: "};
static struct {unsigned f; char r[8];} string64 = {458760, "Angle: "};
static struct {unsigned f; char r[12];} string65 = {524300, "Radius: \000\000\000"};
static struct {unsigned f; char r[16];} string66 = {917520, "LineDistance: \000"};
static struct {unsigned f; char r[16];} string67 = {786448, "\012Midpoints: \000\000\000"};
static struct {unsigned f; char r[16];} string68 = {851984, "\012Heuristics: \000\000"};
static struct {unsigned f; char r[20];} string69 = {1114132, "\012ShowAlignments: \000\000"};
static struct {unsigned f; char r[16];} string70 = {917520, "\012ScaleUnit: %g\000"};
static struct {unsigned f; char r[20];} string71 = {1114132, "\012DisplayStyle: %g\000\000"};
static struct {unsigned f; char r[12];} string72 = {655372, "\012Gravity: \000"};
static struct {unsigned f; char r[20];} string73 = {1179668, "\012GravityExtent: %g\000"};
static struct {unsigned f; char r[20];} string74 = {1048596, "\012GravityType: %g\000\000\000"};
static struct {unsigned f; char r[20];} string75 = {1114132, "\012DefaultFont: %g \000\000"};
static struct {unsigned f; char r[8];} string76 = {393224, " %g %g\000"};
static struct {unsigned f; char r[12];} string77 = {720908, "\012Defaults: "};
static struct {unsigned f; char r[4];} string78 = {196612, " %g"};
static struct {unsigned f; char r[8];} string79 = {327688, "round\000\000"};
static struct {unsigned f; char r[12];} string80 = {589836, "\012Dashed: \000\000"};
static struct {unsigned f; char r[12];} string81 = {655372, "\012Shadows: \000"};
static struct {unsigned f; char r[12];} string82 = {589836, "\012Anchor: \000\000"};
static struct {unsigned f; char r[12];} string83 = {655372, "\012Palette: \000"};
static struct {unsigned f; char r[12];} string84 = {589836, "\012Active: \000\000"};
static struct {unsigned f; char r[16];} string85 = {851984, "\257\300\032\257\171\040\300\303\372\172\024\100\164\000\000"};
static struct {unsigned f; char r[16];} string86 = {786444, "\006\002\020\001\100\124\010\000\004\100\106\001\000\000\000"};
static struct {unsigned f; char r[16];} string87 = {851984, "\257\300\055\153\222\376\300\327\164\352\142\100\150\000\000"};
static struct {unsigned f; char r[16];} string88 = {851984, "\257\300\223\215\300\016\300\070\141\304\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string89 = {851984, "\257\300\006<7[\300;CV\364@h\000\000"};
static struct {unsigned f; char r[16];} string90 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"};
static struct {unsigned f; char r[16];} string91 = {851984, "\257\300\322\334\347\304\300\124\107\000\027\100\150\000\000"};
static struct {unsigned f; char r[16];} string92 = {851984, "\257\300\231\005\151\136\300\275\231\323\274\100\150\000\000"};
static struct {unsigned f; char r[16];} string93 = {851984, "\257\300\003\033\274\104\300\263\246\312\006\100\150\000\000"};
static struct {unsigned f; char r[16];} string94 = {851984, "\257\300\374\260\327\235\300\333\341\342\010\100\150\000\000"};
static struct {unsigned f; char r[16];} string95 = {851984, "\257\300\236\155\220\261\300\040\017\026\014\100\150\000\000"};
static struct {unsigned f; char r[16];} string96 = {851984, "\257\300\045\215\147\016\300\153\043\150\276\100\150\000\000"};
static struct {unsigned f; char r[16];} string97 = {851984, "\257\300\347\101\365\007\300\150\102\366\020\100\150\000\000"};
static struct {unsigned f; char r[16];} string98 = {851984, "\257\300\011\245\206\305\300\112\326\356\245\100\150\000\000"};
static struct {unsigned f; char r[16];} string99 = {851984, "\257\300U$)\337\300Xo9\243@t\000\000"};
static struct {unsigned f; char r[16];} string100 = {851984, "\257\300\336\025\013\356\300\216\115\352\271\100\150\000\000"};
static struct {unsigned f; char r[16];} string101 = {851984, "\257\300\206\055\004\241\300\261\334\001\116\100\150\000\000"};
static struct {unsigned f; char r[16];} string102 = {851984, "\257\300\272\336\377\011\300\305\371\262\224\100\150\000\000"};
static struct {unsigned f; char r[16];} string103 = {851984, "\257\300\370\132\042\205\300\045\133\011\125\100\150\000\000"};
static struct {unsigned f; char r[16];} string104 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\150\000\000"};
static struct {unsigned f; char r[16];} string105 = {851984, "\257\300ZT?\010\300\370;=;@h\000\000"};
static struct {unsigned f; char r[16];} string106 = {851984, "\257\300\207\164\301\163\300\327\135\041\305\100\150\000\000"};
static struct {unsigned f; char r[16];} string107 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string108 = {851984, "\257\300\246\205\220\035\300\344\000\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string109 = {851984, "\257\300\242\221\264\046\300\105\142\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string110 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string111 = {851984, "\257\300\353\035\365\325\300\132\075\117\337\100\150\000\000"};
static struct {unsigned f; char r[16];} string112 = {851984, "\257\300\072\337\114\355\300\232\070\352\142\100\150\000\000"};
static struct {unsigned f; char r[16];} string113 = {851984, "\257\300\336\236\035\002\300\277\054\247\126\100\150\000\000"};
static struct {unsigned f; char r[16];} string114 = {851984, "\257\300\377\364\135\257\300\102\147\030\055\100\150\000\000"};
static struct {
   word f0[91]; word f91; word f92; word f93; 
   word f94; word f95; word f96; word f97; 
   word f98; word f99; word f100; word f101; 
   word f102; word f103; word f104; word f105; 
   word f106; word f107; word f108; word f109; 
   word f110; word f111; word f112; word f113; 
   word f114; word f115; word f116; word f117; 
   word f118; word f119; word f120; word f121; 
   word f122; word f123; word f124; word f125; 
   word f126; word f127; word f128; word f129; 
   word f130; word f131; word f132; word f133; 
   word f134; word f135; word f136; word f137; 
   word f138; word f139; word f140; word f141; 
   word f142; word f143; word f144; word f145; 
   word f146; word f147; word f148; word f149; 
   word f150; word f151; word f152; word f153; 
   word f154; word f155; word f156; word f157; 
   word f158; word f159; word f160; word f161; 
   word f162; word f163; word f164; word f165; 
   word f166; word f167; word f168; word f169; 
   word f170; word f171; word f172; word f173; 
   word f174; word f175; word f176; word f177; 
   word f178; word f179; word f180; word f181; 
   word f182; word f183; word f184; word f185; 
   word f186; word f187; word f188[28]; 
   } globalframe = {
   {0}, (word) IsEndLine←P2880, 0, (word) FileoutOptions←P2820, 
   0, (word) FileoutSceneFields←P2760, 0, (word) FileoutSceneOnly←P2700, 
   0, (word) FileoutSceneAndOptions←P2640, 0, (word) FileinEntity←P2580, 
   0, (word) SkipOptions←P2520, 0, (word) ProcessBackgroundColor←P2460, 
   0, (word) ProcessActive←P2400, 0, (word) ProcessShadows←P2340, 
   0, (word) ProcessDashed←P2280, 0, (word) ProcessDefaults←P2220, 
   0, (word) ProcessDefaultFont←P2160, 0, (word) ProcessGravityType←P2100, 
   0, (word) ProcessGravityExtent←P2040, 0, (word) ProcessDisplayStyle←P1980, 
   0, (word) ProcessScaleUnit←P1920, 0, (word) ProcessGravity←P1860, 
   0, (word) ProcessShowColors←P1800, 0, (word) ProcessShowAlignments←P1740, 
   0, (word) ProcessHeuristics←P1680, 0, (word) ProcessMidpoints←P1620, 
   0, (word) ProcessAnchor←P1560, 0, (word) ProcessLineDistance←P1500, 
   0, (word) ProcessRadius←P1440, 0, (word) ProcessAngle←P1380, 
   0, (word) ProcessSlope←P1320, 0, (word) ProcessScripts←P1260, 
   0, (word) ProcessPalette←P1200, 0, (word) ProcessPaletteForStrokeColor←P1140, 
   0, (word) ProcessPaletteForFillColor←P1080, 0, (word) ProcessViewTransform←P1020, 
   0, (word) ProcessOption←P960, 0, (word) ProcessSceneField←P900, 
   0, (word) RegisterAllOptions←P840, 0, (word) FindOption←P780, 
   0, (word) AppendAtomToAtomList←P720, 0, (word) ReadListOfAtom←P660, 
   0, (word) ReadOptions←P600, 0, (word) ReadSceneFields←P540, 
   0, (word) ReadHeaderAndOptions←P480, 0, (word) FileinOptionsOnly←P420, 
   0, (word) FileinSceneOnly←P360, 0, (word) FileinSceneAndOptions←P300, 
   0, (word) AddColorToOutputTable←P240, 0, (word) FindColorInIntensityTable←P180, 
   0, (word) PickANumber←P120, 0, (word) CreateOutputColorTable←P60, 
   0, (word) GGFileImpl←P0, {0}
   };

static void NoName←Q4740()
   {
   register ptr gf←c0587 =  (ptr) &globalframe;
   word var←c63500;
   (* (( (ptr) gf←c0587)+6) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf←c0587)+7) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf←c0587)+8) ) = (word) XR←GetTypeIndexS((word) (&string5));
   (* (( (ptr) gf←c0587)+9) ) = (word) XR←GetTypeIndex((word) &string6, 0, (word) &string7);
   (* (( (ptr) gf←c0587)+13) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string7);
   (* (( (ptr) gf←c0587)+14) ) = (word) XR←GetTypeIndexS((word) (&string9));
   (* (( (ptr) gf←c0587)+15) ) = (word) XR←GetTypeIndex((word) &string10, 0, (word) &string11);
   (* (( (ptr) gf←c0587)+19) ) = (word) XR←GetTypeIndex((word) &string12, 0, (word) &string13);
   (* (( (ptr) gf←c0587)+20) ) = (word) XR←GetTypeIndex((word) &string14, 0, (word) &string13);
   (*  (ptr) (( (bPt) gf←c0587)+84) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+9) ), (word) &string15);
   (*  (ptr) (( (bPt) gf←c0587)+88) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string16);
   (*  (ptr) (( (bPt) gf←c0587)+92) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string17);
   (*  (ptr) (( (bPt) gf←c0587)+96) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+9) ), (word) &string18);
   (*  (ptr) (( (bPt) gf←c0587)+100) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string19);
   (*  (ptr) (( (bPt) gf←c0587)+104) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string20);
   (*  (ptr) (( (bPt) gf←c0587)+108) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string21);
   (*  (ptr) (( (bPt) gf←c0587)+112) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string22);
   (*  (ptr) (( (bPt) gf←c0587)+116) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string23);
   (*  (ptr) (( (bPt) gf←c0587)+120) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string24);
   (*  (ptr) (( (bPt) gf←c0587)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string25);
   (*  (ptr) (( (bPt) gf←c0587)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string26);
   (*  (ptr) (( (bPt) gf←c0587)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string27);
   (*  (ptr) (( (bPt) gf←c0587)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string28);
   (*  (ptr) (( (bPt) gf←c0587)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string29);
   (*  (ptr) (( (bPt) gf←c0587)+144) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string30);
   (*  (ptr) (( (bPt) gf←c0587)+148) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string31);
   (*  (ptr) (( (bPt) gf←c0587)+152) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string32);
   (*  (ptr) (( (bPt) gf←c0587)+156) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string33);
   (*  (ptr) (( (bPt) gf←c0587)+160) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string34);
   (*  (ptr) (( (bPt) gf←c0587)+164) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string35);
   (*  (ptr) (( (bPt) gf←c0587)+168) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string36);
   (*  (ptr) (( (bPt) gf←c0587)+172) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string37);
   (*  (ptr) (( (bPt) gf←c0587)+176) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string38);
   (*  (ptr) (( (bPt) gf←c0587)+180) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string39);
   (*  (ptr) (( (bPt) gf←c0587)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string40);
   (*  (ptr) (( (bPt) gf←c0587)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string41);
   (*  (ptr) (( (bPt) gf←c0587)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string42);
   (*  (ptr) (( (bPt) gf←c0587)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string43);
   (*  (ptr) (( (bPt) gf←c0587)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string44);
   (*  (ptr) (( (bPt) gf←c0587)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string45);
   (*  (ptr) (( (bPt) gf←c0587)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string46);
   (*  (ptr) (( (bPt) gf←c0587)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string47);
   (*  (ptr) (( (bPt) gf←c0587)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+9) ), (word) &string48);
   (*  (ptr) (( (bPt) gf←c0587)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string49);
   (*  (ptr) (( (bPt) gf←c0587)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string50);
   (*  (ptr) (( (bPt) gf←c0587)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string51);
   (*  (ptr) (( (bPt) gf←c0587)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string52);
   (*  (ptr) (( (bPt) gf←c0587)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string53);
   (*  (ptr) (( (bPt) gf←c0587)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+9) ), (word) &string54);
   (*  (ptr) (( (bPt) gf←c0587)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string55);
   (*  (ptr) (( (bPt) gf←c0587)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string56);
   (*  (ptr) (( (bPt) gf←c0587)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string57);
   (*  (ptr) (( (bPt) gf←c0587)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string58);
   (*  (ptr) (( (bPt) gf←c0587)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string59);
   (*  (ptr) (( (bPt) gf←c0587)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string60);
   (*  (ptr) (( (bPt) gf←c0587)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string61);
   (*  (ptr) (( (bPt) gf←c0587)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string62);
   (*  (ptr) (( (bPt) gf←c0587)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string63);
   (*  (ptr) (( (bPt) gf←c0587)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string64);
   (*  (ptr) (( (bPt) gf←c0587)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string65);
   (*  (ptr) (( (bPt) gf←c0587)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string66);
   (*  (ptr) (( (bPt) gf←c0587)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string67);
   (*  (ptr) (( (bPt) gf←c0587)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string68);
   (*  (ptr) (( (bPt) gf←c0587)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string69);
   (*  (ptr) (( (bPt) gf←c0587)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string70);
   (*  (ptr) (( (bPt) gf←c0587)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string71);
   (*  (ptr) (( (bPt) gf←c0587)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string72);
   (*  (ptr) (( (bPt) gf←c0587)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string73);
   (*  (ptr) (( (bPt) gf←c0587)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string74);
   (*  (ptr) (( (bPt) gf←c0587)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string75);
   (*  (ptr) (( (bPt) gf←c0587)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string76);
   (*  (ptr) (( (bPt) gf←c0587)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string77);
   (*  (ptr) (( (bPt) gf←c0587)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string78);
   (*  (ptr) (( (bPt) gf←c0587)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string79);
   (*  (ptr) (( (bPt) gf←c0587)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string80);
   (*  (ptr) (( (bPt) gf←c0587)+348) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string81);
   (*  (ptr) (( (bPt) gf←c0587)+352) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string82);
   (*  (ptr) (( (bPt) gf←c0587)+356) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string83);
   (*  (ptr) (( (bPt) gf←c0587)+360) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0587)+13) ), (word) &string84);
   (void) XR←DeclareGlobalFrame((word) "GGFileImpl", &globalframe, (word) XR←GetTypeIndex((word) &string85, 0, (word) &string86)
      , (word) (( (bPt) gf←c0587)+748)/* var←c58732 */ );
   var←c63500 = (word) XR←ImportInterface((word) "Atom", (word) XR←GetTypeIndexS((word) (&string87)), 16);
   (* (( (ptr) gf←c0587)+207)/* var←c60556 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67895555);
   var←c63500 = (word) XR←ImportInterface((word) "CardTab", (word) XR←GetTypeIndexS((word) (&string88)), 12);
   (* (( (ptr) gf←c0587)+190)/* var←c58860 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67371265);
   var←c63500 = (word) XR←ImportInterface((word) "CodeTimer", (word) XR←GetTypeIndexS((word) (&string89)), 21);
   (* (( (ptr) gf←c0587)+202)/* var←c59916 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 526850);
   (void) XR←ImportProcS(var←c63500, 526338);
   var←c63500 = (word) XR←ImportInterface((word) "Convert", (word) XR←GetTypeIndexS((word) (&string90)), 73);
   (* (( (ptr) gf←c0587)+209)/* var←c61292 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67373057);
   var←c63500 = (word) XR←ImportInterface((word) "Feedback", (word) XR←GetTypeIndexS((word) (&string91)), 25);
   (* (( (ptr) gf←c0587)+196)/* var←c59276 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 1313029);
   var←c63500 = (word) XR←ImportInterface((word) "GGCoreOps", (word) XR←GetTypeIndexS((word) (&string92)), 37);
   (* (( (ptr) gf←c0587)+194)/* var←c59052 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 135007747);
   (void) XR←ImportProcS(var←c63500, 134221056);
   (void) XR←ImportProcS(var←c63500, 526082);
   (void) XR←ImportProcS(var←c63500, 67110144);
   (void) XR←ImportProcS(var←c63500, 201596417);
   var←c63500 = (word) XR←ImportInterface((word) "GGEvent", (word) XR←GetTypeIndexS((word) (&string93)), 38);
   (* (( (ptr) gf←c0587)+203)/* var←c60044 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 529922);
   var←c63500 = (word) XR←ImportInterface((word) "GGFont", (word) XR←GetTypeIndexS((word) (&string94)), 16);
   (* (( (ptr) gf←c0587)+210)/* var←c61740 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 69731594);
   (void) XR←ImportProcS(var←c63500, 67109376);
   var←c63500 = (word) XR←ImportInterface((word) "GGParseIn", (word) XR←GetTypeIndexS((word) (&string95)), 26);
   (* (( (ptr) gf←c0587)+195)/* var←c59148 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67375873);
   (void) XR←ImportProcS(var←c63500, 67636226);
   (void) XR←ImportProcS(var←c63500, 67372033);
   (void) XR←ImportProcS(var←c63500, 134483713);
   (void) XR←ImportProcS(var←c63500, 201857026);
   (void) XR←ImportProcS(var←c63500, 67373313);
   (void) XR←ImportProcS(var←c63500, 67376129);
   (void) XR←ImportProcS(var←c63500, 67375105);
   (void) XR←ImportProcS(var←c63500, 67371777);
   (void) XR←ImportProcS(var←c63500, 134481921);
   (void) XR←ImportProcS(var←c63500, 67376897);
   (void) XR←ImportProcS(var←c63500, 67372801);
   (void) XR←ImportProcS(var←c63500, 262657);
   (void) XR←ImportProcS(var←c63500, 67376385);
   (void) XR←ImportProcS(var←c63500, 525826);
   (void) XR←ImportProcS(var←c63500, 525570);
   var←c63500 = (word) XR←ImportInterface((word) "GGParseOut", (word) XR←GetTypeIndexS((word) (&string96)), 15);
   (* (( (ptr) gf←c0587)+214)/* var←c62412 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 787714);
   (void) XR←ImportProcS(var←c63500, 526850);
   (void) XR←ImportProcS(var←c63500, 526338);
   (void) XR←ImportProcS(var←c63500, 527106);
   (void) XR←ImportProcS(var←c63500, 1051908);
   (void) XR←ImportProcS(var←c63500, 527362);
   (void) XR←ImportProcS(var←c63500, 525826);
   (void) XR←ImportProcS(var←c63500, 524802);
   var←c63500 = (word) XR←ImportInterface((word) "GGScene", (word) XR←GetTypeIndexS((word) (&string97)), 50);
   (* (( (ptr) gf←c0587)+200)/* var←c59532 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67374337);
   (void) XR←ImportProcS(var←c63500, 68164356);
   (void) XR←ImportProcS(var←c63500, 67903235);
   (void) XR←ImportProcS(var←c63500, 527362);
   (void) XR←ImportProcS(var←c63500, 787971);
   var←c63500 = (word) XR←ImportInterface((word) "GGSelect", (word) XR←GetTypeIndexS((word) (&string98)), 23);
   (* (( (ptr) gf←c0587)+199)/* var←c59500 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 786691);
   (void) XR←ImportProcS(var←c63500, 526594);
   var←c63500 = (word) XR←ImportInterface((word) "GGSlice", (word) XR←GetTypeIndexS((word) (&string99)), 128);
   (* (( (ptr) gf←c0587)+213)/* var←c62028 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67371777);
   var←c63500 = (word) XR←ImportInterface((word) "GGSliceOps", (word) XR←GetTypeIndexS((word) (&string100)), 73);
   (* (( (ptr) gf←c0587)+212)/* var←c61996 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 540930);
   (void) XR←ImportProcS(var←c63500, 68436485);
   var←c63500 = (word) XR←ImportInterface((word) "GGState", (word) XR←GetTypeIndexS((word) (&string101)), 119);
   (* (( (ptr) gf←c0587)+205)/* var←c60236 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67386369);
   (void) XR←ImportProcS(var←c63500, 67387393);
   (void) XR←ImportProcS(var←c63500, 67372289);
   (void) XR←ImportProcS(var←c63500, 67387905);
   (void) XR←ImportProcS(var←c63500, 67393793);
   (void) XR←ImportProcS(var←c63500, 67393281);
   (void) XR←ImportProcS(var←c63500, 67392769);
   (void) XR←ImportProcS(var←c63500, 67388417);
   (void) XR←ImportProcS(var←c63500, 67395073);
   (void) XR←ImportProcS(var←c63500, 67384833);
   (void) XR←ImportProcS(var←c63500, 67394561);
   (void) XR←ImportProcS(var←c63500, 67384321);
   (void) XR←ImportProcS(var←c63500, 201600257);
   (void) XR←ImportProcS(var←c63500, 201597953);
   (void) XR←ImportProcS(var←c63500, 134487297);
   (void) XR←ImportProcS(var←c63500, 134486273);
   (void) XR←ImportProcS(var←c63500, 67372545);
   (void) XR←ImportProcS(var←c63500, 539906);
   (void) XR←ImportProcS(var←c63500, 545794);
   (void) XR←ImportProcS(var←c63500, 547330);
   (void) XR←ImportProcS(var←c63500, 546818);
   (void) XR←ImportProcS(var←c63500, 541954);
   (void) XR←ImportProcS(var←c63500, 810755);
   (void) XR←ImportProcS(var←c63500, 546306);
   (void) XR←ImportProcS(var←c63500, 538370);
   (void) XR←ImportProcS(var←c63500, 548098);
   (void) XR←ImportProcS(var←c63500, 537858);
   (void) XR←ImportProcS(var←c63500, 1061380);
   (void) XR←ImportProcS(var←c63500, 1059076);
   (void) XR←ImportProcS(var←c63500, 795139);
   (void) XR←ImportProcS(var←c63500, 793347);
   (void) XR←ImportProcS(var←c63500, 1050884);
   (void) XR←ImportProcS(var←c63500, 540930);
   var←c63500 = (word) XR←ImportInterface((word) "GGUIUtility", (word) XR←GetTypeIndexS((word) (&string102)), 10);
   (* (( (ptr) gf←c0587)+198)/* var←c59468 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67371521);
   (void) XR←ImportProcS(var←c63500, 67372033);
   (void) XR←ImportProcS(var←c63500, 67371777);
   (void) XR←ImportProcS(var←c63500, 67372289);
   (void) XR←ImportProcS(var←c63500, 525826);
   var←c63500 = (word) XR←ImportInterface((word) "GGUtility", (word) XR←GetTypeIndexS((word) (&string103)), 42);
   (* (( (ptr) gf←c0587)+197)/* var←c59340 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 135008515);
   (void) XR←ImportProcS(var←c63500, 134221824);
   var←c63500 = (word) XR←ImportInterface((word) "Imager", (word) XR←GetTypeIndexS((word) (&string104)), 84);
   (* (( (ptr) gf←c0587)+211)/* var←c61836 */  ) = var←c63500;
   var←c63500 = (word) XR←ImportInterface((word) "ImagerColor", (word) XR←GetTypeIndexS((word) (&string105)), 32);
   (* (( (ptr) gf←c0587)+193)/* var←c58988 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67372801);
   var←c63500 = (word) XR←ImportInterface((word) "ImagerColorPrivate", (word) XR←GetTypeIndexS((word) (&string106)), 48);
   (* (( (ptr) gf←c0587)+191)/* var←c58924 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67377921);
   var←c63500 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string107)), 103);
   (* (( (ptr) gf←c0587)+204)/* var←c60108 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 2111493);
   (void) XR←ImportProcS(var←c63500, 1071364);
   (void) XR←ImportProcS(var←c63500, 528642);
   (void) XR←ImportProcS(var←c63500, 1063171);
   (void) XR←ImportProcS(var←c63500, 67640578);
   (void) XR←ImportProcS(var←c63500, 527874);
   (void) XR←ImportProcS(var←c63500, 67392257);
   (void) XR←ImportProcS(var←c63500, 134763778);
   (void) XR←ImportProcS(var←c63500, 67653890);
   (void) XR←ImportProcS(var←c63500, 67372801);
   (void) XR←ImportProcS(var←c63500, 67374849);
   var←c63500 = (word) XR←ImportInterface((word) "Real", (word) XR←GetTypeIndexS((word) (&string108)), 11);
   (* (( (ptr) gf←c0587)+192)/* var←c58956 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67371521);
   (void) XR←ImportProcS(var←c63500, 67372033);
   var←c63500 = (word) XR←ImportInterface((word) "RefTab", (word) XR←GetTypeIndexS((word) (&string109)), 16);
   (* (( (ptr) gf←c0587)+189)/* var←c58828 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67895555);
   var←c63500 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string110)), 43);
   (* (( (ptr) gf←c0587)+206)/* var←c60428 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67896323);
   (void) XR←ImportProcS(var←c63500, 67379457);
   var←c63500 = (word) XR←ImportInterface((word) "SimpleFeedback", (word) XR←GetTypeIndexS((word) (&string111)), 7);
   (* (( (ptr) gf←c0587)+201)/* var←c59660 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 1310981);
   var←c63500 = (word) XR←ImportInterface((word) "SymTab", (word) XR←GetTypeIndexS((word) (&string112)), 13);
   (* (( (ptr) gf←c0587)+208)/* var←c60716 */  ) = var←c63500;
   (void) XR←ImportProcS(var←c63500, 67896835);
   (void) XR←ImportProcS(var←c63500, 67633410);
   (void) XR←ImportProcS(var←c63500, 134742786);
   var←c63500 = (word) XR←ExportInterface((word) "GGFileIn", (word) XR←GetTypeIndexS((word) (&string113)), 3);
   (* (( (ptr) gf←c0587)+215)/* var←c63532 */  ) = var←c63500;
   (void) XR←ExportProcS(var←c63500, (word) (( (bPt) gf←c0587)+708)/* var←c58572 */ , 135528453, (word) "FileinSceneAndOptions")
   ;
   (void) XR←ExportProcS(var←c63500, (word) (( (bPt) gf←c0587)+700)/* var←c58540 */ , 135528709, (word) "FileinSceneOnly");
   (void) XR←ExportProcS(var←c63500, (word) (( (bPt) gf←c0587)+692)/* var←c58508 */ , 135266820, (word) "FileinOptionsOnly")
   ;
   var←c63500 = (word) XR←ExportInterface((word) "GGFileOut", (word) XR←GetTypeIndexS((word) (&string114)), 2);
   (* (( (ptr) gf←c0587)+215)/* var←c63532 */  ) = var←c63500;
   (void) XR←ExportProcS(var←c63500, (word) (( (bPt) gf←c0587)+388)/* var←c57292 */ , 786435, (word) "FileoutSceneOnly");
   (void) XR←ExportProcS(var←c63500, (word) (( (bPt) gf←c0587)+396)/* var←c57324 */ , 1048836, (word) "FileoutSceneAndOptions")
   ;
   }

static void GGFileImpl←P0(formal←c091, formal←c090)
   word formal←c091;
   word formal←c090;
   {
   /* GGFileImpl: */ 
SOURCE(405, 28115)
SOURCE(28500, 20)
   (void) RegisterAllOptions←P840();
   }

static word CreateOutputColorTable←P60()
   {
   register ptr gf←c63564 =  (ptr) &globalframe;
   word ct←v6860;
   /* CreateOutputColorTable: */ 
SOURCE(2435, 321)
SOURCE(2435, 321)
   ct←v6860 = 0;
SOURCE(2502, 29)
   ct←v6860 = XR←NewObject(20, (* (( (ptr) gf←c63564)+6) ));
SOURCE(2533, 50)
   (*  (ptr) ct←v6860 ) = XR←NewObject(8, (* (( (ptr) gf←c63564)+7) ));
SOURCE(2585, 49)
   {
      word pd115;
      pd115 = (* (( (ptr) (* (( (ptr) gf←c63564)+189)/* var←c58828 */  ))+5) );
      (* (( (ptr) (*  (ptr) ct←v6860 ))+1) ) = (word) ( *( (fPt) ((*  (ptr) pd115 ))))(17, 0, 0, pd115);
      };
SOURCE(2636, 39)
   {
      word pd116;
      pd116 = (* (( (ptr) (* (( (ptr) gf←c63564)+190)/* var←c58860 */  ))+5) );
      (* (( (ptr) ct←v6860)+2) ) = (word) ( *( (fPt) ((*  (ptr) pd116 ))))(17, pd116);
      };
SOURCE(2677, 43)
   {
      word pd117;
      pd117 = (* (( (ptr) (* (( (ptr) gf←c63564)+189)/* var←c58828 */  ))+5) );
      (* (( (ptr) ct←v6860)+3) ) = (word) ( *( (fPt) ((*  (ptr) pd117 ))))(11, 0, 0, pd117);
      };
SOURCE(2722, 34)
   {
      word pd118;
      pd118 = (* (( (ptr) (* (( (ptr) gf←c63564)+189)/* var←c58828 */  ))+5) );
      (* (( (ptr) ct←v6860)+4) ) = (word) ( *( (fPt) ((*  (ptr) pd118 ))))(5, 0, 0, pd118);
      };
SOURCE(2435, 321)
   return(ct←v6860);
   }

static word PickANumber←P120(ct←v6932)
   word ct←v6932;
   {
   register ptr gf←c63596 =  (ptr) &globalframe;
   word natRef←v6976;
   /* PickANumber: */ 
SOURCE(2786, 150)
SOURCE(2786, 150)
   natRef←v6976 = 0;
SOURCE(2856, 37)
   {
      word var←c58892;
      var←c58892 = XR←NewObject(4, (* (( (ptr) gf←c63596)+8) ));
      (*  (ptr) var←c58892 ) = (* (( (ptr) ct←v6932)+1) );
      natRef←v6976 = var←c58892;
      };
SOURCE(2895, 41)
   (* (( (ptr) ct←v6932)+1) ) = ((* (( (ptr) ct←v6932)+1) ) + 1);
SOURCE(2786, 150)
   return(natRef←v6976);
   }

static void FindColorInIntensityTable←P180(formal←c0102, op←v7036, table←v7064)
   word formal←c0102;
   word op←v7036;
   word table←v7064;
   {
   register ptr gf←c63628 =  (ptr) &globalframe;
   word found←v7108;
   word nat←v7136;
   word intensity←v10672;
   word key←v10700;
   /* FindColorInIntensityTable: */ 
SOURCE(2942, 33)
SOURCE(2942, 33)
   found←v7108 = 0;
SOURCE(2942, 33)
   nat←v7136 = 0;
SOURCE(3076, 59)
   {
      word pd119;
      pd119 = (* (( (ptr) (* (( (ptr) gf←c63628)+191)/* var←c58924 */  ))+31) );
      intensity←v10672 = (word) ( *( (fPt) ((*  (ptr) pd119 ))))(op←v7036, pd119);
      };
SOURCE(3137, 39)
   {
      word pd120;
      word x121;
      word x123;
      float tf124;
      word idx125;
      pd120 = (* (( (ptr) (* (( (ptr) gf←c63628)+192)/* var←c58956 */  ))+8) );
      key←v10700 = (
         idx125 = (word) ( *( (fPt) ((*  (ptr) pd120 ))))((
               tf124 = (
                  x121 = intensity←v10672,  *(float*)&x121
                  ) * (
                  x123 = (*  (ptr) &fc122 ),  *(float*)&x123
                  ),  *(word*)&tf124
               ), pd120),
         SGNCK(idx125)
         );
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0102 ) = found←v7108;
   (* (( (ptr) formal←c0102)+1) ) = nat←v7136;
   return;
   }

static void AddColorToOutputTable←P240(color←v7196, ct←v7224)
   word color←v7196;
   word ct←v7224;
   {
   register ptr gf←c63660 =  (ptr) &globalframe;
   word gray←v10744;
   /* AddColorToOutputTable: */ 
SOURCE(3182, 366)
SOURCE(3258, 64)
   {
      word pd126;
      pd126 = (* (( (ptr) (* (( (ptr) gf←c63660)+193)/* var←c58988 */  ))+11) );
      gray←v10744 = (word) ( *( (fPt) ((*  (ptr) pd126 ))))((*  (ptr) (&fc127) ), pd126);
      };
SOURCE(3324, 224)
   if ((color←v7196 == 0)) {
      }
   else {
SOURCE(3353, 195)
      {
         word var←c59020;
         var←c59020 = color←v7196;
         if ((var←c59020 == 0)) {
            goto lab←L100001;
            };
         {
            word var←c59116;
            if ( ( ((*  (ptr) var←c59020 ) == 0) ? ((* (( (ptr) var←c59020)+1) ) == 0) : 0 ) ) {
               {
                  word op←v10788;
                  op←v10788 = var←c59020;
SOURCE(3413, 135)
                  if (((* (( (ptr) gray←v10744)+2) ) == (* (( (ptr) op←v10788)+2) ))) {
                     }
                  else {
SOURCE(3480, 70)
                     {
                        word r←v10832;
                        word g←v10860;
                        word b←v10888;
SOURCE(3514, 34)
                        {
                           W3 var←c59084;
                           {
/*1*/   word pd129;
/*1*/   pd129 = (* (( (ptr) (* (( (ptr) gf←c63660)+194)/* var←c59052 */  ))+34) );
/*1*/   (void) ( *( (fPt) ((*  (ptr) pd129 ))))((word) &var←c59084, op←v10788, pd129);
/*1*/   };
                           b←v10888 = var←c59084.f2;
                           g←v10860 = var←c59084.f1;
                           r←v10832 = var←c59084.f0;
                           };
                        };
                     };
                  };
               goto endif0128;
               };
            if ( ( ((*  (ptr) var←c59020 ) == 0) ? ((* (( (ptr) var←c59020)+1) ) == 1) : 0 ) ) {
               {
                  word special←v10932;
                  special←v10932 = var←c59020;
                  };
               goto endif0128;
               };
            if (((
               var←c59116 = (*  (ptr) var←c59020 )
               ) == 2)) {
               {
                  word sampledBlack←v10976;
                  sampledBlack←v10976 = var←c59020;
                  };
               goto endif0128;
               };
            if ((var←c59116 == 1)) {
               {
                  word sampledColor←v11020;
                  sampledColor←v11020 = var←c59020;
                  };
               goto endif0128;
               };
            lab←L100001: ;
SOURCE(3704, 5)
            (void) XR←RaiseUnnamedError();
            goto endif0128;
            endif0128: ;
            };
         };
      };
   }

static void FileinSceneAndOptions←P300(formal←c0124, formal←c0677, formal←c0678, formal←c0679, formal←c0680, formal←c0681)
   word formal←c0124;
   word formal←c0677;
   word formal←c0678;
   word formal←c0679;
   word formal←c0680;
   word formal←c0681;
   {
   W11 var←c63692;
   /* declaration of f←v7284 skipped */ 
   /* declaration of ggData←v7312 skipped */ 
   /* declaration of alignmentsOnly←v7340 skipped */ 
   /* declaration of selectSlices←v7368 skipped */ 
   /* declaration of closeStreamWhenDone←v7396 skipped */ 
   /* declaration of success←v7440 skipped */ 
   /* declaration of sceneName←v7468 skipped */ 
   (* (( (ptr) &var←c63692)+4)/* f←v7284 */  ) = formal←c0677;
   (* (( (ptr) &var←c63692)+5)/* ggData←v7312 */  ) = formal←c0678;
   (* (( (ptr) &var←c63692)+6)/* alignmentsOnly←v7340 */  ) = formal←c0679;
   (* (( (ptr) &var←c63692)+7)/* selectSlices←v7368 */  ) = formal←c0680;
   (* (( (ptr) &var←c63692)+8)/* closeStreamWhenDone←v7396 */  ) = formal←c0681;
   /* FileinSceneAndOptions: */ 
SOURCE(3768, 1543)
SOURCE(3768, 1543)
   (* (( (ptr) &var←c63692)+9)/* success←v7440 */  ) = 0;
SOURCE(3768, 1543)
   (* (( (ptr) &var←c63692)+10)/* sceneName←v7468 */  ) = 0;
SOURCE(3961, 1350)
SOURCE(3963, 1304)
   {
      word var←c01;
      {
         word var←c0654;
         var←c0654 = (word) &var←c63692;
         var←c01 = (word) XR←Enable(( ((word)  (fPt) NoName←Q4800) ), ( ((word)  (fPt) NoName←Q5340) ), var←c0654);
         };
      if ((var←c01 == 3)) {
         goto lab←L100003;
         }
      else {
         if ((var←c01 == 2)) {
            goto lab←L100002;
            };
         };
      };
   goto lab←L100014;
   lab←L100003: ;
   lab←L100014: ;
   /* removed tail goto */ 
   lab←L100002: ;
   (*  (ptr) formal←c0124 ) = (* (( (ptr) &var←c63692)+9)/* success←v7440 */  );
   (* (( (ptr) formal←c0124)+1) ) = (* (( (ptr) &var←c63692)+10)/* sceneName←v7468 */  );
   return;
   }

static word NoName←Q4800(formal←c0593)
   word formal←c0593;
   {
   register ptr gf←c0592 =  (ptr) &globalframe;
SOURCE(4169, 27)
   {
      word scene←v11064;
      word version←v11092;
      word count←v11120;
      word entity←v11148 = 0;
      word finger←v11176 = 0;
      word newEntities←v11204 = 0;
SOURCE(4169, 27)
      scene←v11064 = (* (( (ptr) (* (( (ptr) formal←c0593)+5) ))+11) );
SOURCE(4276, 98)
      {
         W2 var←c59308;
         (void) ReadHeaderAndOptions←P480((word) &var←c59308, (* (( (ptr) formal←c0593)+4) ), (* (( (ptr) formal←c0593)+5) ),  ( (0 != (* (
               ( (ptr) formal←c0593)+6) )) ? 0 : 3 ) );
         version←v11092 = var←c59308.f1;
         (* (( (ptr) formal←c0593)+10) ) = var←c59308.f0;
         };
SOURCE(4376, 34)
      {
         word pd130;
         pd130 = (* (( (ptr) (* (( (ptr) gf←c0592)+195)/* var←c59148 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd130 ))))((* (( (ptr) formal←c0593)+4) ), (* (( (ptr) gf←c0592)+26) ), pd130);
         };
SOURCE(4412, 25)
      {
         word pd131;
         pd131 = (* (( (ptr) (* (( (ptr) gf←c0592)+195)/* var←c59148 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd131 ))))((* (( (ptr) formal←c0593)+4) ), 91, pd131);
         };
SOURCE(4439, 28)
      {
         word pd132;
         pd132 = (* (( (ptr) (* (( (ptr) gf←c0592)+195)/* var←c59148 */  ))+25) );
         count←v11120 = (word) ( *( (fPt) ((*  (ptr) pd132 ))))((* ((( (ptr) formal←c0593)+4)) ), pd132);
         };
SOURCE(4469, 27)
      {
         word pd133;
         pd133 = (* (( (ptr) (* (( (ptr) gf←c0592)+195)/* var←c59148 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd133 ))))((* (( (ptr) formal←c0593)+4) ), (* (( (ptr) gf←c0592)+25) ), pd133);
         };
SOURCE(4498, 27)
      {
         word pd134;
         pd134 = (* (( (ptr) (* (( (ptr) gf←c0592)+195)/* var←c59148 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd134 ))))((* ((( (ptr) formal←c0593)+4)) ), pd134);
         };
SOURCE(4527, 50)
      {
         W2 var←c59372;
         {
            word pd135;
            pd135 = (* (( (ptr) (* (( (ptr) gf←c0592)+197)/* var←c59340 */  ))+20) );
            (void) ( *( (fPt) ((*  (ptr) pd135 ))))((word) (&var←c59372), pd135);
            };
         finger←v11176 = var←c59372.f1;
         newEntities←v11204 = var←c59372.f0;
         };
SOURCE(4579, 308)
      {
         register word i←v11332 = 1;
         register word noName←c59404;
         noName←c59404 = count←v11120;
         if ((i←v11332 > noName←c59404)) {
            goto lab←L100006;
            };
         lab←L100009: ;
SOURCE(4606, 63)
         entity←v11148 = (word) FileinEntity←P2580((* (( (ptr) formal←c0593)+4) ), version←v11092, (* (( (ptr) (* (( (ptr) formal←c0593)+5)
                ))+3) ), (* (( (ptr) (* (( (ptr) formal←c0593)+5) ))+15) ));
SOURCE(4671, 90)
         if ((entity←v11148 != 0)) {
SOURCE(4690, 71)
            {
               W2 var←c59436;
               {
                  word pd136;
                  pd136 = (* (( (ptr) (* (( (ptr) gf←c0592)+197)/* var←c59340 */  ))+21) );
                  (void) ( *( (fPt) ((*  (ptr) pd136 ))))((word) &var←c59436, entity←v11148, newEntities←v11204, finger←v11176, pd136);
                  };
               finger←v11176 = var←c59436.f1;
               newEntities←v11204 = var←c59436.f0;
               };
            };
SOURCE(4763, 124)
         if ((* (( (bPt) (* (( (ptr) formal←c0593)+5) ))+207) ) & 04) {
SOURCE(4796, 30)
            (* (( (ptr) (* (( (ptr) formal←c0593)+5) )) + 51) ) &= 4294967291;
SOURCE(4828, 39)
            {
               word pd137;
               pd137 = (* (( (ptr) (* (( (ptr) gf←c0592)+198)/* var←c59468 */  ))+10) );
               (void) ( *( (fPt) ((*  (ptr) pd137 ))))((* (( (ptr) formal←c0593)+4) ), (* (( (ptr) (* (( (ptr) formal←c0593)+5) ))+3) ), pd137)
               ;
               };
SOURCE(4869, 18)
            (* (( (ptr) formal←c0593)+9) ) = 0;
            (* (( (ptr) formal←c0593)+10) ) = 0;
            return(2);
            };
         if ((i←v11332 >= noName←c59404)) {
            goto lab←L100006;
            };
         i←v11332 = (i←v11332 + 1);
         goto lab←L100009;
         lab←L100006: ;
         };
SOURCE(4927, 67)
      if ((0 != (* (( (ptr) formal←c0593)+8) ))) {
SOURCE(4955, 39)
         {
            word pd138;
            pd138 = (* (( (ptr) (* (( (ptr) gf←c0592)+198)/* var←c59468 */  ))+10) );
            (void) ( *( (fPt) ((*  (ptr) pd138 ))))((* (( (ptr) formal←c0593)+4) ), (* (( (ptr) (* (( (ptr) formal←c0593)+5) ))+3) ), pd138)
            ;
            };
         };
SOURCE(4996, 35)
      {
         word pd139;
         pd139 = (* (( (ptr) (* (( (ptr) gf←c0592)+199)/* var←c59500 */  ))+13) );
         (void) ( *( (fPt) ((*  (ptr) pd139 ))))(scene←v11064, 0, pd139);
         };
SOURCE(5033, 37)
      {
         word pd140;
         pd140 = (* (( (ptr) (* (( (ptr) gf←c0592)+200)/* var←c59532 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd140 ))))(scene←v11064, newEntities←v11204,  (word) -1, pd140);
         };
SOURCE(5072, 161)
      if ((0 != (* (( (ptr) formal←c0593)+7) ))) {
SOURCE(5093, 140)
         {
            register word sliceList←v11376;
            sliceList←v11376 = newEntities←v11204;
            lab←L100013: ;
            if ((sliceList←v11376 != 0)) {
               }
            else {
               goto lab←L100010;
               };
SOURCE(5175, 58)
            {
               word pd141;
               pd141 = (* (( (ptr) (* (( (ptr) gf←c0592)+199)/* var←c59500 */  ))+5) );
               (void) ( *( (fPt) ((*  (ptr) pd141 ))))((*  (ptr) sliceList←v11376 ), scene←v11064, 0, pd141);
               };
            sliceList←v11376 = (* (( (ptr) sliceList←v11376)+1) );
            goto lab←L100013;
            lab←L100010: ;
            };
         };
SOURCE(5244, 23)
      (* (( (ptr) formal←c0593)+9) ) = 1;
      (* (( (ptr) formal←c0593)+10) ) = (* (( (ptr) formal←c0593)+10) );
      return(2);
      };
   /* c2c skipped dead code */ 
   }

static void FileinSceneOnly←P360(formal←c0147, formal←c0682, formal←c0683, formal←c0684, formal←c0685, formal←c0686)
   word formal←c0147;
   word formal←c0682;
   word formal←c0683;
   word formal←c0684;
   word formal←c0685;
   word formal←c0686;
   {
   W11 var←c63724;
   /* declaration of f←v7528 skipped */ 
   /* declaration of scene←v7556 skipped */ 
   /* declaration of selectSlices←v7584 skipped */ 
   /* declaration of camera←v7612 skipped */ 
   /* declaration of closeStreamWhenDone←v7640 skipped */ 
   /* declaration of success←v7684 skipped */ 
   /* declaration of sceneName←v7712 skipped */ 
   (* (( (ptr) &var←c63724)+4)/* f←v7528 */  ) = formal←c0682;
   (* (( (ptr) &var←c63724)+5)/* scene←v7556 */  ) = formal←c0683;
   (* (( (ptr) &var←c63724)+6)/* selectSlices←v7584 */  ) = formal←c0684;
   (* (( (ptr) &var←c63724)+7)/* camera←v7612 */  ) = formal←c0685;
   (* (( (ptr) &var←c63724)+8)/* closeStreamWhenDone←v7640 */  ) = formal←c0686;
   /* FileinSceneOnly: */ 
SOURCE(5315, 1536)
SOURCE(5315, 1536)
   (* (( (ptr) &var←c63724)+9)/* success←v7684 */  ) = 0;
SOURCE(5315, 1536)
   (* (( (ptr) &var←c63724)+10)/* sceneName←v7712 */  ) = 0;
SOURCE(5499, 1352)
SOURCE(5501, 1306)
   {
      word var←c02;
      {
         word var←c0655;
         var←c0655 = (word) &var←c63724;
         var←c02 = (word) XR←Enable(( ((word)  (fPt) NoName←Q4860) ), ( ((word)  (fPt) NoName←Q5280) ), var←c0655);
         };
      if ((var←c02 == 5)) {
         goto lab←L100016;
         }
      else {
         if ((var←c02 == 4)) {
            goto lab←L100015;
            };
         };
      };
   goto lab←L100027;
   lab←L100016: ;
   lab←L100027: ;
   /* removed tail goto */ 
   lab←L100015: ;
   (*  (ptr) formal←c0147 ) = (* (( (ptr) &var←c63724)+9)/* success←v7684 */  );
   (* (( (ptr) formal←c0147)+1) ) = (* (( (ptr) &var←c63724)+10)/* sceneName←v7712 */  );
   return;
   }

static word NoName←Q4860(formal←c0595)
   word formal←c0595;
   {
   register ptr gf←c0594 =  (ptr) &globalframe;
SOURCE(5709, 13)
   {
      word version←v11504;
      word count←v11532;
      word entity←v11560 = 0;
      word finger←v11588 = 0;
      word newEntities←v11616 = 0;
SOURCE(5787, 50)
      {
         word pd142;
         pd142 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd142 ))))((* (( (ptr) formal←c0595)+4) ), (* (( (ptr) gf←c0594)+22) ), pd142);
         };
SOURCE(5839, 33)
      {
         word pd143;
         pd143 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+11) );
         (* (( (ptr) formal←c0595)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd143 ))))((* ((( (ptr) formal←c0595)+4)) ), pd143);
         };
SOURCE(5874, 44)
      {
         word pd144;
         pd144 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd144 ))))((* (( (ptr) formal←c0595)+4) ), (* (( (ptr) gf←c0594)+23) ), pd144);
         };
SOURCE(5920, 31)
      {
         word pd145;
         pd145 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+27) );
         version←v11504 = (word) ( *( (fPt) ((*  (ptr) pd145 ))))((* ((( (ptr) formal←c0595)+4)) ), pd145);
         };
SOURCE(5953, 41)
      {
         word pd146;
         word x147;
         word x149;
         float tf150;
         word x151;
         pd146 = (* (( (ptr) (* (( (ptr) gf←c0594)+192)/* var←c58956 */  ))+6) );
         *(float*)&version←v11504 = (float)(int)(word) ( *( (fPt) ((*  (ptr) pd146 ))))((
               tf150 = (
                  x147 = version←v11504,  *(float*)&x147
                  ) * (
                  x149 = (*  (ptr) &fc148 ),  *(float*)&x149
                  ),  *(word*)&tf150
               ), pd146) / (
            x151 = (*  (ptr) &fc148 ),  *(float*)&x151
            );
         };
SOURCE(6040, 61)
      {
         word x152;
         word x154;
         if (((
            x152 = version←v11504,  *(float*)&x152
            ) >= (
            x154 = (*  (ptr) &fc153 ),  *(float*)&x154
            ))) {
SOURCE(6067, 34)
            (void) ReadSceneFields←P540((* (( (ptr) formal←c0595)+4) ), version←v11504, (* (( (ptr) formal←c0595)+5) ));
            };
         };
SOURCE(6103, 34)
      {
         word pd155;
         pd155 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd155 ))))((* (( (ptr) formal←c0595)+4) ), (* (( (ptr) gf←c0594)+26) ), pd155);
         };
SOURCE(6139, 25)
      {
         word pd156;
         pd156 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd156 ))))((* (( (ptr) formal←c0595)+4) ), 91, pd156);
         };
SOURCE(6166, 28)
      {
         word pd157;
         pd157 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+25) );
         count←v11532 = (word) ( *( (fPt) ((*  (ptr) pd157 ))))((* ((( (ptr) formal←c0595)+4)) ), pd157);
         };
SOURCE(6196, 27)
      {
         word pd158;
         pd158 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd158 ))))((* (( (ptr) formal←c0595)+4) ), (* (( (ptr) gf←c0594)+25) ), pd158);
         };
SOURCE(6225, 27)
      {
         word pd159;
         pd159 = (* (( (ptr) (* (( (ptr) gf←c0594)+195)/* var←c59148 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd159 ))))((* ((( (ptr) formal←c0595)+4)) ), pd159);
         };
SOURCE(6254, 50)
      {
         W2 var←c59692;
         {
            word pd160;
            pd160 = (* (( (ptr) (* (( (ptr) gf←c0594)+197)/* var←c59340 */  ))+20) );
            (void) ( *( (fPt) ((*  (ptr) pd160 ))))((word) (&var←c59692), pd160);
            };
         finger←v11588 = var←c59692.f1;
         newEntities←v11616 = var←c59692.f0;
         };
SOURCE(6306, 165)
      {
         register word i←v11744 = 1;
         register word noName←c59724;
         noName←c59724 = count←v11532;
         if ((i←v11744 > noName←c59724)) {
            goto lab←L100019;
            };
         lab←L100022: ;
SOURCE(6333, 46)
         entity←v11560 = (word) FileinEntity←P2580((* (( (ptr) formal←c0595)+4) ), version←v11504, 0, (* (( (ptr) formal←c0595)+7)
             ));
SOURCE(6381, 90)
         if ((entity←v11560 != 0)) {
SOURCE(6400, 71)
            {
               W2 var←c59756;
               {
                  word pd161;
                  pd161 = (* (( (ptr) (* (( (ptr) gf←c0594)+197)/* var←c59340 */  ))+21) );
                  (void) ( *( (fPt) ((*  (ptr) pd161 ))))((word) &var←c59756, entity←v11560, newEntities←v11616, finger←v11588, pd161);
                  };
               finger←v11588 = var←c59756.f1;
               newEntities←v11616 = var←c59756.f0;
               };
            };
         if ((i←v11744 >= noName←c59724)) {
            goto lab←L100019;
            };
         i←v11744 = (i←v11744 + 1);
         goto lab←L100022;
         lab←L100019: ;
         };
SOURCE(6482, 52)
      if ((0 != (* (( (ptr) formal←c0595)+8) ))) {
SOURCE(6510, 24)
         {
            word pd162;
            pd162 = (* (( (ptr) (* (( (ptr) gf←c0594)+198)/* var←c59468 */  ))+10) );
            (void) ( *( (fPt) ((*  (ptr) pd162 ))))((* (( (ptr) formal←c0595)+4) ), 0, pd162);
            };
         };
SOURCE(6536, 35)
      {
         word pd163;
         pd163 = (* (( (ptr) (* (( (ptr) gf←c0594)+199)/* var←c59500 */  ))+13) );
         (void) ( *( (fPt) ((*  (ptr) pd163 ))))((* (( (ptr) formal←c0595)+5) ), 0, pd163);
         };
SOURCE(6573, 37)
      {
         word pd164;
         pd164 = (* (( (ptr) (* (( (ptr) gf←c0594)+200)/* var←c59532 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd164 ))))((* (( (ptr) formal←c0595)+5) ), newEntities←v11616,  (word) -1, pd164);
         };
SOURCE(6612, 161)
      if ((0 != (* (( (ptr) formal←c0595)+6) ))) {
SOURCE(6633, 140)
         {
            register word sliceList←v11788;
            sliceList←v11788 = newEntities←v11616;
            lab←L100026: ;
            if ((sliceList←v11788 != 0)) {
               }
            else {
               goto lab←L100023;
               };
SOURCE(6715, 58)
            {
               word pd165;
               pd165 = (* (( (ptr) (* (( (ptr) gf←c0594)+199)/* var←c59500 */  ))+5) );
               (void) ( *( (fPt) ((*  (ptr) pd165 ))))((*  (ptr) sliceList←v11788 ), (* (( (ptr) formal←c0595)+5) ), 0, pd165);
               };
            sliceList←v11788 = (* (( (ptr) sliceList←v11788)+1) );
            goto lab←L100026;
            lab←L100023: ;
            };
         };
SOURCE(6784, 23)
      (* (( (ptr) formal←c0595)+9) ) = 1;
      (* (( (ptr) formal←c0595)+10) ) = (* (( (ptr) formal←c0595)+10) );
      return(4);
      };
   /* c2c skipped dead code */ 
   }

static void FileinOptionsOnly←P420(formal←c0166, formal←c0687, formal←c0688, formal←c0689, formal←c0690)
   word formal←c0166;
   word formal←c0687;
   word formal←c0688;
   word formal←c0689;
   word formal←c0690;
   {
   W10 var←c63756;
   /* declaration of f←v7772 skipped */ 
   /* declaration of ggData←v7800 skipped */ 
   /* declaration of alignmentsOnly←v7828 skipped */ 
   /* declaration of closeStreamWhenDone←v7856 skipped */ 
   /* declaration of success←v7900 skipped */ 
   /* declaration of sceneName←v7928 skipped */ 
   (* (( (ptr) &var←c63756)+4)/* f←v7772 */  ) = formal←c0687;
   (* (( (ptr) &var←c63756)+5)/* ggData←v7800 */  ) = formal←c0688;
   (* (( (ptr) &var←c63756)+6)/* alignmentsOnly←v7828 */  ) = formal←c0689;
   (* (( (ptr) &var←c63756)+7)/* closeStreamWhenDone←v7856 */  ) = formal←c0690;
   /* FileinOptionsOnly: */ 
SOURCE(6855, 633)
SOURCE(6855, 633)
   (* (( (ptr) &var←c63756)+8)/* success←v7900 */  ) = 0;
SOURCE(6855, 633)
   (* (( (ptr) &var←c63756)+9)/* sceneName←v7928 */  ) = 0;
SOURCE(7029, 459)
SOURCE(7031, 413)
   {
      word var←c03;
      {
         word var←c0656;
         var←c0656 = (word) &var←c63756;
         var←c03 = (word) XR←Enable(( ((word)  (fPt) NoName←Q4920) ), ( ((word)  (fPt) NoName←Q5220) ), var←c0656);
         };
      if ((var←c03 == 7)) {
         goto lab←L100029;
         }
      else {
         if ((var←c03 == 6)) {
            goto lab←L100028;
            };
         };
      };
   goto lab←L100032;
   lab←L100029: ;
   lab←L100032: ;
   /* removed tail goto */ 
   lab←L100028: ;
   (*  (ptr) formal←c0166 ) = (* (( (ptr) &var←c63756)+8)/* success←v7900 */  );
   (* (( (ptr) formal←c0166)+1) ) = (* (( (ptr) &var←c63756)+9)/* sceneName←v7928 */  );
   return;
   }

static word NoName←Q4920(formal←c0597)
   word formal←c0597;
   {
   register ptr gf←c0596 =  (ptr) &globalframe;
SOURCE(7237, 13)
   {
      word version←v11916;
SOURCE(7252, 98)
      {
         W2 var←c59884;
         (void) ReadHeaderAndOptions←P480((word) &var←c59884, (* (( (ptr) formal←c0597)+4) ), (* (( (ptr) formal←c0597)+5) ),  ( (0 != (* (
               ( (ptr) formal←c0597)+6) )) ? 0 : 3 ) );
         version←v11916 = var←c59884.f1;
         (* (( (ptr) formal←c0597)+9) ) = var←c59884.f0;
         };
SOURCE(7352, 67)
      if ((0 != (* (( (ptr) formal←c0597)+7) ))) {
SOURCE(7380, 39)
         {
            word pd166;
            pd166 = (* (( (ptr) (* (( (ptr) gf←c0596)+198)/* var←c59468 */  ))+10) );
            (void) ( *( (fPt) ((*  (ptr) pd166 ))))((* (( (ptr) formal←c0597)+4) ), (* (( (ptr) (* (( (ptr) formal←c0597)+5) ))+3) ), pd166)
            ;
            };
         };
SOURCE(7421, 23)
      (* (( (ptr) formal←c0597)+8) ) = 1;
      (* (( (ptr) formal←c0597)+9) ) = (* (( (ptr) formal←c0597)+9) );
      return(6);
      };
   /* c2c skipped dead code */ 
   }

static void ReadHeaderAndOptions←P480(formal←c0177, f←v7988, ggData←v8016, type←v8044)
   word formal←c0177;
   word f←v7988;
   word ggData←v8016;
   word type←v8044;
   {
   register ptr gf←c63788 =  (ptr) &globalframe;
   word sceneName←v8088;
   word version←v8116;
   /* ReadHeaderAndOptions: */ 
SOURCE(7492, 583)
SOURCE(7492, 583)
   sceneName←v8088 = 0;
SOURCE(7618, 50)
   {
      word pd167;
      pd167 = (* (( (ptr) (* (( (ptr) gf←c63788)+195)/* var←c59148 */  ))+9) );
      (void) ( *( (fPt) ((*  (ptr) pd167 ))))(f←v7988, (* (( (ptr) gf←c63788)+22) ), pd167);
      };
SOURCE(7670, 33)
   {
      word pd168;
      pd168 = (* (( (ptr) (* (( (ptr) gf←c63788)+195)/* var←c59148 */  ))+11) );
      sceneName←v8088 = (word) ( *( (fPt) ((*  (ptr) pd168 ))))(f←v7988, pd168);
      };
SOURCE(7705, 44)
   {
      word pd169;
      pd169 = (* (( (ptr) (* (( (ptr) gf←c63788)+195)/* var←c59148 */  ))+9) );
      (void) ( *( (fPt) ((*  (ptr) pd169 ))))(f←v7988, (* (( (ptr) gf←c63788)+23) ), pd169);
      };
SOURCE(7751, 31)
   {
      word pd170;
      pd170 = (* (( (ptr) (* (( (ptr) gf←c63788)+195)/* var←c59148 */  ))+27) );
      version←v8116 = (word) ( *( (fPt) ((*  (ptr) pd170 ))))(f←v7988, pd170);
      };
SOURCE(7784, 41)
   {
      word pd171;
      word x172;
      word x173;
      float tf174;
      word x175;
      pd171 = (* (( (ptr) (* (( (ptr) gf←c63788)+192)/* var←c58956 */  ))+6) );
      *(float*)&version←v8116 = (float)(int)(word) ( *( (fPt) ((*  (ptr) pd171 ))))((
            tf174 = (
               x172 = version←v8116,  *(float*)&x172
               ) * (
               x173 = (*  (ptr) &fc148 ),  *(float*)&x173
               ),  *(word*)&tf174
            ), pd171) / (
         x175 = (*  (ptr) &fc148 ),  *(float*)&x175
         );
      };
SOURCE(7871, 43)
   {
      word pd176;
      pd176 = (* (( (ptr) (* (( (ptr) gf←c63788)+202)/* var←c59916 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd176 ))))((* (( (ptr) gf←c63788)+24) ), (* (( (ptr) gf←c63788)+21) ), pd176);
      };
SOURCE(7916, 115)
   {
      word x177;
      word x178;
      if (((
         x177 = version←v8116,  *(float*)&x177
         ) >= (
         x178 = (*  (ptr) &fc153 ),  *(float*)&x178
         ))) {
SOURCE(7943, 43)
         (void) ReadOptions←P600(f←v7988, version←v8116, ggData←v8016, type←v8044);
         }
      else {
SOURCE(7986, 45)
         {
            word var←c59948;
            var←c59948 = XR←NewObject(8, (* (( (ptr) gf←c63788)+20) ));
            {
               word var←c60012;
               var←c60012 = var←c59948;
               };
            {
               word pd179;
               pd179 = (* (( (ptr) (* (( (ptr) gf←c63788)+203)/* var←c60044 */  ))+26) );
               (void) ( *( (fPt) ((*  (ptr) pd179 ))))(ggData←v8016, var←c59948, pd179);
               };
            };
         };
      };
SOURCE(8033, 42)
   {
      word pd180;
      pd180 = (* (( (ptr) (* (( (ptr) gf←c63788)+202)/* var←c59916 */  ))+14) );
      (void) ( *( (fPt) ((*  (ptr) pd180 ))))((* (( (ptr) gf←c63788)+24) ), (* (( (ptr) gf←c63788)+21) ), pd180);
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0177 ) = sceneName←v8088;
   (* (( (ptr) formal←c0177)+1) ) = version←v8116;
   return;
   }

static void ReadSceneFields←P540(f←v8176, version←v8204, scene←v8232)
   word f←v8176;
   word version←v8204;
   word scene←v8232;
   {
   register ptr gf←c63820 =  (ptr) &globalframe;
   word keyWord←v11960 = 0;
   word option←v11988 = 0;
   word good←v12016;
   word nextChar←v12044;
   word twoCRsFound←v12072 = 0;
   /* ReadSceneFields: */ 
SOURCE(8081, 690)
SOURCE(8234, 537)
   lab←L100036: ;
   if ((0 == twoCRsFound←v12072)) {
      }
   else {
      goto lab←L100034;
      };
SOURCE(8255, 42)
   {
      W2 var←c60076;
      {
         word pd181;
         pd181 = (* (( (ptr) (* (( (ptr) gf←c63820)+195)/* var←c59148 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd181 ))))((word) &var←c60076, f←v8176, pd181);
         };
      good←v12016 = var←c60076.f1;
      keyWord←v11960 = var←c60076.f0;
      };
SOURCE(8299, 114)
   if ((0 == good←v12016)) {
SOURCE(8318, 25)
      {
         word pd182;
         pd182 = (* (( (ptr) (* (( (ptr) gf←c63820)+204)/* var←c60108 */  ))+19) );
         nextChar←v12044 = (word) ( *( (fPt) ((*  (ptr) pd182 ))))(f←v8176, pd182);
         };
SOURCE(8345, 68)
      if ((0 != (word) IsEndLine←P2880(nextChar←v12044))) {
SOURCE(8375, 18)
         {
            word var←c60140;
            word pd183;
            pd183 = (* (( (ptr) (* (( (ptr) gf←c63820)+204)/* var←c60108 */  ))+11) );
            var←c60140 = (word) ( *( (fPt) ((*  (ptr) pd183 ))))(f←v8176, pd183);
            };
SOURCE(8395, 18)
         twoCRsFound←v12072 = 1;
         };
SOURCE(8418, 4)
      goto lab←L100036;
      };
SOURCE(8425, 39)
   {
      word pd184;
      pd184 = (* (( (ptr) (* (( (ptr) gf←c63820)+195)/* var←c59148 */  ))+7) );
      good←v12016 = (word) ( *( (fPt) ((*  (ptr) pd184 ))))(f←v8176, pd184);
      };
SOURCE(8466, 114)
   if ((0 == good←v12016)) {
SOURCE(8485, 25)
      {
         word pd185;
         pd185 = (* (( (ptr) (* (( (ptr) gf←c63820)+204)/* var←c60108 */  ))+19) );
         nextChar←v12044 = (word) ( *( (fPt) ((*  (ptr) pd185 ))))(f←v8176, pd185);
         };
SOURCE(8512, 68)
      if ((0 != (word) IsEndLine←P2880(nextChar←v12044))) {
SOURCE(8542, 18)
         {
            word var←c60172;
            word pd186;
            pd186 = (* (( (ptr) (* (( (ptr) gf←c63820)+204)/* var←c60108 */  ))+11) );
            var←c60172 = (word) ( *( (fPt) ((*  (ptr) pd186 ))))(f←v8176, pd186);
            };
SOURCE(8562, 18)
         twoCRsFound←v12072 = 1;
         };
SOURCE(8585, 4)
      goto lab←L100036;
      };
SOURCE(8592, 30)
   {
      word pd187;
      pd187 = (* (( (ptr) (* (( (ptr) gf←c63820)+195)/* var←c59148 */  ))+11) );
      option←v11988 = (word) ( *( (fPt) ((*  (ptr) pd187 ))))(f←v8176, pd187);
      };
SOURCE(8624, 50)
   (void) ProcessSceneField←P900(keyWord←v11960, option←v11988, version←v8204, scene←v8232);
SOURCE(8676, 25)
   {
      word pd188;
      pd188 = (* (( (ptr) (* (( (ptr) gf←c63820)+204)/* var←c60108 */  ))+19) );
      nextChar←v12044 = (word) ( *( (fPt) ((*  (ptr) pd188 ))))(f←v8176, pd188);
      };
SOURCE(8703, 68)
   if ((0 != (word) IsEndLine←P2880(nextChar←v12044))) {
SOURCE(8733, 18)
      {
         word var←c60204;
         word pd189;
         pd189 = (* (( (ptr) (* (( (ptr) gf←c63820)+204)/* var←c60108 */  ))+11) );
         var←c60204 = (word) ( *( (fPt) ((*  (ptr) pd189 ))))(f←v8176, pd189);
         };
SOURCE(8753, 18)
      twoCRsFound←v12072 = 1;
      };
   goto lab←L100036;
   lab←L100034: ;
   }

static void ReadOptions←P600(f←v8292, version←v8320, ggData←v8348, type←v8376)
   word f←v8292;
   word version←v8320;
   word ggData←v8348;
   word type←v8376;
   {
   register ptr gf←c63852 =  (ptr) &globalframe;
   word keyWord←v12116 = 0;
   word option←v12144 = 0;
   word good←v12172;
   word nextChar←v12200;
   word twoCRsFound←v12228 = 0;
   /* ReadOptions: */ 
SOURCE(8789, 744)
SOURCE(8958, 33)
   {
      word pd190;
      pd190 = (* (( (ptr) (* (( (ptr) gf←c63852)+205)/* var←c60236 */  ))+69) );
      (void) ( *( (fPt) ((*  (ptr) pd190 ))))(ggData←v8348, 0, pd190);
      };
SOURCE(8993, 540)
   lab←L100039: ;
   if ((0 == twoCRsFound←v12228)) {
      }
   else {
      goto lab←L100037;
      };
SOURCE(9014, 42)
   {
      W2 var←c60268;
      {
         word pd191;
         pd191 = (* (( (ptr) (* (( (ptr) gf←c63852)+195)/* var←c59148 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd191 ))))((word) &var←c60268, f←v8292, pd191);
         };
      good←v12172 = var←c60268.f1;
      keyWord←v12116 = var←c60268.f0;
      };
SOURCE(9058, 114)
   if ((0 == good←v12172)) {
SOURCE(9077, 25)
      {
         word pd192;
         pd192 = (* (( (ptr) (* (( (ptr) gf←c63852)+204)/* var←c60108 */  ))+19) );
         nextChar←v12200 = (word) ( *( (fPt) ((*  (ptr) pd192 ))))(f←v8292, pd192);
         };
SOURCE(9104, 68)
      if ((0 != (word) IsEndLine←P2880(nextChar←v12200))) {
SOURCE(9134, 18)
         {
            word var←c60300;
            word pd193;
            pd193 = (* (( (ptr) (* (( (ptr) gf←c63852)+204)/* var←c60108 */  ))+11) );
            var←c60300 = (word) ( *( (fPt) ((*  (ptr) pd193 ))))(f←v8292, pd193);
            };
SOURCE(9154, 18)
         twoCRsFound←v12228 = 1;
         };
SOURCE(9177, 4)
      goto lab←L100039;
      };
SOURCE(9184, 39)
   {
      word pd194;
      pd194 = (* (( (ptr) (* (( (ptr) gf←c63852)+195)/* var←c59148 */  ))+7) );
      good←v12172 = (word) ( *( (fPt) ((*  (ptr) pd194 ))))(f←v8292, pd194);
      };
SOURCE(9225, 114)
   if ((0 == good←v12172)) {
SOURCE(9244, 25)
      {
         word pd195;
         pd195 = (* (( (ptr) (* (( (ptr) gf←c63852)+204)/* var←c60108 */  ))+19) );
         nextChar←v12200 = (word) ( *( (fPt) ((*  (ptr) pd195 ))))(f←v8292, pd195);
         };
SOURCE(9271, 68)
      if ((0 != (word) IsEndLine←P2880(nextChar←v12200))) {
SOURCE(9301, 18)
         {
            word var←c60332;
            word pd196;
            pd196 = (* (( (ptr) (* (( (ptr) gf←c63852)+204)/* var←c60108 */  ))+11) );
            var←c60332 = (word) ( *( (fPt) ((*  (ptr) pd196 ))))(f←v8292, pd196);
            };
SOURCE(9321, 18)
         twoCRsFound←v12228 = 1;
         };
SOURCE(9344, 4)
      goto lab←L100039;
      };
SOURCE(9351, 30)
   {
      word pd197;
      pd197 = (* (( (ptr) (* (( (ptr) gf←c63852)+195)/* var←c59148 */  ))+11) );
      option←v12144 = (word) ( *( (fPt) ((*  (ptr) pd197 ))))(f←v8292, pd197);
      };
SOURCE(9383, 53)
   (void) ProcessOption←P960(keyWord←v12116, option←v12144, version←v8320, ggData←v8348, type←v8376);
SOURCE(9438, 25)
   {
      word pd198;
      pd198 = (* (( (ptr) (* (( (ptr) gf←c63852)+204)/* var←c60108 */  ))+19) );
      nextChar←v12200 = (word) ( *( (fPt) ((*  (ptr) pd198 ))))(f←v8292, pd198);
      };
SOURCE(9465, 68)
   if ((0 != (word) IsEndLine←P2880(nextChar←v12200))) {
SOURCE(9495, 18)
      {
         word var←c60364;
         word pd199;
         pd199 = (* (( (ptr) (* (( (ptr) gf←c63852)+204)/* var←c60108 */  ))+11) );
         var←c60364 = (word) ( *( (fPt) ((*  (ptr) pd199 ))))(f←v8292, pd199);
         };
SOURCE(9515, 18)
      twoCRsFound←v12228 = 1;
      };
   goto lab←L100039;
   lab←L100037: ;
   }

static word ReadListOfAtom←P660(formal←c0691)
   word formal←c0691;
   {
   W11 var←c63884;
   /* declaration of f←v8436 skipped */ 
   register ptr gf←c63916 =  (ptr) &globalframe;
   word atomList←v8480;
   /* declaration of var←c60396 skipped */ 
   word cr←v12272;
   word lf←v12300;
   word rightParen←v12328;
   word rightBracket←v12356;
   word rope←v12412 = 0;
   /* declaration of end←v12440 skipped */ 
   (* (( (ptr) &var←c63884)+4)/* f←v8436 */  ) = formal←c0691;
   /* ReadListOfAtom: */ 
SOURCE(9551, 939)
   {
      word tmpAddr200;
      tmpAddr200 = (word) (( (ptr) &var←c63884)+5)/* var←c60396 */ ;
      (*  (ptr) tmpAddr200 ) = ( ((word)  (fPt) AtomsOnOneLineOrParenProc←P3516) );
      (* (( (ptr) tmpAddr200) + 1) ) = 1;
      };
SOURCE(9551, 939)
   atomList←v8480 = 0;
SOURCE(9631, 36)
   {
      word pd201;
      pd201 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+37) );
      cr←v12272 = (word) ( *( (fPt) ((*  (ptr) pd201 ))))(13, pd201);
      };
SOURCE(9669, 36)
   {
      word pd202;
      pd202 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+37) );
      lf←v12300 = (word) ( *( (fPt) ((*  (ptr) pd202 ))))(10, pd202);
      };
SOURCE(9707, 41)
   {
      word pd203;
      pd203 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+37) );
      rightParen←v12328 = (word) ( *( (fPt) ((*  (ptr) pd203 ))))(41, pd203);
      };
SOURCE(9750, 43)
   {
      word pd204;
      pd204 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+37) );
      rightBracket←v12356 = (word) ( *( (fPt) ((*  (ptr) pd204 ))))(93, pd204);
      };
SOURCE(10017, 17)
   (* (( (ptr) &var←c63884)+7)/* end←v12440 */  ) = 0;
SOURCE(10036, 31)
   {
      word var←c60460;
      word pd205;
      pd205 = (* (( (ptr) (* (( (ptr) gf←c63916)+204)/* var←c60108 */  ))+85) );
      var←c60460 = (word) ( *( (fPt) ((*  (ptr) pd205 ))))((* (( (ptr) &var←c63884)+4)/* f←v8436 */  ), 1, pd205);
      };
SOURCE(10069, 14)
   atomList←v8480 = 0;
SOURCE(10085, 405)
   lab←L100042: ;
SOURCE(10099, 90)
SOURCE(10099, 90)
   {
      W2 var←c60492;
      {
         /* declaration of var←c04 skipped */ 
         (* (( (ptr) &var←c63884)+8)/* var←c04 */  ) = (* (( (ptr) (* (( (ptr) gf←c63916)+204)/* var←c60108 */  ))+89) );
         {
            /* declaration of var←c05 skipped */ 
            {
               word var←c06;
               {
                  word var←c0657;
                  var←c0657 = (word) &var←c63884;
                  var←c06 = (word) XR←Enable(( ((word)  (fPt) NoName←Q4980) ), ( ((word)  (fPt) NoName←Q5160) ), var←c0657);
                  };
               if ((var←c06 == 8)) {
                  goto lab←L100044;
                  };
               };
            var←c60492 = (*  (W2Pt) (( (ptr) &var←c63884)+9)/* var←c05 */  );
            };
         };
      rope←v12412 = var←c60492.f0;
      };
   lab←L100044: ;
SOURCE(10203, 32)
   if ((0 != (* (( (ptr) &var←c63884)+7)/* end←v12440 */  )) || (rope←v12412 == 0)) {
SOURCE(10229, 6)
      return(atomList←v8480);
      };
SOURCE(10237, 59)
   {
      word pd206;
      word pd208;
      pd206 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd206 ))))(rope←v12412, cr←v12272, 1, pd206))) { goto then0207;};
      pd208 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd208 ))))(rope←v12412, lf←v12300, 1, pd208))) {
         then0207: ;
SOURCE(10290, 6)
         return(atomList←v8480);
         };
      };
SOURCE(10298, 59)
   {
      word pd209;
      pd209 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd209 ))))(rope←v12412, rightParen←v12328, 1, pd209))) {
SOURCE(10337, 12)
         {
            word pd210;
            pd210 = (* (( (ptr) (* (( (ptr) gf←c63916)+204)/* var←c60108 */  ))+18) );
            (void) ( *( (fPt) ((*  (ptr) pd210 ))))((* (( (ptr) &var←c63884)+4)/* f←v8436 */  ), 41, pd210);
            };
SOURCE(10351, 6)
         return(atomList←v8480);
         };
      };
SOURCE(10362, 61)
   {
      word pd211;
      pd211 = (* (( (ptr) (* (( (ptr) gf←c63916)+206)/* var←c60428 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd211 ))))(rope←v12412, rightBracket←v12356, 1, pd211))) {
SOURCE(10403, 12)
         {
            word pd212;
            pd212 = (* (( (ptr) (* (( (ptr) gf←c63916)+204)/* var←c60108 */  ))+18) );
            (void) ( *( (fPt) ((*  (ptr) pd212 ))))((* (( (ptr) &var←c63884)+4)/* f←v8436 */  ), 93, pd212);
            };
SOURCE(10417, 6)
         return(atomList←v8480);
         };
      };
SOURCE(10428, 62)
   {
      word var←c60524;
      {
         word pd213;
         pd213 = (* (( (ptr) (* (( (ptr) gf←c63916)+207)/* var←c60556 */  ))+5) );
         var←c60524 = (word) ( *( (fPt) ((*  (ptr) pd213 ))))(rope←v12412, 0, 2147483647, pd213);
         };
      atomList←v8480 = (word) AppendAtomToAtomList←P720(var←c60524, atomList←v8480);
      };
   goto lab←L100042;
   /* c2c skipped dead code */ 
   }

static word NoName←Q4980(formal←c0602)
   word formal←c0602;
   {
SOURCE(10099, 90)
   {
      word pd214;
      pd214 = (* (( (ptr) formal←c0602)+8) );
      (void) ( *( (fPt) ((*  (ptr) pd214 ))))((word) (( (bPt) formal←c0602)+36), (* (( (ptr) formal←c0602)+4) ), (word) (( (bPt) formal←c0602)+20)
         , pd214);
      };
   return(0);
   }

static word AtomsOnOneLineOrParenProc←P3516(char←v12516, formal←c63948)
   word char←v12516;
   word formal←c63948;
   {
   word var←c12560;
   formal←c63948 = (formal←c63948 - 20);
   /* AtomsOnOneLineOrParenProc: */ 
SOURCE(9795, 199)
SOURCE(9872, 122)
   {
      word var←c60588;
      var←c60588 = char←v12516;
      switch (var←c60588) {
         case 10: case 13: case 41: case 93: 
SOURCE(9912, 14)
            return(0);
         case 32: case 9: case 44: case 59: 
SOURCE(9954, 13)
            return(1);
         default: 
SOURCE(9980, 14)
            return(2);
         };
      };
   }

static word AppendAtomToAtomList←P720(atom←v8624, list←v8652)
   word atom←v8624;
   word list←v8652;
   {
   register ptr gf←c63980 =  (ptr) &globalframe;
   word var←c8780;
   word z←v12588;
   /* AppendAtomToAtomList: */ 
SOURCE(10505, 231)
SOURCE(10592, 3)
   z←v12588 = list←v8652;
SOURCE(10616, 38)
   if ((z←v12588 == 0)) {
SOURCE(10632, 22)
      {
         word var←c60652;
         var←c60652 = XR←NewObject(8, (* (( (ptr) gf←c63980)+19) ));
         (*  (ptr) var←c60652 ) = atom←v8624;
         return(var←c60652);
         };
      };
SOURCE(10656, 32)
   lab←L100049: ;
   if (((* (( (ptr) z←v12588)+1) ) != 0)) {
      }
   else {
      goto lab←L100047;
      };
SOURCE(10678, 10)
   z←v12588 = (* (( (ptr) z←v12588)+1) );
   goto lab←L100049;
   lab←L100047: ;
SOURCE(10699, 23)
   {
      word var←c60684;
      var←c60684 = XR←NewObject(8, (* (( (ptr) gf←c63980)+19) ));
      (*  (ptr) var←c60684 ) = atom←v8624;
      (* (( (ptr) z←v12588)+1) ) = var←c60684;
      };
SOURCE(10724, 12)
   return(list←v8652);
   }

static word FindOption←P780(name←v9192)
   word name←v9192;
   {
   register ptr gf←c64012 =  (ptr) &globalframe;
   word optionData←v9236;
   word found←v12716;
   word val←v12744 = 0;
   /* FindOption: */ 
SOURCE(10998, 182)
SOURCE(10998, 182)
   optionData←v9236 = 0;
SOURCE(11094, 46)
   {
      W2 var←c60748;
      {
         word pd215;
         pd215 = (* (( (ptr) (* (( (ptr) gf←c64012)+208)/* var←c60716 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd215 ))))((word) &var←c60748, (* (( (ptr) gf←c64012)+4)/* optionTable←v5268 */  ), name←v9192, pd215)
         ;
         };
      val←v12744 = var←c60748.f1;
      found←v12716 = var←c60748.f0;
      };
SOURCE(11142, 38)
   if ((0 != found←v12716)) {
SOURCE(11156, 24)
      optionData←v9236 = XR←Narrow(val←v12744, (* (( (ptr) gf←c64012)+14) ));
      };
SOURCE(10998, 182)
   return(optionData←v9236);
   }

static void RegisterAllOptions←P840()
   {
   W8 var←c64044;
   register ptr gf←c64076 =  (ptr) &globalframe;
   /* declaration of var←c60780 skipped */ 
   /* declaration of var←c60812 skipped */ 
   /* RegisterAllOptions: */ 
SOURCE(11186, 1990)
   {
      word tmpAddr216;
      tmpAddr216 = (word) (( (ptr) &var←c64044)+4)/* var←c60780 */ ;
      (*  (ptr) tmpAddr216 ) = ( ((word)  (fPt) RegisterSceneField←P3636) );
      (* (( (ptr) tmpAddr216) + 1) ) = 1;
      };
   {
      word tmpAddr217;
      tmpAddr217 = (word) (( (ptr) &var←c64044)+6)/* var←c60812 */ ;
      (*  (ptr) tmpAddr217 ) = ( ((word)  (fPt) RegisterOption←P3576) );
      (* (( (ptr) tmpAddr217) + 1) ) = 1;
      };
SOURCE(11706, 31)
   {
      word pd218;
      pd218 = (* (( (ptr) (* (( (ptr) gf←c64076)+208)/* var←c60716 */  ))+5) );
      (* (( (ptr) gf←c64076)+4)/* optionTable←v5268 */  ) = (word) ( *( (fPt) ((*  (ptr) pd218 ))))(29, 1, pd218);
      };
SOURCE(11739, 61)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+28) ), (word) (( (bPt) gf←c64076)+612)/* var←c58188 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(11802, 73)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+29) ), (word) (( (bPt) gf←c64076)+604)/* var←c58156 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(11877, 77)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+30) ), (word) (( (bPt) gf←c64076)+596)/* var←c58124 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(11956, 49)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+31) ), (word) (( (bPt) gf←c64076)+588)/* var←c58092 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12007, 49)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+32) ), (word) (( (bPt) gf←c64076)+580)/* var←c58060 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12058, 49)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+33) ), (word) (( (bPt) gf←c64076)+572)/* var←c58028 */ , 0, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12109, 49)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+34) ), (word) (( (bPt) gf←c64076)+564)/* var←c57996 */ , 0, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12160, 51)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+35) ), (word) (( (bPt) gf←c64076)+556)/* var←c57964 */ , 0, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12213, 63)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+36) ), (word) (( (bPt) gf←c64076)+548)/* var←c57932 */ , 0, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12278, 51)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+37) ), (word) (( (bPt) gf←c64076)+540)/* var←c57900 */ , 0, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12331, 53)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+38) ), (word) (( (bPt) gf←c64076)+532)/* var←c57868 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12386, 55)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+39) ), (word) (( (bPt) gf←c64076)+524)/* var←c57836 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12443, 63)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+40) ), (word) (( (bPt) gf←c64076)+516)/* var←c57804 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12508, 55)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+41) ), (word) (( (bPt) gf←c64076)+508)/* var←c57772 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12565, 49)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+42) ), (word) (( (bPt) gf←c64076)+500)/* var←c57740 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12616, 53)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+43) ), (word) (( (bPt) gf←c64076)+492)/* var←c57708 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12671, 59)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+44) ), (word) (( (bPt) gf←c64076)+484)/* var←c57676 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12732, 61)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+45) ), (word) (( (bPt) gf←c64076)+476)/* var←c57644 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12795, 57)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+46) ), (word) (( (bPt) gf←c64076)+468)/* var←c57612 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12854, 57)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+47) ), (word) (( (bPt) gf←c64076)+460)/* var←c57580 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12913, 51)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+48) ), (word) (( (bPt) gf←c64076)+452)/* var←c57548 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(12966, 47)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+49) ), (word) (( (bPt) gf←c64076)+444)/* var←c57516 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(13015, 49)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+50) ), (word) (( (bPt) gf←c64076)+436)/* var←c57484 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(13066, 47)
   (void) RegisterOption←P3576((* (( (ptr) gf←c64076)+51) ), (word) (( (bPt) gf←c64076)+428)/* var←c57452 */ , 1, (word) (( (bPt) &var←c64044)+24)
      /* var←c60812 */ );
SOURCE(13115, 61)
   (void) RegisterSceneField←P3636((* (( (ptr) gf←c64076)+52) ), (word) (( (bPt) gf←c64076)+420)/* var←c57420 */ , (word) (( (bPt) &var←c64044)+16)
      /* var←c60780 */ );
   }

static void RegisterOption←P3576(name←v12908, process←v12936, type←v12964, formal←c64140)
   word name←v12908;
   word process←v12936;
   word type←v12964;
   word formal←c64140;
   {
   register ptr gf←c64108 =  (ptr) &globalframe;
   word optionData←v13080 = 0;
   formal←c64140 = (formal←c64140 - 24);
   /* RegisterOption: */ 
SOURCE(11218, 241)
SOURCE(11326, 83)
   {
      word var←c60844;
      var←c60844 = XR←NewObject(12, (* (( (ptr) gf←c64108)+14) ));
      (*  (ptr) var←c60844 ) = XR←CheckProc(process←v12936);
      (* (( (ptr) var←c60844)+2) ) = type←v12964;
      optionData←v13080 = var←c60844;
      };
SOURCE(11411, 48)
   {
      word var←c60876;
      word pd219;
      pd219 = (* (( (ptr) (* (( (ptr) gf←c64108)+208)/* var←c60716 */  ))+10) );
      var←c60876 = (word) ( *( (fPt) ((*  (ptr) pd219 ))))((* (( (ptr) gf←c64108)+4)/* optionTable←v5268 */  ), name←v12908, optionData←v13080, pd219)
      ;
      };
   }

static void RegisterSceneField←P3636(name←v13024, process←v13052, formal←c64204)
   word name←v13024;
   word process←v13052;
   word formal←c64204;
   {
   register ptr gf←c64172 =  (ptr) &globalframe;
   word optionData←v13124 = 0;
   formal←c64204 = (formal←c64204 - 16);
   /* RegisterSceneField: */ 
SOURCE(11464, 237)
SOURCE(11562, 89)
   {
      word var←c60908;
      var←c60908 = XR←NewObject(12, (* (( (ptr) gf←c64172)+14) ));
      (* (( (ptr) var←c60908)+1) ) = XR←CheckProc(process←v13052);
      (* (( (ptr) var←c60908)+2) ) = 2;
      optionData←v13124 = var←c60908;
      };
SOURCE(11653, 48)
   {
      word var←c60940;
      word pd220;
      pd220 = (* (( (ptr) (* (( (ptr) gf←c64172)+208)/* var←c60716 */  ))+10) );
      var←c60940 = (word) ( *( (fPt) ((*  (ptr) pd220 ))))((* (( (ptr) gf←c64172)+4)/* optionTable←v5268 */  ), name←v13024, optionData←v13124, pd220)
      ;
      };
   }

static void ProcessSceneField←P900(keyWord←v9312, option←v9340, version←v9368, scene←v9396)
   word keyWord←v9312;
   word option←v9340;
   word version←v9368;
   word scene←v9396;
   {
   register ptr gf←c64236 =  (ptr) &globalframe;
   word optionStream←v13168 = 0;
   word optionData←v13196 = 0;
   /* ProcessSceneField: */ 
SOURCE(13182, 451)
SOURCE(13318, 29)
   {
      word pd221;
      pd221 = (* (( (ptr) (* (( (ptr) gf←c64236)+204)/* var←c60108 */  ))+33) );
      optionStream←v13168 = (word) ( *( (fPt) ((*  (ptr) pd221 ))))(option←v9340, 0, pd221);
      };
SOURCE(13349, 32)
   optionData←v13196 = (word) FindOption←P780(keyWord←v9312);
SOURCE(13383, 250)
   if ((optionData←v13196 == 0)) {
SOURCE(13410, 105)
      {
         W2 v1←v57148;
         v1←v57148.f0 = 11;
         v1←v57148.f1 = keyWord←v9312;
         {
            word var←c61004;
            {
               word var←c61036;
               word var←c61068;
               var←c61036 = XR←NewObject(12, (* (( (ptr) gf←c64236)+15) ));
               var←c61068 = var←c61036;
               (*  (W2Pt) var←c61068 ) = v1←v57148;
               var←c61004 = var←c61036;
               };
            {
               word pd222;
               pd222 = (* (( (ptr) (* (( (ptr) gf←c64236)+201)/* var←c59660 */  ))+5) );
               (void) ( *( (fPt) ((*  (ptr) pd222 ))))((* (( (ptr) gf←c64236)+21) ), 0, (* (( (ptr) gf←c64236)+54) ), (* (( (ptr) gf←c64236)+53)
                   ), var←c61004, pd222);
               };
            };
         };
      }
   else {
SOURCE(13526, 43)
      if (((* (( (ptr) optionData←v13196)+2) ) != 2)) {
SOURCE(13563, 6)
         return;
         };
SOURCE(13571, 62)
      {
         word pd223;
         pd223 = (* (( (ptr) optionData←v13196)+1) );
         (void) ( *( (fPt) ((*  (ptr) pd223 ))))(keyWord←v9312, scene←v9396, optionStream←v13168, version←v9368, pd223);
         };
      };
   }

static void ProcessOption←P960(keyWord←v9456, option←v9484, version←v9512, ggData←v9540, types←v9568)
   word keyWord←v9456;
   word option←v9484;
   word version←v9512;
   word ggData←v9540;
   word types←v9568;
   {
   register ptr gf←c64268 =  (ptr) &globalframe;
   word optionStream←v13240 = 0;
   word optionData←v13268 = 0;
   /* ProcessOption: */ 
SOURCE(13642, 768)
SOURCE(13795, 27)
   if ((types←v9568 == 4)) {
SOURCE(13816, 6)
      return;
      };
SOURCE(13824, 29)
   {
      word pd224;
      pd224 = (* (( (ptr) (* (( (ptr) gf←c64268)+204)/* var←c60108 */  ))+33) );
      optionStream←v13240 = (word) ( *( (fPt) ((*  (ptr) pd224 ))))(option←v9484, 0, pd224);
      };
SOURCE(13855, 32)
   optionData←v13268 = (word) FindOption←P780(keyWord←v9456);
SOURCE(13889, 521)
   if ((optionData←v13268 == 0)) {
SOURCE(13916, 105)
      {
         W2 v1←v57072;
         v1←v57072.f0 = 11;
         v1←v57072.f1 = keyWord←v9456;
         {
            word var←c61132;
            {
               word var←c61164;
               word var←c61196;
               var←c61164 = XR←NewObject(12, (* (( (ptr) gf←c64268)+15) ));
               var←c61196 = var←c61164;
               (*  (W2Pt) var←c61196 ) = v1←v57072;
               var←c61132 = var←c61164;
               };
            {
               word pd225;
               pd225 = (* (( (ptr) (* (( (ptr) gf←c64268)+201)/* var←c59660 */  ))+5) );
               (void) ( *( (fPt) ((*  (ptr) pd225 ))))((* (( (ptr) gf←c64268)+21) ), 0, (* (( (ptr) gf←c64268)+54) ), (* (( (ptr) gf←c64268)+53)
                   ), var←c61132, pd225);
               };
            };
         };
      }
   else {
SOURCE(14032, 70)
      if ( ( (types←v9568 == 2) ? ((* (( (ptr) optionData←v13268)+2) ) != 2) : 0 ) ) {
SOURCE(14096, 6)
         return;
         };
SOURCE(14104, 70)
      if ( ( (types←v9568 == 0) ? ((* (( (ptr) optionData←v13268)+2) ) != 0) : 0 ) ) {
SOURCE(14168, 6)
         return;
         };
SOURCE(14176, 62)
      if ( ( (types←v9568 == 1) ? ((* (( (ptr) optionData←v13268)+2) ) != 1) : 0 ) ) {
SOURCE(14232, 6)
         return;
         };
SOURCE(14240, 170)
      if (((* (( (ptr) optionData←v13268)+2) ) == 2)) {
SOURCE(14277, 75)
         {
            word pd226;
            pd226 = (* (( (ptr) optionData←v13268)+1) );
            (void) ( *( (fPt) ((*  (ptr) pd226 ))))(keyWord←v9456, (* (( (ptr) ggData←v9540)+11) ), optionStream←v13240, version←v9512, pd226)
            ;
            };
         }
      else {
SOURCE(14352, 58)
         {
            word pd227;
            pd227 = (*  (ptr) optionData←v13268 );
            (void) ( *( (fPt) ((*  (ptr) pd227 ))))(keyWord←v9456, ggData←v9540, optionStream←v13240, version←v9512, pd227);
            };
         };
      };
   }

static void ProcessViewTransform←P1020(keyWord←v21732, ggData←v21760, optionStream←v21788, version←v21816)
   word keyWord←v21732;
   word ggData←v21760;
   word optionStream←v21788;
   word version←v21816;
   {
   register ptr gf←c64300 =  (ptr) &globalframe;
   word clientToViewer←v13312;
   /* ProcessViewTransform: */ 
SOURCE(14629, 176)
SOURCE(14673, 75)
   {
      word pd228;
      pd228 = (* (( (ptr) (* (( (ptr) gf←c64300)+195)/* var←c59148 */  ))+20) );
      clientToViewer←v13312 = (word) ( *( (fPt) ((*  (ptr) pd228 ))))(optionStream←v21788, pd228);
      };
SOURCE(14750, 55)
   {
      word pd229;
      pd229 = (* (( (ptr) (* (( (ptr) gf←c64300)+205)/* var←c60236 */  ))+13) );
      (void) ( *( (fPt) ((*  (ptr) pd229 ))))(ggData←v21760, clientToViewer←v13312, 1, 0, pd229);
      };
   }

static void ProcessPaletteForFillColor←P1080(keyWord←v21876, ggData←v21904, optionStream←v21932, version←v21960)
   word keyWord←v21876;
   word ggData←v21904;
   word optionStream←v21932;
   word version←v21960;
   {
   register ptr gf←c64332 =  (ptr) &globalframe;
   word active←v13356;
   /* ProcessPaletteForFillColor: */ 
SOURCE(14810, 146)
SOURCE(14860, 47)
   {
      word pd230;
      pd230 = (* (( (ptr) (* (( (ptr) gf←c64332)+195)/* var←c59148 */  ))+24) );
      active←v13356 = (word) ( *( (fPt) ((*  (ptr) pd230 ))))(optionStream←v21932, pd230);
      };
SOURCE(14909, 47)
   if ((0 != active←v13356)) {
SOURCE(14924, 32)
      {
         word pd231;
         pd231 = (* (( (ptr) (* (( (ptr) gf←c64332)+205)/* var←c60236 */  ))+69) );
         (void) ( *( (fPt) ((*  (ptr) pd231 ))))(ggData←v21904, 1, pd231);
         };
      };
   }

static void ProcessPaletteForStrokeColor←P1140(keyWord←v22020, ggData←v22048, optionStream←v22076, version←v22104)
   word keyWord←v22020;
   word ggData←v22048;
   word optionStream←v22076;
   word version←v22104;
   {
   register ptr gf←c64364 =  (ptr) &globalframe;
   word active←v13400;
   /* ProcessPaletteForStrokeColor: */ 
SOURCE(14961, 148)
SOURCE(15013, 47)
   {
      word pd232;
      pd232 = (* (( (ptr) (* (( (ptr) gf←c64364)+195)/* var←c59148 */  ))+24) );
      active←v13400 = (word) ( *( (fPt) ((*  (ptr) pd232 ))))(optionStream←v22076, pd232);
      };
SOURCE(15062, 47)
   if ((0 != active←v13400)) {
SOURCE(15077, 32)
      {
         word pd233;
         pd233 = (* (( (ptr) (* (( (ptr) gf←c64364)+205)/* var←c60236 */  ))+69) );
         (void) ( *( (fPt) ((*  (ptr) pd233 ))))(ggData←v22048, 1, pd233);
         };
      };
   }

static void ProcessPalette←P1200(keyWord←v22164, ggData←v22192, optionStream←v22220, version←v22248)
   word keyWord←v22164;
   word ggData←v22192;
   word optionStream←v22220;
   word version←v22248;
   {
   register ptr gf←c64396 =  (ptr) &globalframe;
   word active←v13444;
   /* ProcessPalette: */ 
SOURCE(15114, 134)
SOURCE(15152, 47)
   {
      word pd234;
      pd234 = (* (( (ptr) (* (( (ptr) gf←c64396)+195)/* var←c59148 */  ))+24) );
      active←v13444 = (word) ( *( (fPt) ((*  (ptr) pd234 ))))(optionStream←v22220, pd234);
      };
SOURCE(15201, 47)
   if ((0 != active←v13444)) {
SOURCE(15216, 32)
      {
         word pd235;
         pd235 = (* (( (ptr) (* (( (ptr) gf←c64396)+205)/* var←c60236 */  ))+69) );
         (void) ( *( (fPt) ((*  (ptr) pd235 ))))(ggData←v22192, 1, pd235);
         };
      };
   }

static void ProcessScripts←P1260(keyWord←v22308, ggData←v22336, optionStream←v22364, version←v22392)
   word keyWord←v22308;
   word ggData←v22336;
   word optionStream←v22364;
   word version←v22392;
   {
   register ptr gf←c64428 =  (ptr) &globalframe;
   word names←v13488;
   /* ProcessScripts: */ 
SOURCE(15253, 291)
SOURCE(15291, 7)
   {
      word pd236;
      pd236 = (* (( (ptr) (* (( (ptr) gf←c64428)+195)/* var←c59148 */  ))+13) );
      names←v13488 = (word) ( *( (fPt) ((*  (ptr) pd236 ))))(optionStream←v22364, pd236);
      };
SOURCE(15358, 55)
   {
      word pd237;
      pd237 = (* (( (ptr) (* (( (ptr) gf←c64428)+194)/* var←c59052 */  ))+9) );
      (* (( (ptr) (* (( (ptr) ggData←v22336)+29) ))+7) ) = (word) ( *( (fPt) ((*  (ptr) pd237 ))))(pd237);
      };
SOURCE(15415, 129)
   {
      register word list←v13616;
      list←v13616 = names←v13488;
      lab←L100053: ;
      if ((list←v13616 != 0)) {
         }
      else {
         goto lab←L100050;
         };
SOURCE(15482, 62)
      {
         word pd238;
         pd238 = (* (( (ptr) (* (( (ptr) gf←c64428)+194)/* var←c59052 */  ))+11) );
         (void) ( *( (fPt) ((*  (ptr) pd238 ))))((*  (ptr) list←v13616 ), (* (( (ptr) (* (( (ptr) ggData←v22336)+29) ))+7) ), pd238)
         ;
         };
      list←v13616 = (* (( (ptr) list←v13616)+1) );
      goto lab←L100053;
      lab←L100050: ;
      };
   }

static void ProcessSlope←P1320(keyWord←v22452, ggData←v22480, optionStream←v22508, version←v22536)
   word keyWord←v22452;
   word ggData←v22480;
   word optionStream←v22508;
   word version←v22536;
   {
   register ptr gf←c64460 =  (ptr) &globalframe;
   /* ProcessSlope: */ 
SOURCE(15558, 664)
SOURCE(15594, 628)
   {
      word x239;
      word x241;
      if (((
         x239 = version←v22536,  *(float*)&x239
         ) >= (
         x241 = (*  (ptr) &fc240 ),  *(float*)&x241
         ))) {
SOURCE(15619, 192)
         {
            word values←v13744 = 0;
            word on←v13772 = 0;
SOURCE(15691, 76)
            {
               W3 var←c61228;
               {
                  word pd242;
                  pd242 = (* (( (ptr) (* (( (ptr) gf←c64460)+195)/* var←c59148 */  ))+28) );
                  (void) ( *( (fPt) ((*  (ptr) pd242 ))))((word) &var←c61228, optionStream←v22508, version←v22536, pd242);
                  };
               on←v13772 = var←c61228.f2;
               values←v13744 = var←c61228.f1;
               };
SOURCE(15769, 40)
            {
               word pd243;
               pd243 = (* (( (ptr) (* (( (ptr) gf←c64460)+205)/* var←c60236 */  ))+31) );
               (void) ( *( (fPt) ((*  (ptr) pd243 ))))(ggData←v22480, values←v13744, on←v13772, pd243);
               };
            };
         }
      else {
SOURCE(15818, 406)
         {
            word values←v13984 = 0;
            word ptr←v14012 = 0;
            word optionList←v14040 = 0;
            word value←v14068;
SOURCE(15907, 51)
            {
               word pd244;
               pd244 = (* (( (ptr) (* (( (ptr) gf←c64460)+195)/* var←c59148 */  ))+13) );
               optionList←v14040 = (word) ( *( (fPt) ((*  (ptr) pd244 ))))(optionStream←v22508, pd244);
               };
SOURCE(15960, 41)
            {
               W2 var←c61260;
               {
                  word pd245;
                  pd245 = (* (( (ptr) (* (( (ptr) gf←c64460)+194)/* var←c59052 */  ))+17) );
                  (void) ( *( (fPt) ((*  (ptr) pd245 ))))((word) (&var←c61260), pd245);
                  };
               ptr←v14012 = var←c61260.f1;
               values←v13984 = var←c61260.f0;
               };
SOURCE(16003, 167)
            {
               register word list←v14280;
               list←v14280 = optionList←v14040;
               lab←L100057: ;
               if ((list←v14280 != 0)) {
                  }
               else {
                  goto lab←L100054;
                  };
SOURCE(16075, 40)
               {
                  word pd246;
                  pd246 = (* (( (ptr) (* (( (ptr) gf←c64460)+209)/* var←c61292 */  ))+12) );
                  value←v14068 = (word) ( *( (fPt) ((*  (ptr) pd246 ))))((*  (ptr) (list←v14280) ), pd246);
                  };
SOURCE(16117, 53)
               {
                  W2 var←c61324;
                  {
                     word pd247;
                     pd247 = (* (( (ptr) (* (( (ptr) gf←c64460)+194)/* var←c59052 */  ))+18) );
                     (void) ( *( (fPt) ((*  (ptr) pd247 ))))((word) &var←c61324, value←v14068, values←v13984, ptr←v14012, pd247);
                     };
                  ptr←v14012 = var←c61324.f1;
                  values←v13984 = var←c61324.f0;
                  };
               list←v14280 = (* (( (ptr) list←v14280)+1) );
               goto lab←L100057;
               lab←L100054: ;
               };
SOURCE(16181, 41)
            {
               word pd248;
               pd248 = (* (( (ptr) (* (( (ptr) gf←c64460)+205)/* var←c60236 */  ))+31) );
               (void) ( *( (fPt) ((*  (ptr) pd248 ))))(ggData←v22480, values←v13984, 0, pd248);
               };
            };
         };
      };
   }

static void ProcessAngle←P1380(keyWord←v22596, ggData←v22624, optionStream←v22652, version←v22680)
   word keyWord←v22596;
   word ggData←v22624;
   word optionStream←v22652;
   word version←v22680;
   {
   register ptr gf←c64492 =  (ptr) &globalframe;
   /* ProcessAngle: */ 
SOURCE(16230, 664)
SOURCE(16266, 628)
   {
      word x249;
      word x250;
      if (((
         x249 = version←v22680,  *(float*)&x249
         ) >= (
         x250 = (*  (ptr) &fc240 ),  *(float*)&x250
         ))) {
SOURCE(16291, 192)
         {
            word values←v14408 = 0;
            word on←v14436 = 0;
SOURCE(16363, 76)
            {
               W3 var←c61356;
               {
                  word pd251;
                  pd251 = (* (( (ptr) (* (( (ptr) gf←c64492)+195)/* var←c59148 */  ))+28) );
                  (void) ( *( (fPt) ((*  (ptr) pd251 ))))((word) &var←c61356, optionStream←v22652, version←v22680, pd251);
                  };
               on←v14436 = var←c61356.f2;
               values←v14408 = var←c61356.f1;
               };
SOURCE(16441, 40)
            {
               word pd252;
               pd252 = (* (( (ptr) (* (( (ptr) gf←c64492)+205)/* var←c60236 */  ))+38) );
               (void) ( *( (fPt) ((*  (ptr) pd252 ))))(ggData←v22624, values←v14408, on←v14436, pd252);
               };
            };
         }
      else {
SOURCE(16490, 406)
         {
            word values←v14648 = 0;
            word ptr←v14676 = 0;
            word value←v14704;
            word optionList←v14732 = 0;
SOURCE(16579, 51)
            {
               word pd253;
               pd253 = (* (( (ptr) (* (( (ptr) gf←c64492)+195)/* var←c59148 */  ))+13) );
               optionList←v14732 = (word) ( *( (fPt) ((*  (ptr) pd253 ))))(optionStream←v22652, pd253);
               };
SOURCE(16632, 41)
            {
               W2 var←c61388;
               {
                  word pd254;
                  pd254 = (* (( (ptr) (* (( (ptr) gf←c64492)+194)/* var←c59052 */  ))+17) );
                  (void) ( *( (fPt) ((*  (ptr) pd254 ))))((word) (&var←c61388), pd254);
                  };
               ptr←v14676 = var←c61388.f1;
               values←v14648 = var←c61388.f0;
               };
SOURCE(16675, 167)
            {
               register word list←v14944;
               list←v14944 = optionList←v14732;
               lab←L100061: ;
               if ((list←v14944 != 0)) {
                  }
               else {
                  goto lab←L100058;
                  };
SOURCE(16747, 40)
               {
                  word pd255;
                  pd255 = (* (( (ptr) (* (( (ptr) gf←c64492)+209)/* var←c61292 */  ))+12) );
                  value←v14704 = (word) ( *( (fPt) ((*  (ptr) pd255 ))))((*  (ptr) (list←v14944) ), pd255);
                  };
SOURCE(16789, 53)
               {
                  W2 var←c61420;
                  {
                     word pd256;
                     pd256 = (* (( (ptr) (* (( (ptr) gf←c64492)+194)/* var←c59052 */  ))+18) );
                     (void) ( *( (fPt) ((*  (ptr) pd256 ))))((word) &var←c61420, value←v14704, values←v14648, ptr←v14676, pd256);
                     };
                  ptr←v14676 = var←c61420.f1;
                  values←v14648 = var←c61420.f0;
                  };
               list←v14944 = (* (( (ptr) list←v14944)+1) );
               goto lab←L100061;
               lab←L100058: ;
               };
SOURCE(16853, 41)
            {
               word pd257;
               pd257 = (* (( (ptr) (* (( (ptr) gf←c64492)+205)/* var←c60236 */  ))+38) );
               (void) ( *( (fPt) ((*  (ptr) pd257 ))))(ggData←v22624, values←v14648, 0, pd257);
               };
            };
         };
      };
   }

static void ProcessRadius←P1440(keyWord←v22740, ggData←v22768, optionStream←v22796, version←v22824)
   word keyWord←v22740;
   word ggData←v22768;
   word optionStream←v22796;
   word version←v22824;
   {
   register ptr gf←c64524 =  (ptr) &globalframe;
   /* ProcessRadius: */ 
SOURCE(16902, 708)
SOURCE(16939, 671)
   {
      word x258;
      word x259;
      if (((
         x258 = version←v22824,  *(float*)&x258
         ) >= (
         x259 = (*  (ptr) &fc240 ),  *(float*)&x259
         ))) {
SOURCE(16964, 228)
         {
            word values←v15072 = 0;
            word on←v15100 = 0;
            word names←v15128 = 0;
SOURCE(17063, 77)
            {
               W3 var←c61452;
               {
                  word pd260;
                  pd260 = (* (( (ptr) (* (( (ptr) gf←c64524)+195)/* var←c59148 */  ))+28) );
                  (void) ( *( (fPt) ((*  (ptr) pd260 ))))((word) &var←c61452, optionStream←v22796, version←v22824, pd260);
                  };
               on←v15100 = var←c61452.f2;
               values←v15072 = var←c61452.f1;
               names←v15128 = var←c61452.f0;
               };
SOURCE(17142, 48)
            {
               word pd261;
               pd261 = (* (( (ptr) (* (( (ptr) gf←c64524)+205)/* var←c60236 */  ))+45) );
               (void) ( *( (fPt) ((*  (ptr) pd261 ))))(ggData←v22768, names←v15128, values←v15072, on←v15100, pd261);
               };
            };
         }
      else {
SOURCE(17199, 413)
         {
            word values←v15424 = 0;
            word ptr←v15452 = 0;
            word value←v15480;
            word optionList←v15508 = 0;
SOURCE(17289, 51)
            {
               word pd262;
               pd262 = (* (( (ptr) (* (( (ptr) gf←c64524)+195)/* var←c59148 */  ))+13) );
               optionList←v15508 = (word) ( *( (fPt) ((*  (ptr) pd262 ))))(optionStream←v22796, pd262);
               };
SOURCE(17342, 41)
            {
               W2 var←c61484;
               {
                  word pd263;
                  pd263 = (* (( (ptr) (* (( (ptr) gf←c64524)+194)/* var←c59052 */  ))+17) );
                  (void) ( *( (fPt) ((*  (ptr) pd263 ))))((word) (&var←c61484), pd263);
                  };
               ptr←v15452 = var←c61484.f1;
               values←v15424 = var←c61484.f0;
               };
SOURCE(17385, 167)
            {
               register word list←v15720;
               list←v15720 = optionList←v15508;
               lab←L100065: ;
               if ((list←v15720 != 0)) {
                  }
               else {
                  goto lab←L100062;
                  };
SOURCE(17457, 40)
               {
                  word pd264;
                  pd264 = (* (( (ptr) (* (( (ptr) gf←c64524)+209)/* var←c61292 */  ))+12) );
                  value←v15480 = (word) ( *( (fPt) ((*  (ptr) pd264 ))))((*  (ptr) (list←v15720) ), pd264);
                  };
SOURCE(17499, 53)
               {
                  W2 var←c61516;
                  {
                     word pd265;
                     pd265 = (* (( (ptr) (* (( (ptr) gf←c64524)+194)/* var←c59052 */  ))+18) );
                     (void) ( *( (fPt) ((*  (ptr) pd265 ))))((word) &var←c61516, value←v15480, values←v15424, ptr←v15452, pd265);
                     };
                  ptr←v15452 = var←c61516.f1;
                  values←v15424 = var←c61516.f0;
                  };
               list←v15720 = (* (( (ptr) list←v15720)+1) );
               goto lab←L100065;
               lab←L100062: ;
               };
SOURCE(17563, 47)
            {
               word pd266;
               pd266 = (* (( (ptr) (* (( (ptr) gf←c64524)+205)/* var←c60236 */  ))+45) );
               (void) ( *( (fPt) ((*  (ptr) pd266 ))))(ggData←v22768, 0, values←v15424, 0, pd266);
               };
            };
         };
      };
   }

static void ProcessLineDistance←P1500(keyWord←v22884, ggData←v22912, optionStream←v22940, version←v22968)
   word keyWord←v22884;
   word ggData←v22912;
   word optionStream←v22940;
   word version←v22968;
   {
   register ptr gf←c64556 =  (ptr) &globalframe;
   /* ProcessLineDistance: */ 
SOURCE(17618, 738)
SOURCE(17661, 695)
   {
      word x267;
      word x268;
      if (((
         x267 = version←v22968,  *(float*)&x267
         ) >= (
         x268 = (*  (ptr) &fc240 ),  *(float*)&x268
         ))) {
SOURCE(17686, 240)
         {
            word values←v15848 = 0;
            word on←v15876 = 0;
            word names←v15904 = 0;
SOURCE(17791, 77)
            {
               W3 var←c61548;
               {
                  word pd269;
                  pd269 = (* (( (ptr) (* (( (ptr) gf←c64556)+195)/* var←c59148 */  ))+28) );
                  (void) ( *( (fPt) ((*  (ptr) pd269 ))))((word) &var←c61548, optionStream←v22940, version←v22968, pd269);
                  };
               on←v15876 = var←c61548.f2;
               values←v15848 = var←c61548.f1;
               names←v15904 = var←c61548.f0;
               };
SOURCE(17870, 54)
            {
               word pd270;
               pd270 = (* (( (ptr) (* (( (ptr) gf←c64556)+205)/* var←c60236 */  ))+54) );
               (void) ( *( (fPt) ((*  (ptr) pd270 ))))(ggData←v22912, names←v15904, values←v15848, on←v15876, pd270);
               };
            };
         }
      else {
SOURCE(17933, 425)
         {
            word values←v16200 = 0;
            word ptr←v16228 = 0;
            word value←v16256;
            word optionList←v16284 = 0;
SOURCE(18029, 51)
            {
               word pd271;
               pd271 = (* (( (ptr) (* (( (ptr) gf←c64556)+195)/* var←c59148 */  ))+13) );
               optionList←v16284 = (word) ( *( (fPt) ((*  (ptr) pd271 ))))(optionStream←v22940, pd271);
               };
SOURCE(18082, 41)
            {
               W2 var←c61580;
               {
                  word pd272;
                  pd272 = (* (( (ptr) (* (( (ptr) gf←c64556)+194)/* var←c59052 */  ))+17) );
                  (void) ( *( (fPt) ((*  (ptr) pd272 ))))((word) (&var←c61580), pd272);
                  };
               ptr←v16228 = var←c61580.f1;
               values←v16200 = var←c61580.f0;
               };
SOURCE(18125, 167)
            {
               register word list←v16496;
               list←v16496 = optionList←v16284;
               lab←L100069: ;
               if ((list←v16496 != 0)) {
                  }
               else {
                  goto lab←L100066;
                  };
SOURCE(18197, 40)
               {
                  word pd273;
                  pd273 = (* (( (ptr) (* (( (ptr) gf←c64556)+209)/* var←c61292 */  ))+12) );
                  value←v16256 = (word) ( *( (fPt) ((*  (ptr) pd273 ))))((*  (ptr) (list←v16496) ), pd273);
                  };
SOURCE(18239, 53)
               {
                  W2 var←c61612;
                  {
                     word pd274;
                     pd274 = (* (( (ptr) (* (( (ptr) gf←c64556)+194)/* var←c59052 */  ))+18) );
                     (void) ( *( (fPt) ((*  (ptr) pd274 ))))((word) &var←c61612, value←v16256, values←v16200, ptr←v16228, pd274);
                     };
                  ptr←v16228 = var←c61612.f1;
                  values←v16200 = var←c61612.f0;
                  };
               list←v16496 = (* (( (ptr) list←v16496)+1) );
               goto lab←L100069;
               lab←L100066: ;
               };
SOURCE(18303, 53)
            {
               word pd275;
               pd275 = (* (( (ptr) (* (( (ptr) gf←c64556)+205)/* var←c60236 */  ))+54) );
               (void) ( *( (fPt) ((*  (ptr) pd275 ))))(ggData←v22912, 0, values←v16200, 0, pd275);
               };
            };
         };
      };
   }

static void ProcessAnchor←P1560(keyWord←v23028, ggData←v23056, optionStream←v23084, version←v23112)
   word keyWord←v23028;
   word ggData←v23056;
   word optionStream←v23084;
   word version←v23112;
   {
   register ptr gf←c64588 =  (ptr) &globalframe;
   word anchored←v16624;
   /* ProcessAnchor: */ 
SOURCE(18364, 277)
SOURCE(18417, 43)
   {
      word pd276;
      pd276 = (* (( (ptr) (* (( (ptr) gf←c64588)+195)/* var←c59148 */  ))+24) );
      anchored←v16624 = (word) ( *( (fPt) ((*  (ptr) pd276 ))))(optionStream←v23084, pd276);
      };
SOURCE(18462, 179)
   if ((0 != anchored←v16624)) {
SOURCE(18479, 127)
      {
         W2 point←v16668;
SOURCE(18481, 48)
         {
            word pd277;
            pd277 = (* (( (ptr) (* (( (ptr) gf←c64588)+195)/* var←c59148 */  ))+19) );
            (void) ( *( (fPt) ((*  (ptr) pd277 ))))((word) &point←v16668, optionStream←v23084, pd277);
            };
SOURCE(18531, 73)
         {
            word var←c61644;
            var←c61644 = (* (( (ptr) ggData←v23056)+14) );
            (*  (ptr) var←c61644 ) = 1;
            (*  (W2Pt) (( (ptr) var←c61644)+1) ) = point←v16668;
            (* (( (ptr) var←c61644)+3) ) = (*  (ptr) &fc278 );
            (* (( (ptr) var←c61644)+4) ) = (*  (ptr) &fc279 );
            (* (( (ptr) var←c61644)+5) ) = 0;
            (* (( (ptr) var←c61644)+6) ) = 0;
            };
         };
      }
   else {
SOURCE(18613, 28)
      (*  (ptr) (* (( (ptr) ggData←v23056)+14) ) ) = 0;
      };
   }

static void ProcessMidpoints←P1620(keyWord←v23172, ggData←v23200, optionStream←v23228, version←v23256)
   word keyWord←v23172;
   word ggData←v23200;
   word optionStream←v23228;
   word version←v23256;
   {
   register ptr gf←c64620 =  (ptr) &globalframe;
   word on←v16712;
   /* ProcessMidpoints: */ 
SOURCE(18646, 121)
SOURCE(18696, 37)
   {
      word pd280;
      pd280 = (* (( (ptr) (* (( (ptr) gf←c64620)+195)/* var←c59148 */  ))+24) );
      on←v16712 = (word) ( *( (fPt) ((*  (ptr) pd280 ))))(optionStream←v23228, pd280);
      };
SOURCE(18735, 32)
   {
      word pd281;
      pd281 = (* (( (ptr) (* (( (ptr) gf←c64620)+205)/* var←c60236 */  ))+57) );
      (void) ( *( (fPt) ((*  (ptr) pd281 ))))(ggData←v23200, on←v16712, pd281);
      };
   }

static void ProcessHeuristics←P1680(keyWord←v23316, ggData←v23344, optionStream←v23372, version←v23400)
   word keyWord←v23316;
   word ggData←v23344;
   word optionStream←v23372;
   word version←v23400;
   {
   register ptr gf←c64652 =  (ptr) &globalframe;
   word on←v16756;
   /* ProcessHeuristics: */ 
SOURCE(18772, 123)
SOURCE(18823, 37)
   {
      word pd282;
      pd282 = (* (( (ptr) (* (( (ptr) gf←c64652)+195)/* var←c59148 */  ))+24) );
      on←v16756 = (word) ( *( (fPt) ((*  (ptr) pd282 ))))(optionStream←v23372, pd282);
      };
SOURCE(18862, 33)
   {
      word pd283;
      pd283 = (* (( (ptr) (* (( (ptr) gf←c64652)+205)/* var←c60236 */  ))+97) );
      (void) ( *( (fPt) ((*  (ptr) pd283 ))))(ggData←v23344, on←v16756, pd283);
      };
   }

static void ProcessShowAlignments←P1740(keyWord←v23460, ggData←v23488, optionStream←v23516, version←v23544)
   word keyWord←v23460;
   word ggData←v23488;
   word optionStream←v23516;
   word version←v23544;
   {
   register ptr gf←c64684 =  (ptr) &globalframe;
   word on←v16800;
   /* ProcessShowAlignments: */ 
SOURCE(18900, 131)
SOURCE(18955, 37)
   {
      word pd284;
      pd284 = (* (( (ptr) (* (( (ptr) gf←c64684)+195)/* var←c59148 */  ))+24) );
      on←v16800 = (word) ( *( (fPt) ((*  (ptr) pd284 ))))(optionStream←v23516, pd284);
      };
SOURCE(18994, 37)
   {
      word pd285;
      pd285 = (* (( (ptr) (* (( (ptr) gf←c64684)+205)/* var←c60236 */  ))+59) );
      (void) ( *( (fPt) ((*  (ptr) pd285 ))))(ggData←v23488, on←v16800, pd285);
      };
   }

static void ProcessShowColors←P1800(keyWord←v23604, ggData←v23632, optionStream←v23660, version←v23688)
   word keyWord←v23604;
   word ggData←v23632;
   word optionStream←v23660;
   word version←v23688;
   {
   register ptr gf←c64716 =  (ptr) &globalframe;
   word on←v16844;
   /* ProcessShowColors: */ 
SOURCE(19036, 88)
SOURCE(19087, 37)
   {
      word pd286;
      pd286 = (* (( (ptr) (* (( (ptr) gf←c64716)+195)/* var←c59148 */  ))+24) );
      on←v16844 = (word) ( *( (fPt) ((*  (ptr) pd286 ))))(optionStream←v23660, pd286);
      };
   }

static void ProcessGravity←P1860(keyWord←v23748, ggData←v23776, optionStream←v23804, version←v23832)
   word keyWord←v23748;
   word ggData←v23776;
   word optionStream←v23804;
   word version←v23832;
   {
   register ptr gf←c64748 =  (ptr) &globalframe;
   word on←v16888;
   /* ProcessGravity: */ 
SOURCE(19129, 117)
SOURCE(19177, 37)
   {
      word pd287;
      pd287 = (* (( (ptr) (* (( (ptr) gf←c64748)+195)/* var←c59148 */  ))+24) );
      on←v16888 = (word) ( *( (fPt) ((*  (ptr) pd287 ))))(optionStream←v23804, pd287);
      };
SOURCE(19216, 30)
   {
      word pd288;
      pd288 = (* (( (ptr) (* (( (ptr) gf←c64748)+205)/* var←c60236 */  ))+90) );
      (void) ( *( (fPt) ((*  (ptr) pd288 ))))(ggData←v23776, on←v16888, pd288);
      };
   }

static void ProcessScaleUnit←P1920(keyWord←v23892, ggData←v23920, optionStream←v23948, version←v23976)
   word keyWord←v23892;
   word ggData←v23920;
   word optionStream←v23948;
   word version←v23976;
   {
   register ptr gf←c64780 =  (ptr) &globalframe;
   word real←v16932;
   /* ProcessScaleUnit: */ 
SOURCE(19251, 143)
SOURCE(19291, 45)
   {
      word pd289;
      pd289 = (* (( (ptr) (* (( (ptr) gf←c64780)+195)/* var←c59148 */  ))+27) );
      real←v16932 = (word) ( *( (fPt) ((*  (ptr) pd289 ))))(optionStream←v23948, pd289);
      };
SOURCE(19338, 56)
   {
      word x290;
      word x291;
      if (((
         x290 = real←v16932,  *(float*)&x290
         ) > (
         x291 = (*  (ptr) &fc278 ),  *(float*)&x291
         ))) {
SOURCE(19355, 39)
         {
            word pd292;
            pd292 = (* (( (ptr) (* (( (ptr) gf←c64780)+205)/* var←c60236 */  ))+99) );
            (void) ( *( (fPt) ((*  (ptr) pd292 ))))(ggData←v23920, real←v16932, 0, pd292);
            };
         };
      };
   }

static void ProcessDisplayStyle←P1980(keyWord←v24036, ggData←v24064, optionStream←v24092, version←v24120)
   word keyWord←v24036;
   word ggData←v24064;
   word optionStream←v24092;
   word version←v24120;
   {
   register ptr gf←c64812 =  (ptr) &globalframe;
   word rope←v16976;
   /* ProcessDisplayStyle: */ 
SOURCE(19399, 166)
SOURCE(19442, 50)
   {
      word pd293;
      pd293 = (* (( (ptr) (* (( (ptr) gf←c64812)+195)/* var←c59148 */  ))+8) );
      rope←v16976 = (word) ( *( (fPt) ((*  (ptr) pd293 ))))(optionStream←v24092, pd293);
      };
SOURCE(19494, 71)
   {
      word var←c61676;
      {
         word pd294;
         pd294 = (* (( (ptr) (* (( (ptr) gf←c64812)+198)/* var←c59468 */  ))+9) );
         var←c61676 = (word) ( *( (fPt) ((*  (ptr) pd294 ))))(rope←v16976, pd294);
         };
      {
         word pd295;
         pd295 = (* (( (ptr) (* (( (ptr) gf←c64812)+205)/* var←c60236 */  ))+73) );
         (void) ( *( (fPt) ((*  (ptr) pd295 ))))(ggData←v24064, var←c61676, pd295);
         };
      };
   }

static void ProcessGravityExtent←P2040(keyWord←v24180, ggData←v24208, optionStream←v24236, version←v24264)
   word keyWord←v24180;
   word ggData←v24208;
   word optionStream←v24236;
   word version←v24264;
   {
   register ptr gf←c64844 =  (ptr) &globalframe;
   word real←v17020;
   /* ProcessGravityExtent: */ 
SOURCE(19570, 129)
SOURCE(19614, 45)
   {
      word pd296;
      pd296 = (* (( (ptr) (* (( (ptr) gf←c64844)+195)/* var←c59148 */  ))+27) );
      real←v17020 = (word) ( *( (fPt) ((*  (ptr) pd296 ))))(optionStream←v24236, pd296);
      };
SOURCE(19661, 38)
   {
      word pd297;
      pd297 = (* (( (ptr) (* (( (ptr) gf←c64844)+205)/* var←c60236 */  ))+92) );
      (void) ( *( (fPt) ((*  (ptr) pd297 ))))(ggData←v24208, real←v17020, pd297);
      };
   }

static void ProcessGravityType←P2100(keyWord←v24324, ggData←v24352, optionStream←v24380, version←v24408)
   word keyWord←v24324;
   word ggData←v24352;
   word optionStream←v24380;
   word version←v24408;
   {
   register ptr gf←c64876 =  (ptr) &globalframe;
   word rope←v17064;
   /* ProcessGravityType: */ 
SOURCE(19704, 163)
SOURCE(19746, 50)
   {
      word pd298;
      pd298 = (* (( (ptr) (* (( (ptr) gf←c64876)+195)/* var←c59148 */  ))+8) );
      rope←v17064 = (word) ( *( (fPt) ((*  (ptr) pd298 ))))(optionStream←v24380, pd298);
      };
SOURCE(19798, 69)
   {
      word var←c61708;
      {
         word pd299;
         pd299 = (* (( (ptr) (* (( (ptr) gf←c64876)+198)/* var←c59468 */  ))+7) );
         var←c61708 = (word) ( *( (fPt) ((*  (ptr) pd299 ))))(rope←v17064, pd299);
         };
      {
         word pd300;
         pd300 = (* (( (ptr) (* (( (ptr) gf←c64876)+205)/* var←c60236 */  ))+94) );
         (void) ( *( (fPt) ((*  (ptr) pd300 ))))(ggData←v24352, var←c61708, pd300);
         };
      };
   }

static void ProcessDefaultFont←P2160(keyWord←v24468, ggData←v24496, formal←c0692, version←v24552)
   word keyWord←v24468;
   word ggData←v24496;
   word formal←c0692;
   word version←v24552;
   {
   W8 var←c64908;
   /* declaration of optionStream←v24524 skipped */ 
   register ptr gf←c64940 =  (ptr) &globalframe;
   /* declaration of fontData←v17108 skipped */ 
   var←c64908.f4/* optionStream←v24524 */  = formal←c0692;
   /* ProcessDefaultFont: */ 
SOURCE(19872, 410)
SOURCE(19914, 44)
   {
      word pd301;
      pd301 = (* (( (ptr) (* (( (ptr) gf←c64940)+210)/* var←c61740 */  ))+6) );
      var←c64908.f5/* fontData←v17108 */  = (word) ( *( (fPt) ((*  (ptr) pd301 ))))(pd301);
      };
SOURCE(19988, 166)
SOURCE(19988, 166)
   {
      /* declaration of var←c07 skipped */ 
      var←c64908.f6/* var←c07 */  = (* (( (ptr) (* (( (ptr) gf←c64940)+210)/* var←c61740 */  ))+9) );
      {
         /* declaration of var←c08 skipped */ 
         {
            word var←c09;
            {
               word var←c0658;
               var←c0658 = (word) &var←c64908;
               var←c09 = (word) XR←Enable(( ((word)  (fPt) NoName←Q5040) ), ( ((word)  (fPt) NoName←Q5100) ), var←c0658);
               };
            if ((var←c09 == 9)) {
               goto lab←L100071;
               };
            };
         var←c64908.f5/* fontData←v17108 */  = var←c64908.f7/* var←c08 */ ;
         };
      };
   lab←L100071: ;
SOURCE(20166, 28)
   (* (( (ptr) var←c64908.f5/* fontData←v17108 */ )+13) ) = 1;
SOURCE(20242, 40)
   {
      word pd302;
      pd302 = (* (( (ptr) (* (( (ptr) gf←c64940)+205)/* var←c60236 */  ))+88) );
      (void) ( *( (fPt) ((*  (ptr) pd302 ))))(ggData←v24496, var←c64908.f5/* fontData←v17108 */ , pd302);
      };
   }

static word NoName←Q5040(formal←c0633)
   word formal←c0633;
   {
SOURCE(19988, 166)
   {
      word pd303;
      pd303 = (* (( (ptr) formal←c0633)+6) );
      (* (( (ptr) formal←c0633)+7) ) = (word) ( *( (fPt) ((*  (ptr) pd303 ))))((* (( (ptr) formal←c0633)+5) ), (* (( (ptr) formal←c0633)+4)
          ), 1, 0, 0, 0
         , 1, 0, 1, 1, pd303);
      };
   return(0);
   }

static void ProcessDefaults←P2220(keyWord←v24612, ggData←v24640, optionStream←v24668, version←v24696)
   word keyWord←v24612;
   word ggData←v24640;
   word optionStream←v24668;
   word version←v24696;
   {
   register ptr gf←c64972 =  (ptr) &globalframe;
   word strokeJoint←v17152 = 0;
   word strokeEnd←v17180 = 0;
   /* ProcessDefaults: */ 
SOURCE(20287, 700)
SOURCE(20361, 70)
   {
      word pd304;
      pd304 = (* (( (ptr) (* (( (ptr) gf←c64972)+195)/* var←c59148 */  ))+16) );
      (* (( (ptr) (* (( (ptr) ggData←v24640)+30) ))+8) ) = (word) ( *( (fPt) ((*  (ptr) pd304 ))))(optionStream←v24668, version←v24696, pd304)
      ;
      };
SOURCE(20433, 72)
   {
      word pd305;
      pd305 = (* (( (ptr) (* (( (ptr) gf←c64972)+195)/* var←c59148 */  ))+16) );
      (* (( (ptr) (* (( (ptr) ggData←v24640)+30) ))+7) ) = (word) ( *( (fPt) ((*  (ptr) pd305 ))))(optionStream←v24668, version←v24696, pd305)
      ;
      };
SOURCE(20507, 62)
   {
      word pd306;
      pd306 = (* (( (ptr) (* (( (ptr) gf←c64972)+195)/* var←c59148 */  ))+27) );
      (*  (ptr) (* (( (ptr) ggData←v24640)+30) ) ) = (word) ( *( (fPt) ((*  (ptr) pd306 ))))(optionStream←v24668, pd306);
      };
SOURCE(20571, 46)
   {
      word pd307;
      pd307 = (* (( (ptr) (* (( (ptr) gf←c64972)+195)/* var←c59148 */  ))+8) );
      strokeJoint←v17152 = (word) ( *( (fPt) ((*  (ptr) pd307 ))))(optionStream←v24668, pd307);
      };
SOURCE(20619, 163)
   {
      word var←c61772;
      {
         word pd308;
         word pd309;
         pd308 = (* (( (ptr) (* (( (ptr) gf←c64972)+206)/* var←c60428 */  ))+8) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd308 ))))(strokeJoint←v17152, (* (( (ptr) gf←c64972)+55) ), 0, pd308))) {
            var←c61772 = 0;
            }
         else {
            pd309 = (* (( (ptr) (* (( (ptr) gf←c64972)+206)/* var←c60428 */  ))+8) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd309 ))))(strokeJoint←v17152, (* (( (ptr) gf←c64972)+56) ), 0, pd309))) {
               var←c61772 = 1;
               }
            else {
               var←c61772 = 2;
               };
            };
         };
      (* (( (ptr) (* (( (ptr) ggData←v24640)+30) ))+1) ) = var←c61772;
      };
SOURCE(20784, 44)
   {
      word pd310;
      pd310 = (* (( (ptr) (* (( (ptr) gf←c64972)+195)/* var←c59148 */  ))+8) );
      strokeEnd←v17180 = (word) ( *( (fPt) ((*  (ptr) pd310 ))))(optionStream←v24668, pd310);
      };
SOURCE(20830, 157)
   {
      word var←c61804;
      {
         word pd311;
         word pd312;
         pd311 = (* (( (ptr) (* (( (ptr) gf←c64972)+206)/* var←c60428 */  ))+8) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd311 ))))(strokeEnd←v17180, (* (( (ptr) gf←c64972)+57) ), 0, pd311))) {
            var←c61804 = 0;
            }
         else {
            pd312 = (* (( (ptr) (* (( (ptr) gf←c64972)+206)/* var←c60428 */  ))+8) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd312 ))))(strokeEnd←v17180, (* (( (ptr) gf←c64972)+58) ), 0, pd312))) {
               var←c61804 = 1;
               }
            else {
               var←c61804 = 2;
               };
            };
         };
      (* (( (ptr) (* (( (ptr) ggData←v24640)+30) ))+2) ) = var←c61804;
      };
   }

static void ProcessDashed←P2280(keyWord←v24756, ggData←v24784, optionStream←v24812, version←v24840)
   word keyWord←v24756;
   word ggData←v24784;
   word optionStream←v24812;
   word version←v24840;
   {
   register ptr gf←c65004 =  (ptr) &globalframe;
   word dashed←v17224;
   /* ProcessDashed: */ 
SOURCE(20992, 343)
SOURCE(21043, 41)
   {
      word pd313;
      pd313 = (* (( (ptr) (* (( (ptr) gf←c65004)+195)/* var←c59148 */  ))+24) );
      dashed←v17224 = (word) ( *( (fPt) ((*  (ptr) pd313 ))))(optionStream←v24812, pd313);
      };
SOURCE(21086, 31)
   (* (( (ptr) (* (( (ptr) ggData←v24784)+30) ))+3) ) = dashed←v17224;
SOURCE(21119, 216)
   if ((0 != (* (( (ptr) (* (( (ptr) ggData←v24784)+30) ))+3) ))) {
SOURCE(21152, 65)
      {
         word pd314;
         pd314 = (* (( (ptr) (* (( (ptr) gf←c65004)+195)/* var←c59148 */  ))+23) );
         (* (( (ptr) (* (( (ptr) ggData←v24784)+30) ))+4) ) = (word) ( *( (fPt) ((*  (ptr) pd314 ))))(optionStream←v24812, pd314);
         };
SOURCE(21219, 57)
      {
         word pd315;
         pd315 = (* (( (ptr) (* (( (ptr) gf←c65004)+195)/* var←c59148 */  ))+27) );
         (* (( (ptr) (* (( (ptr) ggData←v24784)+30) ))+5) ) = (word) ( *( (fPt) ((*  (ptr) pd315 ))))(optionStream←v24812, pd315);
         };
SOURCE(21278, 57)
      {
         word pd316;
         pd316 = (* (( (ptr) (* (( (ptr) gf←c65004)+195)/* var←c59148 */  ))+27) );
         (* (( (ptr) (* (( (ptr) ggData←v24784)+30) ))+6) ) = (word) ( *( (fPt) ((*  (ptr) pd316 ))))(optionStream←v24812, pd316);
         };
      };
   }

static void ProcessShadows←P2340(keyWord←v24900, ggData←v24928, optionStream←v24956, version←v24984)
   word keyWord←v24900;
   word ggData←v24928;
   word optionStream←v24956;
   word version←v24984;
   {
   register ptr gf←c65036 =  (ptr) &globalframe;
   word shadowed←v17268;
   /* ProcessShadows: */ 
SOURCE(21343, 477)
SOURCE(21397, 70)
   {
      word pd317;
      pd317 = (* (( (ptr) (* (( (ptr) gf←c65036)+195)/* var←c59148 */  ))+16) );
      (* (( (ptr) (* (( (ptr) ggData←v24928)+30) ))+10) ) = (word) ( *( (fPt) ((*  (ptr) pd317 ))))(optionStream←v24956, version←v24984, pd317)
      ;
      };
SOURCE(21469, 78)
   if (((* (( (ptr) (* (( (ptr) ggData←v24928)+30) ))+10) ) == 0)) {
SOURCE(21507, 40)
      (* (( (ptr) (* (( (ptr) ggData←v24928)+30) ))+10) ) = (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c65036)+211)/* var←c61836 */  ))+54)
       ) );
      };
SOURCE(21549, 43)
   {
      word pd318;
      pd318 = (* (( (ptr) (* (( (ptr) gf←c65036)+195)/* var←c59148 */  ))+24) );
      shadowed←v17268 = (word) ( *( (fPt) ((*  (ptr) pd318 ))))(optionStream←v24956, pd318);
      };
SOURCE(21594, 39)
   (* (( (ptr) (* (( (ptr) ggData←v24928)+30) ))+11) ) = shadowed←v17268;
SOURCE(21635, 185)
   if ((0 != (* (( (ptr) (* (( (ptr) ggData←v24928)+30) ))+11) ))) {
SOURCE(21674, 68)
      {
         word pd319;
         pd319 = (* (( (ptr) (* (( (ptr) gf←c65036)+195)/* var←c59148 */  ))+19) );
         (void) ( *( (fPt) ((*  (ptr) pd319 ))))((word) (( (bPt) (* (( (ptr) ggData←v24928)+30) ))+48), optionStream←v24956, pd319)
         ;
         };
SOURCE(21744, 76)
      {
         word pd320;
         pd320 = (* (( (ptr) (* (( (ptr) gf←c65036)+195)/* var←c59148 */  ))+16) );
         (* (( (ptr) (* (( (ptr) ggData←v24928)+30) ))+14) ) = (word) ( *( (fPt) ((*  (ptr) pd320 ))))(optionStream←v24956, version←v24984, pd320)
         ;
         };
      };
   }

static void ProcessActive←P2400(keyWord←v25044, ggData←v25072, optionStream←v25100, version←v25128)
   word keyWord←v25044;
   word ggData←v25072;
   word optionStream←v25100;
   word version←v25128;
   {
   register ptr gf←c65068 =  (ptr) &globalframe;
   word active←v17312;
   /* ProcessActive: */ 
SOURCE(21828, 127)
SOURCE(21879, 41)
   {
      word pd321;
      pd321 = (* (( (ptr) (* (( (ptr) gf←c65068)+195)/* var←c59148 */  ))+24) );
      active←v17312 = (word) ( *( (fPt) ((*  (ptr) pd321 ))))(optionStream←v25100, pd321);
      };
SOURCE(21922, 33)
   {
      word pd322;
      pd322 = (* (( (ptr) (* (( (ptr) gf←c65068)+205)/* var←c60236 */  ))+65) );
      (void) ( *( (fPt) ((*  (ptr) pd322 ))))(ggData←v25072, active←v17312, pd322);
      };
   }

static void ProcessBackgroundColor←P2460(keyWord←v25188, scene←v25216, optionStream←v25244, version←v25272)
   word keyWord←v25188;
   word scene←v25216;
   word optionStream←v25244;
   word version←v25272;
   {
   register ptr gf←c65100 =  (ptr) &globalframe;
   word color←v17356;
   /* ProcessBackgroundColor: */ 
SOURCE(21960, 156)
SOURCE(22010, 64)
   {
      word pd323;
      pd323 = (* (( (ptr) (* (( (ptr) gf←c65100)+195)/* var←c59148 */  ))+16) );
      color←v17356 = (word) ( *( (fPt) ((*  (ptr) pd323 ))))(optionStream←v25244, version←v25272, pd323);
      };
SOURCE(22076, 40)
   {
      word pd324;
      pd324 = (* (( (ptr) (* (( (ptr) gf←c65100)+200)/* var←c59532 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd324 ))))(scene←v25216, color←v17356, pd324);
      };
   }

static void SkipOptions←P2520(f←v9916)
   word f←v9916;
   {
   register ptr gf←c65132 =  (ptr) &globalframe;
   word keyWord←v17400 = 0;
   word option←v17428 = 0;
   word good←v17456;
   word nextChar←v17484;
   word twoCRsFound←v17512 = 0;
   /* SkipOptions: */ 
SOURCE(22122, 605)
SOURCE(22242, 485)
   lab←L100076: ;
   if ((0 == twoCRsFound←v17512)) {
      }
   else {
      goto lab←L100074;
      };
SOURCE(22263, 42)
   {
      W2 var←c61868;
      {
         word pd325;
         pd325 = (* (( (ptr) (* (( (ptr) gf←c65132)+195)/* var←c59148 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd325 ))))((word) &var←c61868, f←v9916, pd325);
         };
      good←v17456 = var←c61868.f1;
      keyWord←v17400 = var←c61868.f0;
      };
SOURCE(22307, 114)
   if ((0 == good←v17456)) {
SOURCE(22326, 25)
      {
         word pd326;
         pd326 = (* (( (ptr) (* (( (ptr) gf←c65132)+204)/* var←c60108 */  ))+19) );
         nextChar←v17484 = (word) ( *( (fPt) ((*  (ptr) pd326 ))))(f←v9916, pd326);
         };
SOURCE(22353, 68)
      if ((0 != (word) IsEndLine←P2880(nextChar←v17484))) {
SOURCE(22383, 18)
         {
            word var←c61900;
            word pd327;
            pd327 = (* (( (ptr) (* (( (ptr) gf←c65132)+204)/* var←c60108 */  ))+11) );
            var←c61900 = (word) ( *( (fPt) ((*  (ptr) pd327 ))))(f←v9916, pd327);
            };
SOURCE(22403, 18)
         twoCRsFound←v17512 = 1;
         };
SOURCE(22426, 4)
      goto lab←L100076;
      };
SOURCE(22433, 39)
   {
      word pd328;
      pd328 = (* (( (ptr) (* (( (ptr) gf←c65132)+195)/* var←c59148 */  ))+7) );
      good←v17456 = (word) ( *( (fPt) ((*  (ptr) pd328 ))))(f←v9916, pd328);
      };
SOURCE(22474, 114)
   if ((0 == good←v17456)) {
SOURCE(22493, 25)
      {
         word pd329;
         pd329 = (* (( (ptr) (* (( (ptr) gf←c65132)+204)/* var←c60108 */  ))+19) );
         nextChar←v17484 = (word) ( *( (fPt) ((*  (ptr) pd329 ))))(f←v9916, pd329);
         };
SOURCE(22520, 68)
      if ((0 != (word) IsEndLine←P2880(nextChar←v17484))) {
SOURCE(22550, 18)
         {
            word var←c61932;
            word pd330;
            pd330 = (* (( (ptr) (* (( (ptr) gf←c65132)+204)/* var←c60108 */  ))+11) );
            var←c61932 = (word) ( *( (fPt) ((*  (ptr) pd330 ))))(f←v9916, pd330);
            };
SOURCE(22570, 18)
         twoCRsFound←v17512 = 1;
         };
SOURCE(22593, 4)
      goto lab←L100076;
      };
SOURCE(22600, 30)
   {
      word pd331;
      pd331 = (* (( (ptr) (* (( (ptr) gf←c65132)+195)/* var←c59148 */  ))+11) );
      option←v17428 = (word) ( *( (fPt) ((*  (ptr) pd331 ))))(f←v9916, pd331);
      };
SOURCE(22632, 25)
   {
      word pd332;
      pd332 = (* (( (ptr) (* (( (ptr) gf←c65132)+204)/* var←c60108 */  ))+19) );
      nextChar←v17484 = (word) ( *( (fPt) ((*  (ptr) pd332 ))))(f←v9916, pd332);
      };
SOURCE(22659, 68)
   if ((0 != (word) IsEndLine←P2880(nextChar←v17484))) {
SOURCE(22689, 18)
      {
         word var←c61964;
         word pd333;
         pd333 = (* (( (ptr) (* (( (ptr) gf←c65132)+204)/* var←c60108 */  ))+11) );
         var←c61964 = (word) ( *( (fPt) ((*  (ptr) pd333 ))))(f←v9916, pd333);
         };
SOURCE(22709, 18)
      twoCRsFound←v17512 = 1;
      };
   goto lab←L100076;
   lab←L100074: ;
   }

static word FileinEntity←P2580(f←v9976, version←v10004, router←v10032, camera←v10060)
   word f←v9976;
   word version←v10004;
   word router←v10032;
   word camera←v10060;
   {
   register ptr gf←c65164 =  (ptr) &globalframe;
   word entity←v10104;
   word nextWord←v17556 = 0;
   /* FileinEntity: */ 
SOURCE(22745, 879)
SOURCE(22745, 879)
   entity←v10104 = 0;
SOURCE(22878, 746)
   {
      word x334;
      word x336;
      if (((
         x334 = version←v10004,  *(float*)&x334
         ) > (
         x336 = (*  (ptr) &fc335 ),  *(float*)&x336
         ))) {
SOURCE(22906, 391)
         {
            word x337;
            word x339;
            if (((
               x337 = version←v10004,  *(float*)&x337
               ) >= (
               x339 = (*  (ptr) &fc338 ),  *(float*)&x339
               ))) {
SOURCE(22935, 59)
               {
                  word pd340;
                  pd340 = (* (( (ptr) (* (( (ptr) gf←c65164)+212)/* var←c61996 */  ))+70) );
                  entity←v10104 = (word) ( *( (fPt) ((*  (ptr) pd340 ))))(f←v9976, version←v10004, router←v10032, camera←v10060, 0, pd340);
                  };
               }
            else {
SOURCE(23005, 32)
               {
                  word pd341;
                  pd341 = (* (( (ptr) (* (( (ptr) gf←c65164)+195)/* var←c59148 */  ))+8) );
                  nextWord←v17556 = (word) ( *( (fPt) ((*  (ptr) pd341 ))))(f←v9976, pd341);
                  };
               {
                  word pd342;
                  pd342 = (* (( (ptr) (* (( (ptr) gf←c65164)+206)/* var←c60428 */  ))+8) );
                  if ((0 != (word) ( *( (fPt) ((*  (ptr) pd342 ))))(nextWord←v17556, (* (( (ptr) gf←c65164)+59) ), 1, pd342))) {
SOURCE(23092, 108)
                     {
                        word class←v17600;
SOURCE(23094, 53)
                        {
                           word pd343;
                           pd343 = (* (( (ptr) (* (( (ptr) gf←c65164)+213)/* var←c62028 */  ))+7) );
                           class←v17600 = (word) ( *( (fPt) ((*  (ptr) pd343 ))))((* ((( (ptr) gf←c65164)+60)) ), pd343);
                           };
SOURCE(23149, 49)
                        {
                           word pd344;
                           pd344 = (* (( (ptr) class←v17600)+20) );
                           entity←v10104 = (word) ( *( (fPt) ((*  (ptr) pd344 ))))(f←v9976, version←v10004, router←v10032, camera←v10060, pd344);
                           };
                        };
                     }
                  else {
                     {
                        word pd345;
                        pd345 = (* (( (ptr) (* (( (ptr) gf←c65164)+206)/* var←c60428 */  ))+8) );
                        if ((0 != (word) ( *( (fPt) ((*  (ptr) pd345 ))))(nextWord←v17556, (* (( (ptr) gf←c65164)+61) ), 1, pd345))) {
SOURCE(23238, 59)
                           {
/*1*/   word pd346;
/*1*/   pd346 = (* (( (ptr) (* (( (ptr) gf←c65164)+212)/* var←c61996 */  ))+70) );
/*1*/   entity←v10104 = (word) ( *( (fPt) ((*  (ptr) pd346 ))))(f←v9976, version←v10004, router←v10032, camera←v10060, 0, pd346);
/*1*/   };
                           }
                        else {
SOURCE(23313, 6)
                           (void) XR←RaiseUnnamedError();
                           };
                        };
                     };
                  };
               };
            };
         }
      else {
SOURCE(23330, 32)
         {
            word pd347;
            pd347 = (* (( (ptr) (* (( (ptr) gf←c65164)+195)/* var←c59148 */  ))+8) );
            nextWord←v17556 = (word) ( *( (fPt) ((*  (ptr) pd347 ))))(f←v9976, pd347);
            };
         {
            word pd348;
            pd348 = (* (( (ptr) (* (( (ptr) gf←c65164)+206)/* var←c60428 */  ))+8) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd348 ))))(nextWord←v17556, (* (( (ptr) gf←c65164)+59) ), 1, pd348))) {
SOURCE(23417, 108)
               {
                  word class←v17644;
SOURCE(23419, 53)
                  {
                     word pd349;
                     pd349 = (* (( (ptr) (* (( (ptr) gf←c65164)+213)/* var←c62028 */  ))+7) );
                     class←v17644 = (word) ( *( (fPt) ((*  (ptr) pd349 ))))((* ((( (ptr) gf←c65164)+60)) ), pd349);
                     };
SOURCE(23474, 49)
                  {
                     word pd350;
                     pd350 = (* (( (ptr) class←v17644)+20) );
                     entity←v10104 = (word) ( *( (fPt) ((*  (ptr) pd350 ))))(f←v9976, version←v10004, router←v10032, camera←v10060, pd350);
                     };
                  };
               }
            else {
               {
                  word pd351;
                  pd351 = (* (( (ptr) (* (( (ptr) gf←c65164)+206)/* var←c60428 */  ))+8) );
                  if ((0 != (word) ( *( (fPt) ((*  (ptr) pd351 ))))(nextWord←v17556, (* (( (ptr) gf←c65164)+62) ), 1, pd351))) {
SOURCE(23565, 59)
                     {
                        word pd352;
                        pd352 = (* (( (ptr) (* (( (ptr) gf←c65164)+212)/* var←c61996 */  ))+70) );
                        entity←v10104 = (word) ( *( (fPt) ((*  (ptr) pd352 ))))(f←v9976, version←v10004, router←v10032, camera←v10060, 0, pd352);
                        };
                     }
                  else {
SOURCE(23640, 5)
                     (void) XR←RaiseUnnamedError();
                     };
                  };
               };
            };
         };
      };
SOURCE(22745, 879)
   return(entity←v10104);
   }

static void FileoutSceneAndOptions←P2640(formal←c0693, ggData←v10192, fileName←v10220, scene←v10248)
   word formal←c0693;
   word ggData←v10192;
   word fileName←v10220;
   word scene←v10248;
   {
   W7 var←c65196;
   /* declaration of f←v10164 skipped */ 
   register ptr gf←c65228 =  (ptr) &globalframe;
   /* declaration of var←c62060 skipped */ 
   word sceneOut←v17688;
   word sliceCount←v17716;
   var←c65196.f4/* f←v10164 */  = formal←c0693;
   /* FileoutSceneAndOptions: */ 
SOURCE(23654, 701)
   {
      word tmpAddr353;
      tmpAddr353 = (word) (( (ptr) &var←c65196)+5)/* var←c62060 */ ;
      (*  (ptr) tmpAddr353 ) = ( ((word)  (fPt) DoFileOut←P4464) );
      (* (( (ptr) tmpAddr353) + 1) ) = 1;
      };
SOURCE(23766, 59)
   sceneOut←v17688 =  ( (scene←v10248 != 0) ? scene←v10248 : (* (( (ptr) ggData←v10192)+11) ) ) ;
SOURCE(23827, 54)
   {
      word pd354;
      word idx355;
      pd354 = (* (( (ptr) (* (( (ptr) gf←c65228)+200)/* var←c59532 */  ))+35) );
      sliceCount←v17716 = (
         idx355 = (word) ( *( (fPt) ((*  (ptr) pd354 ))))(sceneOut←v17688, 0, 0, pd354),
         SGNCK(idx355)
         );
      };
SOURCE(24037, 58)
   {
      W2 var←c62092;
      var←c62092.f0 = 11;
      var←c62092.f1 = fileName←v10220;
      {
         word pd356;
         pd356 = (* (( (ptr) (* (( (ptr) gf←c65228)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd356 ))))(var←c65196.f4/* f←v10164 */ , (* (( (ptr) gf←c65228)+63) ), var←c62092, pd356);
         };
      };
SOURCE(24097, 68)
   {
      W2 var←c62124;
      var←c62124.f0 = 11;
      var←c62124.f1 = (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c65228)+197)/* var←c59340 */  ))+5) ) );
      {
         word pd357;
         pd357 = (* (( (ptr) (* (( (ptr) gf←c65228)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd357 ))))(var←c65196.f4/* f←v10164 */ , (* (( (ptr) gf←c65228)+64) ), var←c62124, pd357);
         };
      };
SOURCE(24167, 25)
   (void) FileoutOptions←P2820(var←c65196.f4/* f←v10164 */ , ggData←v10192);
SOURCE(24194, 35)
   (void) FileoutSceneFields←P2760(var←c65196.f4/* f←v10164 */ , (* (( (ptr) ggData←v10192)+11) ));
SOURCE(24231, 16)
   {
      word pd358;
      pd358 = (* (( (ptr) (* (( (ptr) gf←c65228)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd358 ))))(var←c65196.f4/* f←v10164 */ , 10, pd358);
      };
SOURCE(24249, 53)
   {
      W2 var←c62156;
      var←c62156.f0 = 5;
      var←c62156.f1 = sliceCount←v17716;
      {
         word pd359;
         pd359 = (* (( (ptr) (* (( (ptr) gf←c65228)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd359 ))))(var←c65196.f4/* f←v10164 */ , (* (( (ptr) gf←c65228)+65) ), var←c62156, pd359);
         };
      };
SOURCE(24304, 51)
   {
      word var←c62188;
      word pd360;
      pd360 = (* (( (ptr) (* (( (ptr) gf←c65228)+200)/* var←c59532 */  ))+31) );
      var←c62188 = (word) ( *( (fPt) ((*  (ptr) pd360 ))))(sceneOut←v17688, 0, (word) (( (bPt) &var←c65196)+20)/* var←c62060 */ , 0, pd360)
      ;
      };
   }

static word DoFileOut←P4464(slice←v17820, formal←c65292)
   word slice←v17820;
   word formal←c65292;
   {
   register ptr gf←c65260 =  (ptr) &globalframe;
   word done←v17864;
   formal←c65292 = (formal←c65292 - 20);
   /* DoFileOut: */ 
SOURCE(23883, 149)
SOURCE(23883, 149)
   done←v17864 = 0;
SOURCE(23947, 16)
   {
      word pd361;
      pd361 = (* (( (ptr) (* (( (ptr) gf←c65260)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd361 ))))((* (( (ptr) formal←c65292)+4) ), 10, pd361);
      };
SOURCE(23999, 33)
   {
      word pd362;
      pd362 = (* (( (ptr) (* (( (ptr) gf←c65260)+212)/* var←c61996 */  ))+69) );
      (void) ( *( (fPt) ((*  (ptr) pd362 ))))((* (( (ptr) formal←c65292)+4) ), slice←v17820, pd362);
      };
SOURCE(23883, 149)
   return(done←v17864);
   }

static void FileoutSceneOnly←P2700(formal←c0694, scene←v10336, fileName←v10364)
   word formal←c0694;
   word scene←v10336;
   word fileName←v10364;
   {
   W7 var←c65324;
   /* declaration of f←v10308 skipped */ 
   register ptr gf←c65356 =  (ptr) &globalframe;
   /* declaration of var←c62220 skipped */ 
   word sliceCount←v17892;
   var←c65324.f4/* f←v10308 */  = formal←c0694;
   /* FileoutSceneOnly: */ 
SOURCE(24361, 538)
   {
      word tmpAddr363;
      tmpAddr363 = (word) (( (ptr) &var←c65324)+5)/* var←c62220 */ ;
      (*  (ptr) tmpAddr363 ) = ( ((word)  (fPt) DoFileOut←P4524) );
      (* (( (ptr) tmpAddr363) + 1) ) = 1;
      };
SOURCE(24445, 51)
   {
      word pd364;
      word idx365;
      pd364 = (* (( (ptr) (* (( (ptr) gf←c65356)+200)/* var←c59532 */  ))+35) );
      sliceCount←v17892 = (
         idx365 = (word) ( *( (fPt) ((*  (ptr) pd364 ))))(scene←v10336, 0, 0, pd364),
         SGNCK(idx365)
         );
      };
SOURCE(24618, 58)
   {
      W2 var←c62252;
      var←c62252.f0 = 11;
      var←c62252.f1 = fileName←v10364;
      {
         word pd366;
         pd366 = (* (( (ptr) (* (( (ptr) gf←c65356)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd366 ))))(var←c65324.f4/* f←v10308 */ , (* (( (ptr) gf←c65356)+63) ), var←c62252, pd366);
         };
      };
SOURCE(24678, 68)
   {
      W2 var←c62284;
      var←c62284.f0 = 11;
      var←c62284.f1 = (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c65356)+197)/* var←c59340 */  ))+5) ) );
      {
         word pd367;
         pd367 = (* (( (ptr) (* (( (ptr) gf←c65356)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd367 ))))(var←c65324.f4/* f←v10308 */ , (* (( (ptr) gf←c65356)+64) ), var←c62284, pd367);
         };
      };
SOURCE(24748, 28)
   (void) FileoutSceneFields←P2760(var←c65324.f4/* f←v10308 */ , scene←v10336);
SOURCE(24778, 16)
   {
      word pd368;
      pd368 = (* (( (ptr) (* (( (ptr) gf←c65356)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd368 ))))(var←c65324.f4/* f←v10308 */ , 10, pd368);
      };
SOURCE(24796, 53)
   {
      W2 var←c62316;
      var←c62316.f0 = 5;
      var←c62316.f1 = sliceCount←v17892;
      {
         word pd369;
         pd369 = (* (( (ptr) (* (( (ptr) gf←c65356)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd369 ))))(var←c65324.f4/* f←v10308 */ , (* (( (ptr) gf←c65356)+65) ), var←c62316, pd369);
         };
      };
SOURCE(24851, 48)
   {
      word var←c62348;
      word pd370;
      pd370 = (* (( (ptr) (* (( (ptr) gf←c65356)+200)/* var←c59532 */  ))+31) );
      var←c62348 = (word) ( *( (fPt) ((*  (ptr) pd370 ))))(scene←v10336, 0, (word) (( (bPt) &var←c65324)+20)/* var←c62220 */ , 0, pd370)
      ;
      };
   }

static word DoFileOut←P4524(slice←v17996, formal←c65420)
   word slice←v17996;
   word formal←c65420;
   {
   register ptr gf←c65388 =  (ptr) &globalframe;
   word done←v18040;
   formal←c65420 = (formal←c65420 - 20);
   /* DoFileOut: */ 
SOURCE(24498, 115)
SOURCE(24498, 115)
   done←v18040 = 0;
SOURCE(24562, 16)
   {
      word pd371;
      pd371 = (* (( (ptr) (* (( (ptr) gf←c65388)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd371 ))))((* (( (ptr) formal←c65420)+4) ), 10, pd371);
      };
SOURCE(24580, 33)
   {
      word pd372;
      pd372 = (* (( (ptr) (* (( (ptr) gf←c65388)+212)/* var←c61996 */  ))+69) );
      (void) ( *( (fPt) ((*  (ptr) pd372 ))))((* (( (ptr) formal←c65420)+4) ), slice←v17996, pd372);
      };
SOURCE(24498, 115)
   return(done←v18040);
   }

static void FileoutSceneFields←P2760(f←v10424, scene←v10452)
   word f←v10424;
   word scene←v10452;
   {
   register ptr gf←c65452 =  (ptr) &globalframe;
   /* FileoutSceneFields: */ 
SOURCE(24905, 167)
SOURCE(24963, 30)
   {
      word pd373;
      pd373 = (* (( (ptr) (* (( (ptr) gf←c65452)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd373 ))))(f←v10424, (* (( (ptr) gf←c65452)+66) ), 0, 2147483647, pd373);
      };
SOURCE(24995, 59)
   {
      word var←c62380;
      {
         word pd374;
         pd374 = (* (( (ptr) (* (( (ptr) gf←c65452)+200)/* var←c59532 */  ))+17) );
         var←c62380 = (word) ( *( (fPt) ((*  (ptr) pd374 ))))(scene←v10452, pd374);
         };
      {
         word pd375;
         pd375 = (* (( (ptr) (* (( (ptr) gf←c65452)+214)/* var←c62412 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd375 ))))(f←v10424, var←c62380, pd375);
         };
      };
SOURCE(25056, 16)
   {
      word pd376;
      pd376 = (* (( (ptr) (* (( (ptr) gf←c65452)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd376 ))))(f←v10424, 10, pd376);
      };
   }

static void FileoutOptions←P2820(f←v10512, ggData←v10540)
   word f←v10512;
   word ggData←v10540;
   {
   register ptr gf←c65484 =  (ptr) &globalframe;
   word values←v18068 = 0;
   word on←v18096 = 0;
   word names←v18124 = 0;
   word defaults←v18152 = 0;
   word anchor←v18180 = 0;
   /* FileoutOptions: */ 
SOURCE(25078, 3339)
SOURCE(25238, 28)
   {
      word pd377;
      pd377 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd377 ))))(f←v10512, (* (( (ptr) gf←c65484)+67) ), 0, 2147483647, pd377);
      };
SOURCE(25268, 74)
   {
      word var←c62444;
      {
         word pd378;
         pd378 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+10) );
         var←c62444 = (word) ( *( (fPt) ((*  (ptr) pd378 ))))(ggData←v10540, pd378);
         };
      {
         word pd379;
         pd379 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd379 ))))(f←v10512, var←c62444, pd379);
         };
      };
SOURCE(25344, 16)
   {
      word pd380;
      pd380 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd380 ))))(f←v10512, 10, pd380);
      };
SOURCE(25362, 22)
   {
      word pd381;
      pd381 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd381 ))))(f←v10512, (* (( (ptr) gf←c65484)+68) ), 0, 2147483647, pd381);
      };
SOURCE(25386, 64)
   {
      word pd382;
      pd382 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd382 ))))(f←v10512, (*  (ptr) (* (( (ptr) (* (( (ptr) ggData←v10540)+29) ))+7) ) ), pd382);
      };
SOURCE(25452, 16)
   {
      word pd383;
      pd383 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd383 ))))(f←v10512, 10, pd383);
      };
SOURCE(25470, 20)
   {
      word pd384;
      pd384 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd384 ))))(f←v10512, (* (( (ptr) gf←c65484)+69) ), 0, 2147483647, pd384);
      };
SOURCE(25492, 49)
   {
      W2 var←c62476;
      {
         word pd385;
         pd385 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+29) );
         (void) ( *( (fPt) ((*  (ptr) pd385 ))))((word) &var←c62476, ggData←v10540, pd385);
         };
      on←v18096 = var←c62476.f1;
      values←v18068 = var←c62476.f0;
      };
SOURCE(25543, 54)
   {
      word pd386;
      pd386 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd386 ))))(f←v10512, 0, values←v18068, on←v18096, pd386);
      };
SOURCE(25599, 16)
   {
      word pd387;
      pd387 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd387 ))))(f←v10512, 10, pd387);
      };
SOURCE(25617, 20)
   {
      word pd388;
      pd388 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd388 ))))(f←v10512, (* (( (ptr) gf←c65484)+70) ), 0, 2147483647, pd388);
      };
SOURCE(25639, 49)
   {
      W2 var←c62508;
      {
         word pd389;
         pd389 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+33) );
         (void) ( *( (fPt) ((*  (ptr) pd389 ))))((word) &var←c62508, ggData←v10540, pd389);
         };
      on←v18096 = var←c62508.f1;
      values←v18068 = var←c62508.f0;
      };
SOURCE(25690, 54)
   {
      word pd390;
      pd390 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd390 ))))(f←v10512, 0, values←v18068, on←v18096, pd390);
      };
SOURCE(25746, 16)
   {
      word pd391;
      pd391 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd391 ))))(f←v10512, 10, pd391);
      };
SOURCE(25764, 21)
   {
      word pd392;
      pd392 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd392 ))))(f←v10512, (* (( (ptr) gf←c65484)+71) ), 0, 2147483647, pd392);
      };
SOURCE(25787, 57)
   {
      W3 var←c62540;
      {
         word pd393;
         pd393 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+40) );
         (void) ( *( (fPt) ((*  (ptr) pd393 ))))((word) &var←c62540, ggData←v10540, pd393);
         };
      on←v18096 = var←c62540.f2;
      values←v18068 = var←c62540.f1;
      names←v18124 = var←c62540.f0;
      };
SOURCE(25846, 56)
   {
      word pd394;
      pd394 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd394 ))))(f←v10512, names←v18124, values←v18068, on←v18096, pd394);
      };
SOURCE(25904, 16)
   {
      word pd395;
      pd395 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd395 ))))(f←v10512, 10, pd395);
      };
SOURCE(25922, 27)
   {
      word pd396;
      pd396 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd396 ))))(f←v10512, (* (( (ptr) gf←c65484)+72) ), 0, 2147483647, pd396);
      };
SOURCE(25951, 63)
   {
      W3 var←c62572;
      {
         word pd397;
         pd397 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+49) );
         (void) ( *( (fPt) ((*  (ptr) pd397 ))))((word) &var←c62572, ggData←v10540, pd397);
         };
      on←v18096 = var←c62572.f2;
      values←v18068 = var←c62572.f1;
      names←v18124 = var←c62572.f0;
      };
SOURCE(26016, 56)
   {
      word pd398;
      pd398 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+17) );
      (void) ( *( (fPt) ((*  (ptr) pd398 ))))(f←v10512, names←v18124, values←v18068, on←v18096, pd398);
      };
SOURCE(26074, 26)
   {
      word pd399;
      pd399 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd399 ))))(f←v10512, (* (( (ptr) gf←c65484)+73) ), 0, 2147483647, pd399);
      };
SOURCE(26102, 53)
   {
      word var←c62604;
      {
         word pd400;
         pd400 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+56) );
         var←c62604 = (word) ( *( (fPt) ((*  (ptr) pd400 ))))(ggData←v10540, pd400);
         };
      {
         word pd401;
         pd401 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd401 ))))(f←v10512, var←c62604, pd401);
         };
      };
SOURCE(26157, 27)
   {
      word pd402;
      pd402 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd402 ))))(f←v10512, (* (( (ptr) gf←c65484)+74) ), 0, 2147483647, pd402);
      };
SOURCE(26186, 54)
   {
      word var←c62636;
      {
         word pd403;
         pd403 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+96) );
         var←c62636 = (word) ( *( (fPt) ((*  (ptr) pd403 ))))(ggData←v10540, pd403);
         };
      {
         word pd404;
         pd404 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd404 ))))(f←v10512, var←c62636, pd404);
         };
      };
SOURCE(26242, 31)
   {
      word pd405;
      pd405 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd405 ))))(f←v10512, (* (( (ptr) gf←c65484)+75) ), 0, 2147483647, pd405);
      };
SOURCE(26275, 58)
   {
      word var←c62668;
      {
         word pd406;
         pd406 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+58) );
         var←c62668 = (word) ( *( (fPt) ((*  (ptr) pd406 ))))(ggData←v10540, pd406);
         };
      {
         word pd407;
         pd407 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd407 ))))(f←v10512, var←c62668, pd407);
         };
      };
SOURCE(26335, 65)
   {
      word var←c62700;
      {
         word pd408;
         pd408 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+98) );
         var←c62700 = (word) ( *( (fPt) ((*  (ptr) pd408 ))))(ggData←v10540, pd408);
         };
      {
         W2 var←c62732;
         var←c62732.f0 = 8;
         var←c62732.f1 = var←c62700;
         {
            word pd409;
            pd409 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
            (void) ( *( (fPt) ((*  (ptr) pd409 ))))(f←v10512, (* (( (ptr) gf←c65484)+76) ), var←c62732, pd409);
            };
         };
      };
SOURCE(26402, 104)
   {
      word var←c62764;
      {
         word var←c62796;
         {
            word pd410;
            pd410 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+72) );
            var←c62796 = (word) ( *( (fPt) ((*  (ptr) pd410 ))))(ggData←v10540, pd410);
            };
         {
            word pd411;
            pd411 = (* (( (ptr) (* (( (ptr) gf←c65484)+198)/* var←c59468 */  ))+8) );
            var←c62764 = (word) ( *( (fPt) ((*  (ptr) pd411 ))))(var←c62796, pd411);
            };
         };
      {
         W2 var←c62828;
         var←c62828.f0 = 11;
         var←c62828.f1 = var←c62764;
         {
            word pd412;
            pd412 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
            (void) ( *( (fPt) ((*  (ptr) pd412 ))))(f←v10512, (* (( (ptr) gf←c65484)+77) ), var←c62828, pd412);
            };
         };
      };
SOURCE(26508, 24)
   {
      word pd413;
      pd413 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd413 ))))(f←v10512, (* (( (ptr) gf←c65484)+78) ), 0, 2147483647, pd413);
      };
SOURCE(26534, 51)
   {
      word var←c62860;
      {
         word pd414;
         pd414 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+89) );
         var←c62860 = (word) ( *( (fPt) ((*  (ptr) pd414 ))))(ggData←v10540, pd414);
         };
      {
         word pd415;
         pd415 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd415 ))))(f←v10512, var←c62860, pd415);
         };
      };
SOURCE(26587, 73)
   {
      word var←c62892;
      {
         word pd416;
         pd416 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+91) );
         var←c62892 = (word) ( *( (fPt) ((*  (ptr) pd416 ))))(ggData←v10540, pd416);
         };
      {
         W2 var←c62924;
         var←c62924.f0 = 8;
         var←c62924.f1 = var←c62892;
         {
            word pd417;
            pd417 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
            (void) ( *( (fPt) ((*  (ptr) pd417 ))))(f←v10512, (* (( (ptr) gf←c65484)+79) ), var←c62924, pd417);
            };
         };
      };
SOURCE(26662, 101)
   {
      word var←c62956;
      {
         word var←c62988;
         {
            word pd418;
            pd418 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+93) );
            var←c62988 = (word) ( *( (fPt) ((*  (ptr) pd418 ))))(ggData←v10540, pd418);
            };
         {
            word pd419;
            pd419 = (* (( (ptr) (* (( (ptr) gf←c65484)+198)/* var←c59468 */  ))+6) );
            var←c62956 = (word) ( *( (fPt) ((*  (ptr) pd419 ))))(var←c62988, pd419);
            };
         };
      {
         W2 var←c63020;
         var←c63020.f0 = 11;
         var←c63020.f1 = var←c62956;
         {
            word pd420;
            pd420 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
            (void) ( *( (fPt) ((*  (ptr) pd420 ))))(f←v10512, (* (( (ptr) gf←c65484)+80) ), var←c63020, pd420);
            };
         };
      };
SOURCE(26765, 38)
   {
      word pd421;
      pd421 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+70) );
      defaults←v18152 = (word) ( *( (fPt) ((*  (ptr) pd421 ))))(ggData←v10540, pd421);
      };
SOURCE(26805, 61)
   {
      W2 var←c63052;
      var←c63052.f0 = 11;
      var←c63052.f1 = (*  (ptr) (* (( (ptr) defaults←v18152)+9) ) );
      {
         word pd422;
         pd422 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd422 ))))(f←v10512, (* (( (ptr) gf←c65484)+81) ), var←c63052, pd422);
         };
      };
SOURCE(26868, 69)
   {
      word pd423;
      pd423 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd423 ))))(f←v10512, (* (( (ptr) (* (( (ptr) defaults←v18152)+9) ))+5) ), pd423);
      };
SOURCE(26939, 85)
   {
      W2 var←c63084;
      W2 var←c63116;
      W2 var←c0659;
      var←c63084.f0 = 8;
      var←c63084.f1 = (* (( (ptr) (* (( (ptr) defaults←v18152)+9) ))+7) );
      var←c63116.f0 = 8;
      var←c63116.f1 = (* (( (ptr) (* (( (ptr) defaults←v18152)+9) ))+8) );
      (*  (ptr) (word) &var←c0659 ) = 0;
      (* (( (ptr) (word) &var←c0659) + 1) ) = 0;
      {
         word pd424;
         pd424 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+60) );
         (void) ( *( (fPt) ((*  (ptr) pd424 ))))(f←v10512, (* (( (ptr) gf←c65484)+82) ), var←c63084, var←c63116, var←c0659, pd424)
         ;
         };
      };
SOURCE(27026, 25)
   {
      word pd425;
      pd425 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd425 ))))(f←v10512, (* (( (ptr) gf←c65484)+83) ), 0, 2147483647, pd425);
      };
SOURCE(27053, 44)
   {
      word pd426;
      pd426 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd426 ))))(f←v10512, (* (( (ptr) defaults←v18152)+8) ), pd426);
      };
SOURCE(27099, 13)
   {
      word pd427;
      pd427 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd427 ))))(f←v10512, 32, pd427);
      };
SOURCE(27129, 46)
   {
      word pd428;
      pd428 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd428 ))))(f←v10512, (* (( (ptr) defaults←v18152)+7) ), pd428);
      };
SOURCE(27177, 45)
   {
      W2 var←c63180;
      var←c63180.f0 = 8;
      var←c63180.f1 = (*  (ptr) defaults←v18152 );
      {
         word pd429;
         pd429 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd429 ))))(f←v10512, (* (( (ptr) gf←c65484)+84) ), var←c63180, pd429);
         };
      };
SOURCE(27224, 113)
   {
      W2 var←c63212;
      var←c63212.f0 = 11;
      {
         word var←c63244;
         var←c63244 = (* (( (ptr) defaults←v18152)+1) );
         if ((var←c63244 == 1)) {
            var←c63212.f1 = (* (( (ptr) gf←c65484)+56) );
            }
         else {
            if ((var←c63244 == 0)) {
               var←c63212.f1 = (* (( (ptr) gf←c65484)+55) );
               }
            else {
               var←c63212.f1 = (* (( (ptr) gf←c65484)+85) );
               };
            };
         };
      {
         word pd430;
         pd430 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd430 ))))(f←v10512, (* (( (ptr) gf←c65484)+84) ), var←c63212, pd430);
         };
      };
SOURCE(27339, 111)
   {
      W2 var←c63276;
      var←c63276.f0 = 11;
      {
         word var←c63308;
         var←c63308 = (* (( (ptr) defaults←v18152)+2) );
         if ((var←c63308 == 0)) {
            var←c63276.f1 = (* (( (ptr) gf←c65484)+57) );
            }
         else {
            if ((var←c63308 == 1)) {
               var←c63276.f1 = (* (( (ptr) gf←c65484)+58) );
               }
            else {
               var←c63276.f1 = (* (( (ptr) gf←c65484)+85) );
               };
            };
         };
      {
         word pd431;
         pd431 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd431 ))))(f←v10512, (* (( (ptr) gf←c65484)+84) ), var←c63276, pd431);
         };
      };
SOURCE(27452, 23)
   {
      word pd432;
      pd432 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd432 ))))(f←v10512, (* (( (ptr) gf←c65484)+86) ), 0, 2147483647, pd432);
      };
SOURCE(27477, 40)
   {
      word pd433;
      pd433 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd433 ))))(f←v10512, (* (( (ptr) defaults←v18152)+3) ), pd433);
      };
SOURCE(27519, 173)
   if ((0 != (* (( (ptr) defaults←v18152)+3) ))) {
SOURCE(27545, 13)
      {
         word pd434;
         pd434 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd434 ))))(f←v10512, 32, pd434);
         };
SOURCE(27575, 48)
      {
         word pd435;
         pd435 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd435 ))))(f←v10512, (* (( (ptr) defaults←v18152)+4) ), pd435);
         };
SOURCE(27625, 67)
      {
         W2 var←c63340;
         W2 var←c63372;
         W2 var←c0660;
         var←c63340.f0 = 8;
         var←c63340.f1 = (* (( (ptr) defaults←v18152)+5) );
         var←c63372.f0 = 8;
         var←c63372.f1 = (* (( (ptr) defaults←v18152)+6) );
         (*  (ptr) (word) &var←c0660 ) = 0;
         (* (( (ptr) (word) &var←c0660) + 1) ) = 0;
         {
            word pd436;
            pd436 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+60) );
            (void) ( *( (fPt) ((*  (ptr) pd436 ))))(f←v10512, (* (( (ptr) gf←c65484)+82) ), var←c63340, var←c63372, var←c0660, pd436)
            ;
            };
         };
      };
SOURCE(27697, 13)
   {
      word pd437;
      pd437 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd437 ))))(f←v10512, 32, pd437);
      };
SOURCE(27727, 24)
   {
      word pd438;
      pd438 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd438 ))))(f←v10512, (* (( (ptr) gf←c65484)+87) ), 0, 2147483647, pd438);
      };
SOURCE(27753, 44)
   {
      word pd439;
      pd439 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd439 ))))(f←v10512, (* (( (ptr) defaults←v18152)+10) ), pd439);
      };
SOURCE(27799, 46)
   {
      word pd440;
      pd440 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd440 ))))(f←v10512, (* (( (ptr) defaults←v18152)+11) ), pd440);
      };
SOURCE(27847, 165)
   if ((0 != (* (( (ptr) defaults←v18152)+11) ))) {
SOURCE(27879, 13)
      {
         word pd441;
         pd441 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd441 ))))(f←v10512, 32, pd441);
         };
SOURCE(27909, 51)
      {
         word pd442;
         pd442 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd442 ))))(f←v10512, (*  (W2Pt) (( (ptr) defaults←v18152)+12) ), pd442);
         };
SOURCE(27962, 50)
      {
         word pd443;
         pd443 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd443 ))))(f←v10512, (* (( (ptr) defaults←v18152)+14) ), pd443);
         };
      };
SOURCE(28017, 34)
   {
      word pd444;
      pd444 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+9) );
      anchor←v18180 = (word) ( *( (fPt) ((*  (ptr) pd444 ))))(ggData←v10540, pd444);
      };
SOURCE(28053, 23)
   {
      word pd445;
      pd445 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd445 ))))(f←v10512, (* (( (ptr) gf←c65484)+88) ), 0, 2147483647, pd445);
      };
SOURCE(28078, 68)
   {
      word pd446;
      pd446 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd446 ))))(f←v10512,  ( (anchor←v18180 == 0) ? 0 : (*  (ptr) anchor←v18180 ) ) , pd446);
      };
SOURCE(28148, 92)
   if ((0 != (*  (ptr) anchor←v18180 ))) {
SOURCE(28172, 13)
      {
         word pd447;
         pd447 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd447 ))))(f←v10512, 32, pd447);
         };
SOURCE(28202, 38)
      {
         word pd448;
         pd448 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd448 ))))(f←v10512, (*  (W2Pt) (( (ptr) anchor←v18180)+1) ), pd448);
         };
      };
SOURCE(28245, 24)
   {
      word pd449;
      pd449 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd449 ))))(f←v10512, (* (( (ptr) gf←c65484)+89) ), 0, 2147483647, pd449);
      };
SOURCE(28271, 51)
   {
      word var←c63436;
      {
         word pd450;
         pd450 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+68) );
         var←c63436 = (word) ( *( (fPt) ((*  (ptr) pd450 ))))(ggData←v10540, pd450);
         };
      {
         word pd451;
         pd451 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd451 ))))(f←v10512, var←c63436, pd451);
         };
      };
SOURCE(28324, 23)
   {
      word pd452;
      pd452 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd452 ))))(f←v10512, (* (( (ptr) gf←c65484)+90) ), 0, 2147483647, pd452);
      };
SOURCE(28349, 50)
   {
      word var←c63468;
      {
         word pd453;
         pd453 = (* (( (ptr) (* (( (ptr) gf←c65484)+205)/* var←c60236 */  ))+64) );
         var←c63468 = (word) ( *( (fPt) ((*  (ptr) pd453 ))))(ggData←v10540, pd453);
         };
      {
         word pd454;
         pd454 = (* (( (ptr) (* (( (ptr) gf←c65484)+214)/* var←c62412 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd454 ))))(f←v10512, var←c63468, pd454);
         };
      };
SOURCE(28401, 16)
   {
      word pd455;
      pd455 = (* (( (ptr) (* (( (ptr) gf←c65484)+204)/* var←c60108 */  ))+21) );
      (void) ( *( (fPt) ((*  (ptr) pd455 ))))(f←v10512, 10, pd455);
      };
   }

static word IsEndLine←P2880(c←v10600)
   word c←v10600;
   {
   word var←c10644;
   /* IsEndLine: */ 
SOURCE(28423, 71)
SOURCE(28468, 26)
   {
      word tc456;
      if ((c←v10600 == 13)) {
         tc456 =  (word)  (unsigned) 1;
         }
      else {
         tc456 =  (word)  (unsigned) (c←v10600 == 10);
         };
      return(tc456);
      };
   }

static void NoName←Q5100(formal←c0547, formal←c200016, formal←c200017, formal←c200018, formal←c200019)
   word formal←c0547;
   word formal←c200016;
   word formal←c200017;
   word formal←c200018;
   word formal←c200019;
   {
   register ptr gf←c0649 =  (ptr) &globalframe;
   if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0649)+210)/* var←c61740 */  ))+4) ))) {
      {
         word explanation←v47120;
         explanation←v47120 = (*  (ptr) formal←c200019 );
SOURCE(20154, 8)
         (*  (ptr) formal←c0547 ) = 2;
         (* (( (ptr) formal←c0547)+1) ) = 9;
         return;
         };
      };
   (*  (ptr) formal←c0547 ) = 0;
   (* (( (ptr) formal←c0547)+1) ) = 0;
   return;
   }

static void NoName←Q5160(formal←c0553, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
   word formal←c0553;
   word formal←c200012;
   word formal←c200013;
   word formal←c200014;
   word formal←c200015;
   {
   register ptr gf←c0650 =  (ptr) &globalframe;
   if ((formal←c200013 == (* (( (ptr) (* (( (ptr) gf←c0650)+204)/* var←c60108 */  ))+4) ))) {
      {
         word stream←v37668;
         stream←v37668 = (*  (ptr) formal←c200015 );
SOURCE(10179, 10)
         (* (( (ptr) formal←c200012)+7) ) = 1;
SOURCE(10191, 8)
         (*  (ptr) formal←c0553 ) = 2;
         (* (( (ptr) formal←c0553)+1) ) = 8;
         return;
         };
      };
   (*  (ptr) formal←c0553 ) = 0;
   (* (( (ptr) formal←c0553)+1) ) = 0;
   return;
   }

static void NoName←Q5220(formal←c0564, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
   word formal←c0564;
   word formal←c200008;
   word formal←c200009;
   word formal←c200010;
   word formal←c200011;
   {
   register ptr gf←c0651 =  (ptr) &globalframe;
   if ((formal←c200009 == (* (( (ptr) (* (( (ptr) gf←c0651)+195)/* var←c59148 */  ))+4) ))) {
      {
         word position←v35324;
         word wasThere←v35352;
         word notThere←v35380;
         position←v35324 = (*  (ptr) formal←c200011 );
         wasThere←v35352 = (* (( (ptr) formal←c200011)+1) );
         notThere←v35380 = (* (( (ptr) formal←c200011)+2) );
SOURCE(7065, 155)
         {
            word var←c59788;
            {
               word var←c59820;
               word var←c59852;
               var←c59820 = XR←NewObject(12, (* (( (ptr) gf←c0651)+15) ));
               var←c59852 = var←c59820;
               (*  (ptr) var←c59852 ) = 5;
               (* (( (ptr) var←c59852)+1) ) = position←v35324;
               (* (( (ptr) var←c59852)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c0651)+15) ));
               var←c59852 = (* (( (ptr) var←c59852)+2) );
               (*  (ptr) var←c59852 ) = 11;
               (* (( (ptr) var←c59852)+1) ) = wasThere←v35352;
               (* (( (ptr) var←c59852)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c0651)+15) ));
               var←c59852 = (* (( (ptr) var←c59852)+2) );
               (*  (ptr) var←c59852 ) = 11;
               (* (( (ptr) var←c59852)+1) ) = notThere←v35380;
               var←c59788 = var←c59820;
               };
            {
               word pd457;
               pd457 = (* (( (ptr) (* (( (ptr) gf←c0651)+196)/* var←c59276 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd457 ))))((* (( (ptr) (* (( (ptr) formal←c200008)+5) ))+3) ), 0, (* (( (ptr) gf←c0651)+54) ), (* (
                     ( (ptr) gf←c0651)+27) ), var←c59788, pd457);
               };
            };
SOURCE(7222, 10)
         (*  (ptr) formal←c0564 ) = 2;
         (* (( (ptr) formal←c0564)+1) ) = 7;
         return;
         };
      };
   (*  (ptr) formal←c0564 ) = 0;
   (* (( (ptr) formal←c0564)+1) ) = 0;
   return;
   }

static void NoName←Q5280(formal←c0575, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
   word formal←c0575;
   word formal←c200004;
   word formal←c200005;
   word formal←c200006;
   word formal←c200007;
   {
   register ptr gf←c0652 =  (ptr) &globalframe;
   if ((formal←c200005 == (* (( (ptr) (* (( (ptr) gf←c0652)+195)/* var←c59148 */  ))+4) ))) {
      {
         word position←v34504;
         word wasThere←v34532;
         word notThere←v34560;
         position←v34504 = (*  (ptr) formal←c200007 );
         wasThere←v34532 = (* (( (ptr) formal←c200007)+1) );
         notThere←v34560 = (* (( (ptr) formal←c200007)+2) );
SOURCE(5535, 157)
         {
            word var←c59564;
            {
               word var←c59596;
               word var←c59628;
               var←c59596 = XR←NewObject(12, (* (( (ptr) gf←c0652)+15) ));
               var←c59628 = var←c59596;
               (*  (ptr) var←c59628 ) = 5;
               (* (( (ptr) var←c59628)+1) ) = position←v34504;
               (* (( (ptr) var←c59628)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c0652)+15) ));
               var←c59628 = (* (( (ptr) var←c59628)+2) );
               (*  (ptr) var←c59628 ) = 11;
               (* (( (ptr) var←c59628)+1) ) = wasThere←v34532;
               (* (( (ptr) var←c59628)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c0652)+15) ));
               var←c59628 = (* (( (ptr) var←c59628)+2) );
               (*  (ptr) var←c59628 ) = 11;
               (* (( (ptr) var←c59628)+1) ) = notThere←v34560;
               var←c59564 = var←c59596;
               };
            {
               word pd458;
               pd458 = (* (( (ptr) (* (( (ptr) gf←c0652)+201)/* var←c59660 */  ))+5) );
               (void) ( *( (fPt) ((*  (ptr) pd458 ))))((* (( (ptr) gf←c0652)+21) ), 0, (* (( (ptr) gf←c0652)+54) ), (* (( (ptr) gf←c0652)+27)
                   ), var←c59564, pd458);
               };
            };
SOURCE(5694, 10)
         (*  (ptr) formal←c0575 ) = 2;
         (* (( (ptr) formal←c0575)+1) ) = 5;
         return;
         };
      };
   (*  (ptr) formal←c0575 ) = 0;
   (* (( (ptr) formal←c0575)+1) ) = 0;
   return;
   }

static void NoName←Q5340(formal←c0586, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
   word formal←c0586;
   word formal←c200000;
   word formal←c200001;
   word formal←c200002;
   word formal←c200003;
   {
   register ptr gf←c0653 =  (ptr) &globalframe;
   if ((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0653)+195)/* var←c59148 */  ))+4) ))) {
      {
         word position←v27692;
         word wasThere←v27720;
         word notThere←v27748;
         position←v27692 = (*  (ptr) formal←c200003 );
         wasThere←v27720 = (* (( (ptr) formal←c200003)+1) );
         notThere←v27748 = (* (( (ptr) formal←c200003)+2) );
SOURCE(3997, 155)
         {
            word var←c59180;
            {
               word var←c59212;
               word var←c59244;
               var←c59212 = XR←NewObject(12, (* (( (ptr) gf←c0653)+15) ));
               var←c59244 = var←c59212;
               (*  (ptr) var←c59244 ) = 5;
               (* (( (ptr) var←c59244)+1) ) = position←v27692;
               (* (( (ptr) var←c59244)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c0653)+15) ));
               var←c59244 = (* (( (ptr) var←c59244)+2) );
               (*  (ptr) var←c59244 ) = 11;
               (* (( (ptr) var←c59244)+1) ) = wasThere←v27720;
               (* (( (ptr) var←c59244)+2) ) = XR←NewObject(12, (* (( (ptr) gf←c0653)+15) ));
               var←c59244 = (* (( (ptr) var←c59244)+2) );
               (*  (ptr) var←c59244 ) = 11;
               (* (( (ptr) var←c59244)+1) ) = notThere←v27748;
               var←c59180 = var←c59212;
               };
            {
               word pd459;
               pd459 = (* (( (ptr) (* (( (ptr) gf←c0653)+196)/* var←c59276 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd459 ))))((* (( (ptr) (* (( (ptr) formal←c200000)+5) ))+3) ), 0, (* (( (ptr) gf←c0653)+54) ), (* (
                     ( (ptr) gf←c0653)+27) ), var←c59180, pd459);
               };
            };
SOURCE(4154, 10)
         (*  (ptr) formal←c0586 ) = 2;
         (* (( (ptr) formal←c0586)+1) ) = 3;
         return;
         };
      };
   (*  (ptr) formal←c0586 ) = 0;
   (* (( (ptr) formal←c0586)+1) ) = 0;
   return;
   }

/* file: GGFileImpl, module: GGFileImpl, compiled at: July 11, 1993 7:58:12 pm PDT */ 
extern void XR←install←GGFileImpl() {
   NoName←Q4740();
   }
extern void XR←run←GGFileImpl() { XR←Start(&globalframe); }