/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: July 11, 1993 7:55:49 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: GGToIPImpl, module: GGToIPImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [1336970880,3189144311] GGToIPImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {W8 f; W7 r;} W15;
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2;} W3;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W5 r;} W13;
typedef struct {W8 f; word r;} W9;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W8 f; W6 r;} W14;
typedef struct {W8 f; W2 r;} W10;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W4 *W4Pt;
#define SOURCE(p, l) /* source p, l */
static float fc79 = 1.0;
static float fc91 = 0.0254;
static float fc93 = 72.0;
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR_RaiseBoundsFault()) : (idx) )
static float fc124 = 100.0;
static float fc129 = 8607.17;
static float fc150 = 8605.22;
static float fc153 = 8705.14;
static void NoName_Q1056();
static void GGToIPImpl_P0();
static void IPFromGG_P60();
static word NoName_Q1116();
static void DrawObjects_P420();
static word DoDrawObject_P540();
static void DoIP_P480();
static void IPFromGGCommand_P120();
static word NoName_Q1176();
static void TryPattern_P648();
static word NoName_Q1236();
static word EachFile_P804();
static void FileinSceneOnly_P180();
static word NoName_Q1296();
static void SkipOptions_P240();
static word FileinEntity_P300();
static word IsEndLine_P360();
static void NoName_Q1356();
static void NoName_Q1416();
static void NoName_Q1476();
static void NoName_Q1536();
static struct {unsigned f; char r[16];} string1 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[44];} string3 = {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];} string4 = {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];} string5 = {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];} string6 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\247\365\203\234\300\047\265\225\046\100\214\000\000"};
static struct {unsigned f; char r[4];} string8 = {131076, "\216\251\000"};
static struct {unsigned f; char r[12];} string9 = {589836, "Complaint\000\000"};
static struct {unsigned f; char r[96];} string10 = {6226016, "useage:\012IPFromGG list of Gargoyle filenames\012    or\012IPFromGG OutputFile.ip _ InputFile.gargoyle\012"};
static struct {unsigned f; char r[32];} string11 = {1966112, "GGToIP failed: NIL IP filename\000"};
static struct {unsigned f; char r[20];} string12 = {1114132, "GGToIP failed: %g\000\000"};
static struct {unsigned f; char r[40];} string13 = {2359336, "GGToIP failed: NIL Gargoyle filename\000\000\000"};
static struct {unsigned f; char r[12];} string14 = {524300, "Feedback\000\000\000"};
static struct {unsigned f; char r[28];} string15 = {1703964, "Creating IP file %g . . . \000"};
static struct {unsigned f; char r[8];} string16 = {262152, "Done\000\000\000"};
static struct {unsigned f; char r[52];} string17 = {3211316, "GGToIP failed: could not find %g (FS or IO Error)\000\000"};
static struct {unsigned f; char r[40];} string18 = {2359336, "GGToIP failed: malformed scene in %g\000\000\000"};
static struct {unsigned f; char r[12];} string19 = {524300, "IPFromGG\000\000\000"};
static struct {unsigned f; char r[24];} string20 = {1310744, "GargoyleToInterpress\000\000\000"};
static struct {unsigned f; char r[4];} string21 = {65540, "_\000\000"};
static struct {unsigned f; char r[48];} string22 = {3014704, "GGToIP failed: pattern %g matched no filenames\000"};
static struct {unsigned f; char r[8];} string23 = {327688, "  -- \000\000"};
static struct {unsigned f; char r[4];} string24 = {196612, ".ip"};
static struct {unsigned f; char r[4];} string25 = {65540, "\012\000\000"};
static struct {unsigned f; char r[8];} string26 = {458760, "Failure"};
static struct {unsigned f; char r[44];} string27 = {2621484, "position: %g, wasThere: %g, notThere: %g\000\000\000"};
static struct {unsigned f; char r[16];} string28 = {786448, "GargoyleToIP\000\000\000"};
static struct {unsigned f; char r[16];} string29 = {917520, "GGToInterpress\000"};
static struct {unsigned f; char r[8];} string30 = {393224, "GGToIP\000"};
static struct {unsigned f; char r[92];} string31 = {5963868, "useage:\012GGToIP list of Gargoyle filenames\012    or\012GGToIP OutputFile.ip _ InputFile.gargoyle\012"};
static struct {unsigned f; char r[28];} string32 = {1638428, "Gargoyle file for scene: \000\000"};
static struct {unsigned f; char r[20];} string33 = {1245204, "Produced by version"};
static struct {unsigned f; char r[12];} string34 = {589836, "Entities:\000\000"};
static struct {unsigned f; char r[4];} string35 = {131076, "]:\000"};
static struct {unsigned f; char r[12];} string36 = {524300, "Outline:\000\000\000"};
static struct {unsigned f; char r[8];} string37 = {458760, "Outline"};
static struct {unsigned f; char r[8];} string38 = {327688, "Slice\000\000"};
static struct {unsigned f; char r[8];} string39 = {458760, "Cluster"};
static struct {unsigned f; char r[16];} string40 = {851984, "\257\300\117\260\216\200\300\276\026\172\367\100\164\000\000"};
static struct {unsigned f; char r[12];} string41 = {524296, "\006\001\074\010\000\004\037\001\000\000\000"};
static struct {unsigned f; char r[16];} string42 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string43 = {851984, "\257\300\311\235\133\064\300\165\175\234\175\100\150\000\000"};
static struct {unsigned f; char r[16];} string44 = {851984, "\257\300\322\334\347\304\300\124\107\000\027\100\150\000\000"};
static struct {unsigned f; char r[16];} string45 = {851984, "\257\300\244\106\101\245\300\067\272\166\272\100\150\000\000"};
static struct {unsigned f; char r[16];} string46 = {851984, "\257\300\103\154\257\030\300\165\276\076\350\100\150\000\000"};
static struct {unsigned f; char r[16];} string47 = {851984, "\257\300\344\212\014\176\300\070\230\121\123\100\150\000\000"};
static struct {unsigned f; char r[16];} string48 = {851984, "\257\300\254\061\235\240\300\234\075\103\347\100\150\000\000"};
static struct {unsigned f; char r[16];} string49 = {851984, "\257\300\236\155\220\261\300\040\017\026\014\100\150\000\000"};
static struct {unsigned f; char r[16];} string50 = {851984, "\257\300\347\101\365\007\300\150\102\366\020\100\150\000\000"};
static struct {unsigned f; char r[16];} string51 = {851984, "\257\300U$)\337\300Xo9\243@t\000\000"};
static struct {unsigned f; char r[16];} string52 = {851984, "\257\300\336\025\013\356\300\216\115\352\271\100\150\000\000"};
static struct {unsigned f; char r[16];} string53 = {851984, "\257\300\370\132\042\205\300\045\133\011\125\100\150\000\000"};
static struct {unsigned f; char r[16];} string54 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\150\000\000"};
static struct {unsigned f; char r[16];} string55 = {851984, "\257\300\124\360\214\337\300\200\347\202\313\100\150\000\000"};
static struct {unsigned f; char r[16];} string56 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string57 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string58 = {851984, "\257\300\246\205\220\035\300\344\000\142\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string59 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {
   word f0[46]; word f46; word f47; word f48; 
   word f49; word f50; word f51; word f52; 
   word f53; word f54; word f55; word f56; 
   word f57; word f58; word f59[19]; 
   } globalframe = {
   {0}, (word) IsEndLine_P360, 0, (word) FileinEntity_P300, 
   0, (word) SkipOptions_P240, 0, (word) FileinSceneOnly_P180, 
   0, (word) IPFromGGCommand_P120, 0, (word) IPFromGG_P60, 
   0, (word) GGToIPImpl_P0, {0}
   };

static void NoName_Q1056()
   {
   register ptr gf_c0171 =  (ptr) &globalframe;
   word var_c27260;
   (* (( (ptr) gf_c0171)+5) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c0171)+10) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf_c0171)+11) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6);
   (* (( (ptr) gf_c0171)+12) ) = (word) XR_GetTypeIndexS((word) (&string7));
   (* (( (ptr) gf_c0171)+14) ) = (word) XR_GetTypeIndex((word) &string8, 0, (word) &string2);
   (*  (ptr) (( (bPt) gf_c0171)+60) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+14) ), (word) &string9);
   (*  (ptr) (( (bPt) gf_c0171)+64) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string10);
   (*  (ptr) (( (bPt) gf_c0171)+68) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string11);
   (*  (ptr) (( (bPt) gf_c0171)+72) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string12);
   (*  (ptr) (( (bPt) gf_c0171)+76) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string13);
   (*  (ptr) (( (bPt) gf_c0171)+80) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+14) ), (word) &string14);
   (*  (ptr) (( (bPt) gf_c0171)+84) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string15);
   (*  (ptr) (( (bPt) gf_c0171)+88) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string16);
   (*  (ptr) (( (bPt) gf_c0171)+92) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string17);
   (*  (ptr) (( (bPt) gf_c0171)+96) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string18);
   (*  (ptr) (( (bPt) gf_c0171)+100) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string19);
   (*  (ptr) (( (bPt) gf_c0171)+104) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string20);
   (*  (ptr) (( (bPt) gf_c0171)+108) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string21);
   (*  (ptr) (( (bPt) gf_c0171)+112) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string22);
   (*  (ptr) (( (bPt) gf_c0171)+116) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string23);
   (*  (ptr) (( (bPt) gf_c0171)+120) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string24);
   (*  (ptr) (( (bPt) gf_c0171)+124) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string25);
   (*  (ptr) (( (bPt) gf_c0171)+128) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+14) ), (word) &string26);
   (*  (ptr) (( (bPt) gf_c0171)+132) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string27);
   (*  (ptr) (( (bPt) gf_c0171)+136) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string28);
   (*  (ptr) (( (bPt) gf_c0171)+140) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string29);
   (*  (ptr) (( (bPt) gf_c0171)+144) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string30);
   (*  (ptr) (( (bPt) gf_c0171)+148) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string31);
   (*  (ptr) (( (bPt) gf_c0171)+152) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string32);
   (*  (ptr) (( (bPt) gf_c0171)+156) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string33);
   (*  (ptr) (( (bPt) gf_c0171)+160) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string34);
   (*  (ptr) (( (bPt) gf_c0171)+164) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string35);
   (*  (ptr) (( (bPt) gf_c0171)+168) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string36);
   (*  (ptr) (( (bPt) gf_c0171)+172) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+14) ), (word) &string37);
   (*  (ptr) (( (bPt) gf_c0171)+176) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string38);
   (*  (ptr) (( (bPt) gf_c0171)+180) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0171)+5) ), (word) &string39);
   (void) XR_DeclareGlobalFrame((word) "GGToIPImpl", &globalframe, (word) XR_GetTypeIndex((word) &string40, 0, (word) &string41)
      , (word) (( (bPt) gf_c0171)+232)/* var_c25564 */ );
   var_c27260 = (word) XR_ImportInterface((word) "Commander", (word) XR_GetTypeIndexS((word) (&string42)), 3);
   (* (( (ptr) gf_c0171)+60)/* var_c25596 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 1310725);
   var_c27260 = (word) XR_ImportInterface((word) "CommanderOps", (word) XR_GetTypeIndexS((word) (&string43)), 14);
   (* (( (ptr) gf_c0171)+70)/* var_c26396 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67633666);
   var_c27260 = (word) XR_ImportInterface((word) "Feedback", (word) XR_GetTypeIndexS((word) (&string44)), 25);
   (* (( (ptr) gf_c0171)+62)/* var_c25724 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 1313029);
   (void) XR_ImportProcS(var_c27260, 790787);
   (void) XR_ImportProcS(var_c27260, 67109632);
   (void) XR_ImportProcS(var_c27260, 1575429);
   (void) XR_ImportProcS(var_c27260, 1050628);
   var_c27260 = (word) XR_ImportInterface((word) "FeedbackClasses", (word) XR_GetTypeIndexS((word) (&string45)), 19);
   (* (( (ptr) gf_c0171)+71)/* var_c26428 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67897603);
   var_c27260 = (word) XR_ImportInterface((word) "FileNames", (word) XR_GetTypeIndexS((word) (&string46)), 17);
   (* (( (ptr) gf_c0171)+72)/* var_c26716 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67371265);
   var_c27260 = (word) XR_ImportInterface((word) "FS", (word) XR_GetTypeIndexS((word) (&string47)), 36);
   (* (( (ptr) gf_c0171)+64)/* var_c25948 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 788995);
   (void) XR_ImportProcS(var_c27260, 940048898);
   (void) XR_ImportProcS(var_c27260, 70522636);
   var_c27260 = (word) XR_ImportInterface((word) "GGFileOps", (word) XR_GetTypeIndexS((word) (&string48)), 7);
   (* (( (ptr) gf_c0171)+63)/* var_c25756 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67371521);
   (void) XR_ImportProcS(var_c27260, 202638341);
   (void) XR_ImportProcS(var_c27260, 135267076);
   var_c27260 = (word) XR_ImportInterface((word) "GGParseIn", (word) XR_GetTypeIndexS((word) (&string49)), 26);
   (* (( (ptr) gf_c0171)+74)/* var_c26812 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67372033);
   (void) XR_ImportProcS(var_c27260, 67371777);
   (void) XR_ImportProcS(var_c27260, 134481921);
   (void) XR_ImportProcS(var_c27260, 262657);
   (void) XR_ImportProcS(var_c27260, 67376385);
   (void) XR_ImportProcS(var_c27260, 525826);
   (void) XR_ImportProcS(var_c27260, 67376897);
   (void) XR_ImportProcS(var_c27260, 67372801);
   (void) XR_ImportProcS(var_c27260, 525570);
   var_c27260 = (word) XR_ImportInterface((word) "GGScene", (word) XR_GetTypeIndexS((word) (&string50)), 50);
   (* (( (ptr) gf_c0171)+66)/* var_c26012 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 787971);
   (void) XR_ImportProcS(var_c27260, 68164356);
   (void) XR_ImportProcS(var_c27260, 67371009);
   var_c27260 = (word) XR_ImportInterface((word) "GGSlice", (word) XR_GetTypeIndexS((word) (&string51)), 128);
   (* (( (ptr) gf_c0171)+77)/* var_c27228 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67371777);
   var_c27260 = (word) XR_ImportInterface((word) "GGSliceOps", (word) XR_GetTypeIndexS((word) (&string52)), 73);
   (* (( (ptr) gf_c0171)+69)/* var_c26300 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 68436485);
   (void) XR_ImportProcS(var_c27260, 1313541);
   var_c27260 = (word) XR_ImportInterface((word) "GGUtility", (word) XR_GetTypeIndexS((word) (&string53)), 42);
   (* (( (ptr) gf_c0171)+76)/* var_c26972 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 135008515);
   (void) XR_ImportProcS(var_c27260, 134221824);
   var_c27260 = (word) XR_ImportInterface((word) "Imager", (word) XR_GetTypeIndexS((word) (&string54)), 84);
   (* (( (ptr) gf_c0171)+68)/* var_c26236 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 527106);
   (void) XR_ImportProcS(var_c27260, 536578);
   var_c27260 = (word) XR_ImportInterface((word) "ImagerInterpress", (word) XR_GetTypeIndexS((word) (&string55)), 10);
   (* (( (ptr) gf_c0171)+67)/* var_c26076 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 264193);
   (void) XR_ImportProcS(var_c27260, 788227);
   (void) XR_ImportProcS(var_c27260, 67633410);
   var_c27260 = (word) XR_ImportInterface((word) "IO", (word) XR_GetTypeIndexS((word) (&string56)), 103);
   (* (( (ptr) gf_c0171)+65)/* var_c25980 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67372801);
   (void) XR_ImportProcS(var_c27260, 67374849);
   (void) XR_ImportProcS(var_c27260, 1071364);
   (void) XR_ImportProcS(var_c27260, 530434);
   var_c27260 = (word) XR_ImportInterface((word) "Process", (word) XR_GetTypeIndexS((word) (&string57)), 22);
   (* (( (ptr) gf_c0171)+73)/* var_c26780 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 3584);
   var_c27260 = (word) XR_ImportInterface((word) "Real", (word) XR_GetTypeIndexS((word) (&string58)), 11);
   (* (( (ptr) gf_c0171)+75)/* var_c26940 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67371521);
   var_c27260 = (word) XR_ImportInterface((word) "Rope", (word) XR_GetTypeIndexS((word) (&string59)), 43);
   (* (( (ptr) gf_c0171)+61)/* var_c25692 */  ) = var_c27260;
   (void) XR_ImportProcS(var_c27260, 67633666);
   (void) XR_ImportProcS(var_c27260, 67900163);
   (void) XR_ImportProcS(var_c27260, 67373569);
   (void) XR_ImportProcS(var_c27260, 67896323);
   }

static void GGToIPImpl_P0(formal_c039, formal_c038)
   word formal_c039;
   word formal_c038;
   {
   register ptr gf_c27292 =  (ptr) &globalframe;
   /* GGToIPImpl: */ 
SOURCE(206, 8087)
SOURCE(7811, 70)
   {
      word pd60;
      pd60 = (* (( (ptr) (* (( (ptr) gf_c27292)+60)/* var_c25596 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd60 ))))((* (( (ptr) gf_c27292)+36) ), (word) (( (bPt) gf_c27292)+216)/* var_c25500 */ , (* (
            ( (ptr) gf_c27292)+37) ), 0, 1, pd60);
      };
SOURCE(7883, 78)
   {
      word pd61;
      pd61 = (* (( (ptr) (* (( (ptr) gf_c27292)+60)/* var_c25596 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd61 ))))((* (( (ptr) gf_c27292)+35) ), (word) (( (bPt) gf_c27292)+216)/* var_c25500 */ , (* (
            ( (ptr) gf_c27292)+37) ), 0, 1, pd61);
      };
SOURCE(7963, 76)
   {
      word pd62;
      pd62 = (* (( (ptr) (* (( (ptr) gf_c27292)+60)/* var_c25596 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd62 ))))((* (( (ptr) gf_c27292)+34) ), (word) (( (bPt) gf_c27292)+216)/* var_c25500 */ , (* (
            ( (ptr) gf_c27292)+37) ), 0, 1, pd62);
      };
SOURCE(8041, 84)
   {
      word pd63;
      pd63 = (* (( (ptr) (* (( (ptr) gf_c27292)+60)/* var_c25596 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd63 ))))((* (( (ptr) gf_c27292)+26) ), (word) (( (bPt) gf_c27292)+216)/* var_c25500 */ , (* (
            ( (ptr) gf_c27292)+37) ), 0, 1, pd63);
      };
SOURCE(8127, 166)
   {
      word pd64;
      pd64 = (* (( (ptr) (* (( (ptr) gf_c27292)+60)/* var_c25596 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd64 ))))((* (( (ptr) gf_c27292)+25) ), (word) (( (bPt) gf_c27292)+216)/* var_c25500 */ , (* (
            ( (ptr) gf_c27292)+16) ), 0, 1, pd64);
      };
   }

static void IPFromGG_P60(ggName_v3780, ipName_v3808, router_v3836, formal_c0211)
   word ggName_v3780;
   word ipName_v3808;
   word router_v3836;
   word formal_c0211;
   {
   W15 var_c27324;
   /* declaration of camera_v3864 skipped */ 
   register ptr gf_c27356 =  (ptr) &globalframe;
   /* declaration of var_c25628 skipped */ 
   /* declaration of var_c25660 skipped */ 
   /* declaration of scene_v4516 skipped */ 
   word f_v4544 = 0;
   word ipRef_v4572 = 0;
   /* declaration of ggFullName_v4600 skipped */ 
   word ipFullName_v4628 = 0;
   word success_v4656 = 0;
   (* (( (ptr) &var_c27324)+4)/* camera_v3864 */  ) = formal_c0211;
   /* IPFromGG: */ 
SOURCE(430, 3372)
   {
      word tmpAddr65;
      tmpAddr65 = (word) (( (ptr) &var_c27324)+5)/* var_c25628 */ ;
      (*  (ptr) tmpAddr65 ) = ( ((word)  (fPt) DoIP_P480) );
      (* (( (ptr) tmpAddr65) + 1) ) = 1;
      };
   {
      word tmpAddr66;
      tmpAddr66 = (word) (( (ptr) &var_c27324)+7)/* var_c25660 */ ;
      (*  (ptr) tmpAddr66 ) = ( ((word)  (fPt) DrawObjects_P420) );
      (* (( (ptr) tmpAddr66) + 1) ) = 1;
      };
SOURCE(1003, 25)
   (* (( (ptr) &var_c27324)+9)/* scene_v4516 */  ) = 0;
SOURCE(1073, 33)
   (* (( (ptr) &var_c27324)+10)/* ggFullName_v4600 */  ) = 0;
SOURCE(1132, 2670)
SOURCE(1138, 2664)
   {
      word pd67;
      pd67 = (* (( (ptr) (* (( (ptr) gf_c27356)+61)/* var_c25692 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd67 ))))(ipName_v3808, 0, 1, pd67))) {
SOURCE(1172, 79)
         {
            word pd68;
            pd68 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd68 ))))(router_v3836, 0, (* (( (ptr) gf_c27356)+15) ), (* (( (ptr) gf_c27356)+17) ), pd68)
            ;
            };
SOURCE(1253, 6)
         return;
         };
      };
SOURCE(1264, 2538)
   {
      W2 var_c25788;
      {
         word pd69;
         pd69 = (* (( (ptr) (* (( (ptr) gf_c27356)+63)/* var_c25756 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd69 ))))((word) &var_c25788, (* (( (ptr) gf_c27356)+36) ), ipName_v3808, 0, router_v3836, pd69)
         ;
         };
      success_v4656 = var_c25788.f1;
      ipFullName_v4628 = var_c25788.f0;
      };
SOURCE(1352, 2450)
   if ((0 == success_v4656)) {
SOURCE(1374, 2428)
      {
         W2 var_c25820;
         var_c25820.f0 = 11;
         var_c25820.f1 = ipName_v3808;
         {
            word pd70;
            pd70 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+14) );
            (void) ( *( (fPt) ((*  (ptr) pd70 ))))(router_v3836, 0, (* (( (ptr) gf_c27356)+15) ), (* (( (ptr) gf_c27356)+18) ), var_c25820, pd70)
            ;
            };
         };
SOURCE(1457, 6)
      return;
      };
SOURCE(1469, 2333)
   {
      word pd71;
      pd71 = (* (( (ptr) (* (( (ptr) gf_c27356)+61)/* var_c25692 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd71 ))))(ggName_v3780, 0, 1, pd71))) {
SOURCE(1503, 85)
         {
            word pd72;
            pd72 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+12) );
            (void) ( *( (fPt) ((*  (ptr) pd72 ))))(router_v3836, 0, (* (( (ptr) gf_c27356)+15) ), (* (( (ptr) gf_c27356)+19) ), pd72)
            ;
            };
SOURCE(1590, 6)
         return;
         };
      };
SOURCE(1601, 2201)
   {
      W3 var_c25852;
      {
         word pd73;
         pd73 = (* (( (ptr) (* (( (ptr) gf_c27356)+63)/* var_c25756 */  ))+8) );
         (void) ( *( (fPt) ((*  (ptr) pd73 ))))((word) &var_c25852, (* (( (ptr) gf_c27356)+36) ), ggName_v3780, 0, router_v3836, 0, pd73)
         ;
         };
      success_v4656 = var_c25852.f1;
      (* (( (ptr) &var_c27324)+10)/* ggFullName_v4600 */  ) = var_c25852.f0;
      };
SOURCE(1687, 2115)
   if ((0 == success_v4656)) {
SOURCE(1709, 2093)
      {
         W2 var_c25884;
         var_c25884.f0 = 11;
         var_c25884.f1 = ggName_v3780;
         {
            word pd74;
            pd74 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+14) );
            (void) ( *( (fPt) ((*  (ptr) pd74 ))))(router_v3836, 0, (* (( (ptr) gf_c27356)+15) ), (* (( (ptr) gf_c27356)+18) ), var_c25884, pd74)
            ;
            };
         };
SOURCE(1792, 6)
      return;
      };
SOURCE(1804, 1998)
   {
      /* declaration of var_c01 skipped */ 
      /* declaration of var_c02 skipped */ 
      (* (( (ptr) &var_c27324)+11) ) = 7;
      (* (( (ptr) &var_c27324)+12) ) = 1;
      (* (( (ptr) &var_c27324)+13)/* var_c02 */  ) = (* (( (ptr) (* (( (ptr) gf_c27356)+64)/* var_c25948 */  ))+27) );
      {
         /* declaration of var_c03 skipped */ 
         {
            word var_c04;
            {
               word var_c0197;
               var_c0197 = (word) &var_c27324;
               var_c04 = (word) XR_Enable(( ((word)  (fPt) NoName_Q1116) ), ( ((word)  (fPt) NoName_Q1536) ), var_c0197);
               };
            if ((var_c04 == 2)) {
               goto lab_L100000;
               };
            };
         f_v4544 = (* (( (ptr) &var_c27324)+14)/* var_c03 */  );
         };
      };
SOURCE(1878, 1924)
   {
      word pd75;
      pd75 = (* (( (ptr) (* (( (ptr) gf_c27356)+66)/* var_c26012 */  ))+4) );
      (* (( (ptr) &var_c27324)+9)/* scene_v4516 */  ) = (word) ( *( (fPt) ((*  (ptr) pd75 ))))(0, pd75);
      };
SOURCE(1909, 1893)
   {
      W2 var_c26044;
      (void) FileinSceneOnly_P180((word) &var_c26044, f_v4544, (* (( (ptr) &var_c27324)+9)/* scene_v4516 */  ), router_v3836, (* (
            ( (ptr) &var_c27324)+4)/* camera_v3864 */  ));
      success_v4656 = var_c26044.f0;
      };
SOURCE(1966, 20)
   if ((0 == success_v4656)) {
SOURCE(1986, 9)
      goto lab_L100001;
      };
SOURCE(1997, 1805)
   {
      word pd76;
      pd76 = (* (( (ptr) (* (( (ptr) gf_c27356)+67)/* var_c26076 */  ))+5) );
      ipRef_v4572 = (word) ( *( (fPt) ((*  (ptr) pd76 ))))(ipFullName_v4628, 0, pd76);
      };
SOURCE(2042, 1760)
   {
      W2 var_c26108;
      var_c26108.f0 = 11;
      var_c26108.f1 = ipFullName_v4628;
      {
         word pd77;
         pd77 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd77 ))))(router_v3836, 1, (* (( (ptr) gf_c27356)+20) ), (* (( (ptr) gf_c27356)+21) ), var_c26108, pd77)
         ;
         };
      };
SOURCE(2134, 41)
   {
      word pd78;
      pd78 = (* (( (ptr) (* (( (ptr) gf_c27356)+67)/* var_c26076 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd78 ))))(ipRef_v4572, (word) (( (bPt) &var_c27324)+20)/* var_c25628 */ , (*  (ptr) &fc79 ), pd78)
      ;
      };
SOURCE(2177, 29)
   {
      word pd80;
      pd80 = (* (( (ptr) (* (( (ptr) gf_c27356)+67)/* var_c26076 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd80 ))))(ipRef_v4572, pd80);
      };
SOURCE(2208, 11)
   {
      word pd81;
      pd81 = (* (( (ptr) (* (( (ptr) gf_c27356)+65)/* var_c25980 */  ))+28) );
      (void) ( *( (fPt) ((*  (ptr) pd81 ))))(f_v4544, 0, pd81);
      };
SOURCE(2221, 47)
   {
      word pd82;
      pd82 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd82 ))))(router_v3836, 3, (* (( (ptr) gf_c27356)+20) ), (* (( (ptr) gf_c27356)+22) ), pd82)
      ;
      };
   goto lab_L100004;
   lab_L100000: ;
SOURCE(2285, 1517)
   {
      W2 var_c26140;
      var_c26140.f0 = 11;
      var_c26140.f1 = (* (( (ptr) &var_c27324)+10)/* ggFullName_v4600 */  );
      {
         word pd83;
         pd83 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd83 ))))(router_v3836, 0, (* (( (ptr) gf_c27356)+15) ), (* (( (ptr) gf_c27356)+23) ), var_c26140, pd83)
         ;
         };
      };
   goto lab_L100004;
   lab_L100001: ;
SOURCE(2412, 1390)
   {
      W2 var_c26172;
      var_c26172.f0 = 11;
      var_c26172.f1 = (* (( (ptr) &var_c27324)+10)/* ggFullName_v4600 */  );
      {
         word pd84;
         pd84 = (* (( (ptr) (* (( (ptr) gf_c27356)+62)/* var_c25724 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd84 ))))(router_v3836, 0, (* (( (ptr) gf_c27356)+15) ), (* (( (ptr) gf_c27356)+24) ), var_c26172, pd84)
         ;
         };
      };
   lab_L100004: ;
   }

static word NoName_Q1116(formal_c0174)
   word formal_c0174;
   {
SOURCE(1804, 1998)
   {
      word pd85;
      pd85 = (* (( (ptr) formal_c0174)+13) );
      (* (( (ptr) formal_c0174)+14) ) = (word) ( *( (fPt) ((*  (ptr) pd85 ))))((* (( (ptr) formal_c0174)+10) ), 0, 7, 1, 2560, (*  (W2Pt) (
            ( (ptr) formal_c0174)+11) )
         , 0, 2147483647, 1, 0, 0, 0, pd85);
      };
   return(0);
   }

static void DrawObjects_P420(formal_c0212, scene_v4760, formal_c0213, formal_c27452)
   word formal_c0212;
   word scene_v4760;
   word formal_c0213;
   word formal_c27452;
   {
   W8 var_c27388;
   /* declaration of dc_v4732 skipped */ 
   /* declaration of camera_v4788 skipped */ 
   register ptr gf_c27420 =  (ptr) &globalframe;
   /* declaration of var_c26204 skipped */ 
   formal_c27452 = (formal_c27452 - 28);
   var_c27388.f4/* dc_v4732 */  = formal_c0212;
   var_c27388.f5/* camera_v4788 */  = formal_c0213;
   var_c27388.f0 = formal_c27452;
   /* DrawObjects: */ 
SOURCE(533, 3269)
   {
      word tmpAddr86;
      tmpAddr86 = (word) (( (ptr) &var_c27388)+6)/* var_c26204 */ ;
      (*  (ptr) tmpAddr86 ) = ( ((word)  (fPt) DoDrawObject_P540) );
      (* (( (ptr) tmpAddr86) + 1) ) = 1;
      };
SOURCE(768, 33)
   {
      word pd87;
      pd87 = (* (( (ptr) (* (( (ptr) gf_c27420)+68)/* var_c26236 */  ))+52) );
      (void) ( *( (fPt) ((*  (ptr) pd87 ))))(var_c27388.f4/* dc_v4732 */ , (*  (ptr) (* (( (ptr) (* (( (ptr) gf_c27420)+68)/* var_c26236 */  ))+54)
          ) ), pd87);
      };
SOURCE(803, 2999)
   {
      word var_c26268;
      word pd88;
      pd88 = (* (( (ptr) (* (( (ptr) gf_c27420)+66)/* var_c26012 */  ))+31) );
      var_c26268 = (word) ( *( (fPt) ((*  (ptr) pd88 ))))(scene_v4760, 0, (word) (( (bPt) &var_c27388)+24)/* var_c26204 */ , 0, pd88)
      ;
      };
   }

static word DoDrawObject_P540(slice_v4952, formal_c27516)
   word slice_v4952;
   word formal_c27516;
   {
   register ptr gf_c27484 =  (ptr) &globalframe;
   word done_v4996;
   formal_c27516 = (formal_c27516 - 24);
   /* DoDrawObject: */ 
SOURCE(632, 131)
SOURCE(632, 131)
   done_v4996 = 0;
SOURCE(712, 51)
   {
      word pd89;
      pd89 = (* (( (ptr) (* (( (ptr) gf_c27484)+69)/* var_c26300 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd89 ))))(slice_v4952, 0, (* (( (ptr) formal_c27516)+4) ), (* (( (ptr) formal_c27516)+5) ), 0, pd89)
      ;
      };
SOURCE(632, 131)
   return(done_v4996);
   }

static void DoIP_P480(dc_v4848, formal_c27580)
   word dc_v4848;
   word formal_c27580;
   {
   register ptr gf_c27548 =  (ptr) &globalframe;
   formal_c27580 = (formal_c27580 - 20);
   /* DoIP: */ 
SOURCE(860, 137)
SOURCE(932, 33)
   {
      word pd90;
      word x92;
      word x94;
      float tf95;
      pd90 = (* (( (ptr) (* (( (ptr) gf_c27548)+68)/* var_c26236 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd90 ))))(dc_v4848, (
            tf95 = (
               x92 = (*  (ptr) &fc91 ),  *(float*)&x92
               ) / (
               x94 = (*  (ptr) &fc93 ),  *(float*)&x94
               ),  *(word*)&tf95
            ), pd90);
      };
SOURCE(967, 30)
   (void) DrawObjects_P420(dc_v4848, (* (( (ptr) formal_c27580)+9) ), (* (( (ptr) formal_c27580)+4) ), (word) (( (bPt) formal_c27580)+28)
      );
   }

static void IPFromGGCommand_P120(formal_c093, formal_c0214)
   word formal_c093;
   word formal_c0214;
   {
   W13 var_c27612;
   /* declaration of cmd_v7684 skipped */ 
   register ptr gf_c27644 =  (ptr) &globalframe;
   word result_v7728;
   /* declaration of msg_v7756 skipped */ 
   /* declaration of var_c26332 skipped */ 
   (* (( (ptr) &var_c27612)+4)/* cmd_v7684 */  ) = formal_c0214;
   /* IPFromGGCommand: */ 
SOURCE(2527, 2159)
   {
      word tmpAddr96;
      tmpAddr96 = (word) (( (ptr) &var_c27612)+6)/* var_c26332 */ ;
      (*  (ptr) tmpAddr96 ) = ( ((word)  (fPt) TryPattern_P648) );
      (* (( (ptr) tmpAddr96) + 1) ) = 1;
      };
SOURCE(2527, 2159)
   result_v7728 = 0;
SOURCE(2527, 2159)
   (* (( (ptr) &var_c27612)+5)/* msg_v7756 */  ) = 0;
SOURCE(2568, 2118)
SOURCE(2570, 18)
   {
      word dest_v5096 = 0;
      word arrow_v5124 = 0;
      word source_v5152 = 0;
      /* declaration of sawSomeFile_v5180 skipped */ 
      /* declaration of camera_v5208 skipped */ 
      /* declaration of out_v5236 skipped */ 
      word argv_v5264;
      /* declaration of router_v5292 skipped */ 
      word msgHandler_v5320;
SOURCE(3548, 25)
      (* (( (ptr) &var_c27612)+8)/* sawSomeFile_v5180 */  ) = 0;
SOURCE(3575, 95)
      (* (( (ptr) &var_c27612)+9)/* camera_v5208 */  ) = XR_NewObject(20, (* (( (ptr) gf_c27644)+12) ));
      (*  (ptr) (* (( (ptr) &var_c27612)+9)/* camera_v5208 */  ) ) = 2;
      (* (( (ptr) (* (( (ptr) &var_c27612)+9)/* camera_v5208 */  ))+4) ) = (*  (ptr) &fc79 );
SOURCE(3672, 24)
      (* (( (ptr) &var_c27612)+10)/* out_v5236 */  ) = (* (( (ptr) (* (( (ptr) &var_c27612)+4)/* cmd_v7684 */  ))+1) );
SOURCE(3698, 89)
      {
         /* declaration of var_c05 skipped */ 
         (* (( (ptr) &var_c27612)+11)/* var_c05 */  ) = (* (( (ptr) (* (( (ptr) gf_c27644)+70)/* var_c26396 */  ))+6) );
         {
            /* declaration of var_c06 skipped */ 
            {
               word var_c07;
               {
                  word var_c0198;
                  var_c0198 = (word) &var_c27612;
                  var_c07 = (word) XR_Enable(( ((word)  (fPt) NoName_Q1176) ), ( ((word)  (fPt) NoName_Q1476) ), var_c0198);
                  };
               if ((var_c07 == 3)) {
                  goto lab_L100006;
                  };
               };
            argv_v5264 = (* (( (ptr) &var_c27612)+12)/* var_c06 */  );
            };
         };
SOURCE(3821, 52)
      {
         word pd97;
         pd97 = (* (( (ptr) (* (( (ptr) gf_c27644)+62)/* var_c25724 */  ))+7) );
         (* (( (ptr) &var_c27612)+11)/* router_v5292 */  ) = (word) ( *( (fPt) ((*  (ptr) pd97 ))))(pd97);
         };
SOURCE(3875, 91)
      {
         word pd98;
         pd98 = (* (( (ptr) (* (( (ptr) gf_c27644)+71)/* var_c26428 */  ))+13) );
         msgHandler_v5320 = (word) ( *( (fPt) ((*  (ptr) pd98 ))))((* (( (ptr) (* (( (ptr) &var_c27612)+4)/* cmd_v7684 */  ))+1) ), 1, 0, pd98)
         ;
         };
SOURCE(3968, 73)
      {
         word var_c26460;
         {
            word var_c26492;
            word var_c26524;
            var_c26492 = XR_NewObject(8, (* (( (ptr) gf_c27644)+11) ));
            var_c26524 = var_c26492;
            (*  (ptr) var_c26524 ) = (* (( (ptr) gf_c27644)+20) );
            (* (( (ptr) var_c26524)+1) ) = XR_NewObject(8, (* (( (ptr) gf_c27644)+11) ));
            var_c26524 = (* (( (ptr) var_c26524)+1) );
            (*  (ptr) var_c26524 ) = (* (( (ptr) gf_c27644)+15) );
            var_c26460 = var_c26492;
            };
         {
            word pd99;
            pd99 = (* (( (ptr) (* (( (ptr) gf_c27644)+62)/* var_c25724 */  ))+21) );
            (void) ( *( (fPt) ((*  (ptr) pd99 ))))((* (( (ptr) &var_c27612)+11)/* router_v5292 */  ), var_c26460, msgHandler_v5320, pd99)
            ;
            };
         };
SOURCE(4044, 594)
      {
         register word i_v5480 = 1;
         register word noName_c26556;
         noName_c26556 = (*  (ptr) argv_v5264 );
         if ((i_v5480 >= noName_c26556)) {
            goto lab_L100009;
            };
         lab_L100012: ;
SOURCE(4076, 14)
         {
            word limit100;
            dest_v5096 = (* ((( (ptr) argv_v5264)+1)+(
                  limit100 = (*  (ptr) argv_v5264 ),
                  BCK(i_v5480, limit100)
                  )) );
            };
SOURCE(4092, 48)
         if (( (int)i_v5480 <  (int)((*  (ptr) argv_v5264 ) - 1))) {
            {
               word var_c26588;
               var_c26588 = (i_v5480 + 1);
               {
                  word limit101;
                  arrow_v5124 = (* ((( (ptr) argv_v5264)+1)+(
                        limit101 = (*  (ptr) argv_v5264 ),
                        BCK(var_c26588, limit101)
                        )) );
                  };
               };
            }
         else {
            arrow_v5124 = 0;
            };
SOURCE(4160, 49)
         if (( (int)i_v5480 <  (int)((*  (ptr) argv_v5264 ) - 2))) {
            {
               word var_c26620;
               var_c26620 = (i_v5480 + 2);
               {
                  word limit102;
                  source_v5152 = (* ((( (ptr) argv_v5264)+1)+(
                        limit102 = (*  (ptr) argv_v5264 ),
                        BCK(var_c26620, limit102)
                        )) );
                  };
               };
            }
         else {
            source_v5152 = 0;
            };
SOURCE(4234, 30)
         {
            word pd103;
            pd103 = (* (( (ptr) (* (( (ptr) gf_c27644)+61)/* var_c25692 */  ))+14) );
            if (( (int)(word) ( *( (fPt) ((*  (ptr) pd103 ))))(dest_v5096, pd103) ==  (int)0)) {
SOURCE(4264, 4)
               goto lab_L100011;
               };
            };
SOURCE(4280, 19)
         (* (( (ptr) &var_c27612)+8)/* sawSomeFile_v5180 */  ) = 0;
SOURCE(4342, 111)
         {
            word tc104;
            word pd105;
            pd105 = (* (( (ptr) (* (( (ptr) gf_c27644)+61)/* var_c25692 */  ))+23) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd105 ))))((* (( (ptr) gf_c27644)+27) ), arrow_v5124, 1, pd105))) {
               tc104 =  (word) (source_v5152 != 0);
               }
            else {
               tc104 =  (word) 0;
               };
            if (tc104) {
SOURCE(4390, 30)
               (void) TryPattern_P648(dest_v5096, source_v5152, 1, (word) (( (bPt) &var_c27612)+24)/* var_c26332 */ );
SOURCE(4422, 6)
               goto lab_L100005;
               }
            else {
SOURCE(4437, 16)
               (void) TryPattern_P648(dest_v5096, 0, 0, (word) (( (bPt) &var_c27612)+24)/* var_c26332 */ );
               };
            };
SOURCE(4504, 134)
         if ((0 == (* (( (ptr) &var_c27612)+8)/* sawSomeFile_v5180 */  ))) {
SOURCE(4528, 110)
            {
               W2 var_c26652;
               var_c26652.f0 = 11;
               var_c26652.f1 = source_v5152;
               {
                  word pd106;
                  pd106 = (* (( (ptr) (* (( (ptr) gf_c27644)+62)/* var_c25724 */  ))+14) );
                  (void) ( *( (fPt) ((*  (ptr) pd106 ))))((* (( (ptr) &var_c27612)+11)/* router_v5292 */  ), 0, (* (( (ptr) gf_c27644)+15) ), (* (
                        ( (ptr) gf_c27644)+28) ), var_c26652, pd106);
                  };
               };
            };
         lab_L100011: ;
         i_v5480 = (i_v5480 + 1);
         if ((i_v5480 < noName_c26556)) {
            goto lab_L100012;
            };
         lab_L100009: ;
         };
      };
   goto lab_L100013;
   lab_L100006: ;
SOURCE(4666, 17)
   result_v7728 = (* (( (ptr) gf_c27644)+32) );
   lab_L100013: ;
   /* removed tail goto */ 
   lab_L100005: ;
   (*  (ptr) formal_c093 ) = result_v7728;
   (* (( (ptr) formal_c093)+1) ) = (* (( (ptr) &var_c27612)+5)/* msg_v7756 */  );
   return;
   }

static word NoName_Q1176(formal_c0182)
   word formal_c0182;
   {
SOURCE(3698, 89)
   {
      word pd107;
      pd107 = (* (( (ptr) formal_c0182)+11) );
      (* (( (ptr) formal_c0182)+12) ) = (word) ( *( (fPt) ((*  (ptr) pd107 ))))((* (( (ptr) formal_c0182)+4) ), 0, pd107);
      };
   return(0);
   }

static void TryPattern_P648(formal_c0215, formal_c0216, formal_c0217, formal_c27740)
   word formal_c0215;
   word formal_c0216;
   word formal_c0217;
   word formal_c27740;
   {
   W9 var_c27676;
   /* declaration of dest_v5396 skipped */ 
   /* declaration of source_v5424 skipped */ 
   /* declaration of isArrow_v5452 skipped */ 
   register ptr gf_c27708 =  (ptr) &globalframe;
   /* declaration of var_c26684 skipped */ 
   formal_c27740 = (formal_c27740 - 24);
   (* (( (ptr) &var_c27676)+4)/* dest_v5396 */  ) = formal_c0215;
   (* (( (ptr) &var_c27676)+5)/* source_v5424 */  ) = formal_c0216;
   (* (( (ptr) &var_c27676)+6)/* isArrow_v5452 */  ) = formal_c0217;
   (*  (ptr) &var_c27676 ) = formal_c27740;
   /* TryPattern: */ 
SOURCE(2570, 18)
   {
      word tmpAddr108;
      tmpAddr108 = (word) (( (ptr) &var_c27676)+7)/* var_c26684 */ ;
      (*  (ptr) tmpAddr108 ) = ( ((word)  (fPt) EachFile_P804) );
      (* (( (ptr) tmpAddr108) + 1) ) = 1;
      };
SOURCE(2644, 1158)
SOURCE(2646, 1156)
   {
      word var_c08;
      {
         word var_c0199;
         var_c0199 = (word) &var_c27676;
         var_c08 = (word) XR_Enable(( ((word)  (fPt) NoName_Q1236) ), ( ((word)  (fPt) NoName_Q1416) ), var_c0199);
         };
      if ((var_c08 == 4)) {
         goto lab_L100014;
         };
      };
   goto lab_L100017;
   lab_L100014: ;
SOURCE(3480, 21)
   {
      word pd109;
      pd109 = (* (( (ptr) (* (( (ptr) gf_c27708)+65)/* var_c25980 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd109 ))))((* (( (ptr) formal_c27740)+10) ), (* (( (ptr) gf_c27708)+31) ), 0, 2147483647, pd109)
      ;
      };
SOURCE(3503, 6)
   return;
   lab_L100017: ;
   }

static word NoName_Q1236(formal_c0186)
   word formal_c0186;
   {
   register ptr gf_c0185 =  (ptr) &globalframe;
SOURCE(2768, 24)
   {
      W14 var_c099;
SOURCE(3028, 774)
      if ( ( (0 != (* (( (ptr) formal_c0186)+6) )) ? ((* (( (ptr) formal_c0186)+5) ) != 0) : 0 ) ) {
         {
            W14 var_c098;
SOURCE(3119, 683)
            {
               word pd110;
               pd110 = (* (( (ptr) (* (( (ptr) gf_c0185)+72)/* var_c26716 */  ))+5) );
               (* (( (ptr) formal_c0186)+4) ) = (word) ( *( (fPt) ((*  (ptr) pd110 ))))((* ((( (ptr) formal_c0186)+4)) ), pd110);
               };
SOURCE(3163, 639)
            {
               word pd111;
               pd111 = (* (( (ptr) (* (( (ptr) gf_c0185)+64)/* var_c25948 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd111 ))))((word) &var_c098, (* (( (ptr) formal_c0186)+4) ), 0, pd111);
               };
            (* (( (ptr) formal_c0186)+4) ) = (*  (ptr) &var_c098 );
            };
         }
      else {
SOURCE(3255, 13)
         (* (( (ptr) formal_c0186)+5) ) = (* (( (ptr) formal_c0186)+4) );
SOURCE(3304, 10)
         (* (( (ptr) formal_c0186)+4) ) = 0;
         };
SOURCE(3336, 466)
      {
         word pd112;
         pd112 = (* (( (ptr) (* (( (ptr) gf_c0185)+72)/* var_c26716 */  ))+5) );
         (* (( (ptr) formal_c0186)+5) ) = (word) ( *( (fPt) ((*  (ptr) pd112 ))))((* ((( (ptr) formal_c0186)+5)) ), pd112);
         };
SOURCE(3384, 418)
      {
         word pd113;
         pd113 = (* (( (ptr) (* (( (ptr) gf_c0185)+64)/* var_c25948 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd113 ))))((word) &var_c099, (* (( (ptr) formal_c0186)+5) ), 0, pd113);
         };
      (* (( (ptr) formal_c0186)+5) ) = (*  (ptr) &var_c099 );
SOURCE(3426, 38)
      {
         word pd114;
         pd114 = (* (( (ptr) (* (( (ptr) gf_c0185)+64)/* var_c25948 */  ))+14) );
         (void) ( *( (fPt) ((*  (ptr) pd114 ))))((* (( (ptr) formal_c0186)+5) ), (word) (( (bPt) formal_c0186)+28), 0, pd114);
         };
      };
   return(0);
   }

static word EachFile_P804(fullFName_v19424, formal_c27804)
   word fullFName_v19424;
   word formal_c27804;
   {
   register ptr gf_c27772 =  (ptr) &globalframe;
   word continue_v19468;
   word ipName_v5568;
   formal_c27804 = (formal_c27804 - 28);
   /* EachFile: */ 
SOURCE(2768, 24)
SOURCE(2794, 110)
   if (((* (( (ptr) formal_c27804)+4) ) != 0)) {
      ipName_v5568 = (* (( (ptr) formal_c27804)+4) );
      }
   else {
      {
         word var_c26748;
         {
            word pd115;
            pd115 = (* (( (ptr) (* (( (ptr) gf_c27772)+63)/* var_c25756 */  ))+6) );
            var_c26748 = (word) ( *( (fPt) ((*  (ptr) pd115 ))))(fullFName_v19424, pd115);
            };
         {
            word pd116;
            pd116 = (* (( (ptr) (* (( (ptr) gf_c27772)+61)/* var_c25692 */  ))+6) );
            ipName_v5568 = (word) ( *( (fPt) ((*  (ptr) pd116 ))))(var_c26748, (* (( (ptr) gf_c27772)+30) ), pd116);
            };
         };
      };
SOURCE(2906, 16)
   continue_v19468 = 0;
SOURCE(2924, 23)
   {
      word pd117;
      pd117 = (* (( (ptr) (* (( (ptr) gf_c27772)+73)/* var_c26780 */  ))+18) );
      (void) ( *( (fPt) ((*  (ptr) pd117 ))))(pd117);
      };
SOURCE(2949, 43)
   (void) IPFromGG_P60(fullFName_v19424, ipName_v5568, (* (( (ptr) (*  (ptr) formal_c27804 ))+11) ), (* (( (ptr) (*  (ptr) formal_c27804 ))+9)
       ));
SOURCE(2994, 29)
   continue_v19468 = 1;
   (* (( (ptr) (*  (ptr) formal_c27804 ))+8) ) = 1;
SOURCE(2768, 24)
   return(continue_v19468);
   }

static void FileinSceneOnly_P180(formal_c0110, formal_c0218, formal_c0219, formal_c0220, formal_c0221)
   word formal_c0110;
   word formal_c0218;
   word formal_c0219;
   word formal_c0220;
   word formal_c0221;
   {
   W10 var_c27836;
   /* declaration of f_v3924 skipped */ 
   /* declaration of scene_v3952 skipped */ 
   /* declaration of router_v3980 skipped */ 
   /* declaration of camera_v4008 skipped */ 
   /* declaration of success_v4052 skipped */ 
   /* declaration of sceneName_v4080 skipped */ 
   (* (( (ptr) &var_c27836)+4)/* f_v3924 */  ) = formal_c0218;
   (* (( (ptr) &var_c27836)+5)/* scene_v3952 */  ) = formal_c0219;
   (* (( (ptr) &var_c27836)+6)/* router_v3980 */  ) = formal_c0220;
   (* (( (ptr) &var_c27836)+7)/* camera_v4008 */  ) = formal_c0221;
   /* FileinSceneOnly: */ 
SOURCE(4839, 1231)
SOURCE(4839, 1231)
   (* (( (ptr) &var_c27836)+8)/* success_v4052 */  ) = 0;
SOURCE(4839, 1231)
   (* (( (ptr) &var_c27836)+9)/* sceneName_v4080 */  ) = 0;
SOURCE(4990, 1080)
SOURCE(4992, 1034)
   {
      word var_c09;
      {
         word var_c0200;
         var_c0200 = (word) &var_c27836;
         var_c09 = (word) XR_Enable(( ((word)  (fPt) NoName_Q1296) ), ( ((word)  (fPt) NoName_Q1356) ), var_c0200);
         };
      if ((var_c09 == 6)) {
         goto lab_L100019;
         }
      else {
         if ((var_c09 == 5)) {
            goto lab_L100018;
            };
         };
      };
   goto lab_L100026;
   lab_L100019: ;
   lab_L100026: ;
   /* removed tail goto */ 
   lab_L100018: ;
   (*  (ptr) formal_c0110 ) = (* (( (ptr) &var_c27836)+8)/* success_v4052 */  );
   (* (( (ptr) formal_c0110)+1) ) = (* (( (ptr) &var_c27836)+9)/* sceneName_v4080 */  );
   return;
   }

static word NoName_Q1296(formal_c0190)
   word formal_c0190;
   {
   register ptr gf_c0189 =  (ptr) &globalframe;
SOURCE(5195, 13)
   {
      word version_v5612;
      word count_v5640;
      word entity_v5668 = 0;
      word finger_v5696 = 0;
      word newEntities_v5724 = 0;
SOURCE(5273, 50)
      {
         word pd118;
         pd118 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd118 ))))((* (( (ptr) formal_c0190)+4) ), (* (( (ptr) gf_c0189)+38) ), pd118);
         };
SOURCE(5325, 33)
      {
         word pd119;
         pd119 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+11) );
         (* (( (ptr) formal_c0190)+9) ) = (word) ( *( (fPt) ((*  (ptr) pd119 ))))((* ((( (ptr) formal_c0190)+4)) ), pd119);
         };
SOURCE(5360, 44)
      {
         word pd120;
         pd120 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd120 ))))((* (( (ptr) formal_c0190)+4) ), (* (( (ptr) gf_c0189)+39) ), pd120);
         };
SOURCE(5406, 31)
      {
         word pd121;
         pd121 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+27) );
         version_v5612 = (word) ( *( (fPt) ((*  (ptr) pd121 ))))((* ((( (ptr) formal_c0190)+4)) ), pd121);
         };
SOURCE(5439, 41)
      {
         word pd122;
         word x123;
         word x125;
         float tf126;
         word x127;
         pd122 = (* (( (ptr) (* (( (ptr) gf_c0189)+75)/* var_c26940 */  ))+6) );
         *(float*)&version_v5612 = (float)(int)(word) ( *( (fPt) ((*  (ptr) pd122 ))))((
               tf126 = (
                  x123 = version_v5612,  *(float*)&x123
                  ) * (
                  x125 = (*  (ptr) &fc124 ),  *(float*)&x125
                  ),  *(word*)&tf126
               ), pd122) / (
            x127 = (*  (ptr) &fc124 ),  *(float*)&x127
            );
         };
SOURCE(5526, 41)
      {
         word x128;
         word x130;
         if (((
            x128 = version_v5612,  *(float*)&x128
            ) >= (
            x130 = (*  (ptr) &fc129 ),  *(float*)&x130
            ))) {
SOURCE(5553, 14)
            (void) SkipOptions_P240((* ((( (ptr) formal_c0190)+4)) ));
            };
         };
SOURCE(5569, 34)
      {
         word pd131;
         pd131 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd131 ))))((* (( (ptr) formal_c0190)+4) ), (* (( (ptr) gf_c0189)+40) ), pd131);
         };
SOURCE(5605, 25)
      {
         word pd132;
         pd132 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd132 ))))((* (( (ptr) formal_c0190)+4) ), 91, pd132);
         };
SOURCE(5632, 28)
      {
         word pd133;
         pd133 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+25) );
         count_v5640 = (word) ( *( (fPt) ((*  (ptr) pd133 ))))((* ((( (ptr) formal_c0190)+4)) ), pd133);
         };
SOURCE(5662, 27)
      {
         word pd134;
         pd134 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd134 ))))((* (( (ptr) formal_c0190)+4) ), (* (( (ptr) gf_c0189)+41) ), pd134);
         };
SOURCE(5691, 27)
      {
         word pd135;
         pd135 = (* (( (ptr) (* (( (ptr) gf_c0189)+74)/* var_c26812 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd135 ))))((* ((( (ptr) formal_c0190)+4)) ), pd135);
         };
SOURCE(5720, 50)
      {
         W2 var_c27004;
         {
            word pd136;
            pd136 = (* (( (ptr) (* (( (ptr) gf_c0189)+76)/* var_c26972 */  ))+20) );
            (void) ( *( (fPt) ((*  (ptr) pd136 ))))((word) (&var_c27004), pd136);
            };
         finger_v5696 = var_c27004.f1;
         newEntities_v5724 = var_c27004.f0;
         };
SOURCE(5772, 168)
      {
         register word i_v5852 = 1;
         register word noName_c27036;
         noName_c27036 = count_v5640;
         if ((i_v5852 > noName_c27036)) {
            goto lab_L100022;
            };
         lab_L100025: ;
SOURCE(5799, 49)
         entity_v5668 = (word) FileinEntity_P300((* (( (ptr) formal_c0190)+4) ), version_v5612, (* (( (ptr) formal_c0190)+6) ), (* (
               ( (ptr) formal_c0190)+7) ));
SOURCE(5850, 90)
         if ((entity_v5668 != 0)) {
SOURCE(5869, 71)
            {
               W2 var_c27068;
               {
                  word pd137;
                  pd137 = (* (( (ptr) (* (( (ptr) gf_c0189)+76)/* var_c26972 */  ))+21) );
                  (void) ( *( (fPt) ((*  (ptr) pd137 ))))((word) &var_c27068, entity_v5668, newEntities_v5724, finger_v5696, pd137);
                  };
               finger_v5696 = var_c27068.f1;
               newEntities_v5724 = var_c27068.f0;
               };
            };
         if ((i_v5852 >= noName_c27036)) {
            goto lab_L100022;
            };
         i_v5852 = (i_v5852 + 1);
         goto lab_L100025;
         lab_L100022: ;
         };
SOURCE(5951, 11)
      {
         word pd138;
         pd138 = (* (( (ptr) (* (( (ptr) gf_c0189)+65)/* var_c25980 */  ))+28) );
         (void) ( *( (fPt) ((*  (ptr) pd138 ))))((* (( (ptr) formal_c0190)+4) ), 0, pd138);
         };
SOURCE(5964, 37)
      {
         word pd139;
         pd139 = (* (( (ptr) (* (( (ptr) gf_c0189)+66)/* var_c26012 */  ))+10) );
         (void) ( *( (fPt) ((*  (ptr) pd139 ))))((* (( (ptr) formal_c0190)+5) ), newEntities_v5724,  (word) -1, pd139);
         };
SOURCE(6003, 23)
      (* (( (ptr) formal_c0190)+8) ) = 1;
      (* (( (ptr) formal_c0190)+9) ) = (* (( (ptr) formal_c0190)+9) );
      return(5);
      };
   /* c2c skipped dead code */ 
   }

static void SkipOptions_P240(f_v4140)
   word f_v4140;
   {
   register ptr gf_c27868 =  (ptr) &globalframe;
   word keyWord_v5896 = 0;
   word option_v5924 = 0;
   word good_v5952;
   word nextChar_v5980;
   word twoCRsFound_v6008 = 0;
   /* SkipOptions: */ 
SOURCE(6074, 605)
SOURCE(6194, 485)
   lab_L100029: ;
   if ((0 == twoCRsFound_v6008)) {
      }
   else {
      goto lab_L100027;
      };
SOURCE(6215, 42)
   {
      W2 var_c27100;
      {
         word pd140;
         pd140 = (* (( (ptr) (* (( (ptr) gf_c27868)+74)/* var_c26812 */  ))+12) );
         (void) ( *( (fPt) ((*  (ptr) pd140 ))))((word) &var_c27100, f_v4140, pd140);
         };
      good_v5952 = var_c27100.f1;
      keyWord_v5896 = var_c27100.f0;
      };
SOURCE(6259, 114)
   if ((0 == good_v5952)) {
SOURCE(6278, 25)
      {
         word pd141;
         pd141 = (* (( (ptr) (* (( (ptr) gf_c27868)+65)/* var_c25980 */  ))+19) );
         nextChar_v5980 = (word) ( *( (fPt) ((*  (ptr) pd141 ))))(f_v4140, pd141);
         };
SOURCE(6305, 68)
      if ((0 != (word) IsEndLine_P360(nextChar_v5980))) {
SOURCE(6335, 18)
         {
            word var_c27132;
            word pd142;
            pd142 = (* (( (ptr) (* (( (ptr) gf_c27868)+65)/* var_c25980 */  ))+11) );
            var_c27132 = (word) ( *( (fPt) ((*  (ptr) pd142 ))))(f_v4140, pd142);
            };
SOURCE(6355, 18)
         twoCRsFound_v6008 = 1;
         };
SOURCE(6378, 4)
      goto lab_L100029;
      };
SOURCE(6385, 39)
   {
      word pd143;
      pd143 = (* (( (ptr) (* (( (ptr) gf_c27868)+74)/* var_c26812 */  ))+7) );
      good_v5952 = (word) ( *( (fPt) ((*  (ptr) pd143 ))))(f_v4140, pd143);
      };
SOURCE(6426, 114)
   if ((0 == good_v5952)) {
SOURCE(6445, 25)
      {
         word pd144;
         pd144 = (* (( (ptr) (* (( (ptr) gf_c27868)+65)/* var_c25980 */  ))+19) );
         nextChar_v5980 = (word) ( *( (fPt) ((*  (ptr) pd144 ))))(f_v4140, pd144);
         };
SOURCE(6472, 68)
      if ((0 != (word) IsEndLine_P360(nextChar_v5980))) {
SOURCE(6502, 18)
         {
            word var_c27164;
            word pd145;
            pd145 = (* (( (ptr) (* (( (ptr) gf_c27868)+65)/* var_c25980 */  ))+11) );
            var_c27164 = (word) ( *( (fPt) ((*  (ptr) pd145 ))))(f_v4140, pd145);
            };
SOURCE(6522, 18)
         twoCRsFound_v6008 = 1;
         };
SOURCE(6545, 4)
      goto lab_L100029;
      };
SOURCE(6552, 30)
   {
      word pd146;
      pd146 = (* (( (ptr) (* (( (ptr) gf_c27868)+74)/* var_c26812 */  ))+11) );
      option_v5924 = (word) ( *( (fPt) ((*  (ptr) pd146 ))))(f_v4140, pd146);
      };
SOURCE(6584, 25)
   {
      word pd147;
      pd147 = (* (( (ptr) (* (( (ptr) gf_c27868)+65)/* var_c25980 */  ))+19) );
      nextChar_v5980 = (word) ( *( (fPt) ((*  (ptr) pd147 ))))(f_v4140, pd147);
      };
SOURCE(6611, 68)
   if ((0 != (word) IsEndLine_P360(nextChar_v5980))) {
SOURCE(6641, 18)
      {
         word var_c27196;
         word pd148;
         pd148 = (* (( (ptr) (* (( (ptr) gf_c27868)+65)/* var_c25980 */  ))+11) );
         var_c27196 = (word) ( *( (fPt) ((*  (ptr) pd148 ))))(f_v4140, pd148);
         };
SOURCE(6661, 18)
      twoCRsFound_v6008 = 1;
      };
   goto lab_L100029;
   lab_L100027: ;
   }

static word FileinEntity_P300(f_v4200, version_v4228, router_v4256, camera_v4284)
   word f_v4200;
   word version_v4228;
   word router_v4256;
   word camera_v4284;
   {
   register ptr gf_c27900 =  (ptr) &globalframe;
   word entity_v4328;
   word nextWord_v6052 = 0;
   /* FileinEntity: */ 
SOURCE(6697, 888)
SOURCE(6697, 888)
   entity_v4328 = 0;
SOURCE(6839, 746)
   {
      word x149;
      word x151;
      if (((
         x149 = version_v4228,  *(float*)&x149
         ) > (
         x151 = (*  (ptr) &fc150 ),  *(float*)&x151
         ))) {
SOURCE(6867, 391)
         {
            word x152;
            word x154;
            if (((
               x152 = version_v4228,  *(float*)&x152
               ) >= (
               x154 = (*  (ptr) &fc153 ),  *(float*)&x154
               ))) {
SOURCE(6896, 59)
               {
                  word pd155;
                  pd155 = (* (( (ptr) (* (( (ptr) gf_c27900)+69)/* var_c26300 */  ))+70) );
                  entity_v4328 = (word) ( *( (fPt) ((*  (ptr) pd155 ))))(f_v4200, version_v4228, router_v4256, camera_v4284, 0, pd155);
                  };
               }
            else {
SOURCE(6966, 32)
               {
                  word pd156;
                  pd156 = (* (( (ptr) (* (( (ptr) gf_c27900)+74)/* var_c26812 */  ))+8) );
                  nextWord_v6052 = (word) ( *( (fPt) ((*  (ptr) pd156 ))))(f_v4200, pd156);
                  };
               {
                  word pd157;
                  pd157 = (* (( (ptr) (* (( (ptr) gf_c27900)+61)/* var_c25692 */  ))+8) );
                  if ((0 != (word) ( *( (fPt) ((*  (ptr) pd157 ))))(nextWord_v6052, (* (( (ptr) gf_c27900)+42) ), 1, pd157))) {
SOURCE(7053, 108)
                     {
                        word class_v6096;
SOURCE(7055, 53)
                        {
                           word pd158;
                           pd158 = (* (( (ptr) (* (( (ptr) gf_c27900)+77)/* var_c27228 */  ))+7) );
                           class_v6096 = (word) ( *( (fPt) ((*  (ptr) pd158 ))))((* ((( (ptr) gf_c27900)+43)) ), pd158);
                           };
SOURCE(7110, 49)
                        {
                           word pd159;
                           pd159 = (* (( (ptr) class_v6096)+20) );
                           entity_v4328 = (word) ( *( (fPt) ((*  (ptr) pd159 ))))(f_v4200, version_v4228, router_v4256, camera_v4284, pd159);
                           };
                        };
                     }
                  else {
                     {
                        word pd160;
                        pd160 = (* (( (ptr) (* (( (ptr) gf_c27900)+61)/* var_c25692 */  ))+8) );
                        if ((0 != (word) ( *( (fPt) ((*  (ptr) pd160 ))))(nextWord_v6052, (* (( (ptr) gf_c27900)+44) ), 1, pd160))) {
SOURCE(7199, 59)
                           {
/*1*/   word pd161;
/*1*/   pd161 = (* (( (ptr) (* (( (ptr) gf_c27900)+69)/* var_c26300 */  ))+70) );
/*1*/   entity_v4328 = (word) ( *( (fPt) ((*  (ptr) pd161 ))))(f_v4200, version_v4228, router_v4256, camera_v4284, 0, pd161);
/*1*/   };
                           }
                        else {
SOURCE(7274, 6)
                           (void) XR_RaiseUnnamedError();
                           };
                        };
                     };
                  };
               };
            };
         }
      else {
SOURCE(7291, 32)
         {
            word pd162;
            pd162 = (* (( (ptr) (* (( (ptr) gf_c27900)+74)/* var_c26812 */  ))+8) );
            nextWord_v6052 = (word) ( *( (fPt) ((*  (ptr) pd162 ))))(f_v4200, pd162);
            };
         {
            word pd163;
            pd163 = (* (( (ptr) (* (( (ptr) gf_c27900)+61)/* var_c25692 */  ))+8) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd163 ))))(nextWord_v6052, (* (( (ptr) gf_c27900)+42) ), 1, pd163))) {
SOURCE(7378, 108)
               {
                  word class_v6140;
SOURCE(7380, 53)
                  {
                     word pd164;
                     pd164 = (* (( (ptr) (* (( (ptr) gf_c27900)+77)/* var_c27228 */  ))+7) );
                     class_v6140 = (word) ( *( (fPt) ((*  (ptr) pd164 ))))((* ((( (ptr) gf_c27900)+43)) ), pd164);
                     };
SOURCE(7435, 49)
                  {
                     word pd165;
                     pd165 = (* (( (ptr) class_v6140)+20) );
                     entity_v4328 = (word) ( *( (fPt) ((*  (ptr) pd165 ))))(f_v4200, version_v4228, router_v4256, camera_v4284, pd165);
                     };
                  };
               }
            else {
               {
                  word pd166;
                  pd166 = (* (( (ptr) (* (( (ptr) gf_c27900)+61)/* var_c25692 */  ))+8) );
                  if ((0 != (word) ( *( (fPt) ((*  (ptr) pd166 ))))(nextWord_v6052, (* (( (ptr) gf_c27900)+45) ), 1, pd166))) {
SOURCE(7526, 59)
                     {
                        word pd167;
                        pd167 = (* (( (ptr) (* (( (ptr) gf_c27900)+69)/* var_c26300 */  ))+70) );
                        entity_v4328 = (word) ( *( (fPt) ((*  (ptr) pd167 ))))(f_v4200, version_v4228, router_v4256, camera_v4284, 0, pd167);
                        };
                     }
                  else {
SOURCE(7601, 5)
                     (void) XR_RaiseUnnamedError();
                     };
                  };
               };
            };
         };
      };
SOURCE(6697, 888)
   return(entity_v4328);
   }

static word IsEndLine_P360(c_v4388)
   word c_v4388;
   {
   word var_c4432;
   /* IsEndLine: */ 
SOURCE(7615, 71)
SOURCE(7660, 26)
   {
      word tc168;
      if ((c_v4388 == 13)) {
         tc168 =  (word)  (unsigned) 1;
         }
      else {
         tc168 =  (word)  (unsigned) (c_v4388 == 10);
         };
      return(tc168);
      };
   }

static void NoName_Q1356(formal_c0153, formal_c200012, formal_c200013, formal_c200014, formal_c200015)
   word formal_c0153;
   word formal_c200012;
   word formal_c200013;
   word formal_c200014;
   word formal_c200015;
   {
   register ptr gf_c0193 =  (ptr) &globalframe;
   if ((formal_c200013 == (* (( (ptr) (* (( (ptr) gf_c0193)+74)/* var_c26812 */  ))+4) ))) {
      {
         word position_v20608;
         word wasThere_v20636;
         word notThere_v20664;
         position_v20608 = (*  (ptr) formal_c200015 );
         wasThere_v20636 = (* (( (ptr) formal_c200015)+1) );
         notThere_v20664 = (* (( (ptr) formal_c200015)+2) );
SOURCE(5026, 152)
         {
            word var_c26844;
            {
               word var_c26876;
               word var_c26908;
               var_c26876 = XR_NewObject(12, (* (( (ptr) gf_c0193)+10) ));
               var_c26908 = var_c26876;
               (*  (ptr) var_c26908 ) = 5;
               (* (( (ptr) var_c26908)+1) ) = position_v20608;
               (* (( (ptr) var_c26908)+2) ) = XR_NewObject(12, (* (( (ptr) gf_c0193)+10) ));
               var_c26908 = (* (( (ptr) var_c26908)+2) );
               (*  (ptr) var_c26908 ) = 11;
               (* (( (ptr) var_c26908)+1) ) = wasThere_v20636;
               (* (( (ptr) var_c26908)+2) ) = XR_NewObject(12, (* (( (ptr) gf_c0193)+10) ));
               var_c26908 = (* (( (ptr) var_c26908)+2) );
               (*  (ptr) var_c26908 ) = 11;
               (* (( (ptr) var_c26908)+1) ) = notThere_v20664;
               var_c26844 = var_c26876;
               };
            {
               word pd169;
               pd169 = (* (( (ptr) (* (( (ptr) gf_c0193)+62)/* var_c25724 */  ))+13) );
               (void) ( *( (fPt) ((*  (ptr) pd169 ))))((* (( (ptr) formal_c200012)+6) ), 0, (* (( (ptr) gf_c0193)+15) ), (* (( (ptr) gf_c0193)+33)
                   ), var_c26844, pd169);
               };
            };
SOURCE(5180, 10)
         (*  (ptr) formal_c0153 ) = 2;
         (* (( (ptr) formal_c0153)+1) ) = 6;
         return;
         };
      };
   (*  (ptr) formal_c0153 ) = 0;
   (* (( (ptr) formal_c0153)+1) ) = 0;
   return;
   }

static void NoName_Q1416(formal_c0159, formal_c200008, formal_c200009, formal_c200010, formal_c200011)
   word formal_c0159;
   word formal_c200008;
   word formal_c200009;
   word formal_c200010;
   word formal_c200011;
   {
   register ptr gf_c0194 =  (ptr) &globalframe;
   if ((formal_c200009 == (*  (ptr) (* (( (ptr) (* (( (ptr) gf_c0194)+64)/* var_c25948 */  ))+4) ) ))) {
      {
         W4 error_v19020;
         error_v19020 = (*  (W4Pt) formal_c200011 );
SOURCE(2665, 89)
         if ((error_v19020.f0 != 1)) {
SOURCE(2694, 24)
            {
               word pd170;
               pd170 = (* (( (ptr) (* (( (ptr) gf_c0194)+65)/* var_c25980 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd170 ))))((* (( (ptr) (*  (ptr) formal_c200008 ))+10) ), (* (( (ptr) gf_c0194)+29) ), 0, 2147483647, pd170)
               ;
               };
SOURCE(2720, 34)
            {
               word pd171;
               pd171 = (* (( (ptr) (* (( (ptr) gf_c0194)+65)/* var_c25980 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd171 ))))((* (( (ptr) (*  (ptr) formal_c200008 ))+10) ), error_v19020.f2, 0, 2147483647, pd171)
               ;
               };
SOURCE(2756, 9)
            (*  (ptr) formal_c0159 ) = 2;
            (* (( (ptr) formal_c0159)+1) ) = 4;
            return;
            };
         };
      };
   (*  (ptr) formal_c0159 ) = 0;
   (* (( (ptr) formal_c0159)+1) ) = 0;
   return;
   }

static void NoName_Q1476(formal_c0165, formal_c200004, formal_c200005, formal_c200006, formal_c200007)
   word formal_c0165;
   word formal_c200004;
   word formal_c200005;
   word formal_c200006;
   word formal_c200007;
   {
   register ptr gf_c0195 =  (ptr) &globalframe;
   if ((formal_c200005 == (* (( (ptr) (* (( (ptr) gf_c0195)+70)/* var_c26396 */  ))+4) ))) {
      {
         word errorMsg_v17696;
         errorMsg_v17696 = (*  (ptr) formal_c200007 );
SOURCE(3788, 14)
         (* (( (ptr) formal_c200004)+5) ) = errorMsg_v17696;
SOURCE(3804, 12)
         (*  (ptr) formal_c0165 ) = 2;
         (* (( (ptr) formal_c0165)+1) ) = 3;
         return;
         };
      };
   (*  (ptr) formal_c0165 ) = 0;
   (* (( (ptr) formal_c0165)+1) ) = 0;
   return;
   }

static void NoName_Q1536(formal_c0170, formal_c200000, formal_c200001, formal_c200002, formal_c200003)
   word formal_c0170;
   word formal_c200000;
   word formal_c200001;
   word formal_c200002;
   word formal_c200003;
   {
   register ptr gf_c0196 =  (ptr) &globalframe;
   if ((formal_c200001 == (*  (ptr) (* (( (ptr) (* (( (ptr) gf_c0196)+64)/* var_c25948 */  ))+4) ) )) || (formal_c200001 == (* (
      ( (ptr) (* (( (ptr) gf_c0196)+65)/* var_c25980 */  ))+5) ))) {
SOURCE(1864, 10)
      (*  (ptr) formal_c0170 ) = 2;
      (* (( (ptr) formal_c0170)+1) ) = 2;
      return;
      };
   (*  (ptr) formal_c0170 ) = 0;
   (* (( (ptr) formal_c0170)+1) ) = 0;
   return;
   }

/* file: GGToIPImpl, module: GGToIPImpl, compiled at: July 11, 1993 7:55:48 pm PDT */ 
extern void XR_install_GGToIPImpl() {
   NoName_Q1056();
   }
extern void XR_run_GGToIPImpl() { XR_Start(&globalframe); }