/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: July 28, 1993 10:27:14 am PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: ImagerTypesPrintImpl, module: ImagerTypesPrintImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [1608299771,660301091] ImagerTypesPrintImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2;} W3;
typedef W3 *W3Pt;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W4 *W4Pt;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; word r;} W9;
typedef W9 *W9Pt;
typedef struct {W8 f; W8 r;} W16;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W16 f; W5 r;} W21;
typedef W21 *W21Pt;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
static void NoName←Q3264();
static void ImagerTypesPrintImpl←P0();
static word REFContextRepPrinter←P60();
static word REFColorRepPrinter←P120();
static word REFBoxPrinter←P180();
static word REFRectanglePrinter←P240();
static word REFExtentsPrinter←P300();
static word REFAllowedMasksPrinter←P360();
static word REFDeviceReprPrinter←P420();
static word REFDeviceStateRepPrinter←P480();
static word REFDeviceParmReprPrinter←P540();
static word REFDeviceClipperRepPrinter←P600();
static word REFFontRepPrinter←P660();
static word REFSampleBufferRepPrinter←P720();
static word REFSampleMapRepPrinter←P780();
static word REFPixelArrayRepPrinter←P840();
static word REFPixelEncodingRepPrinter←P900();
static word REFSampleEncodingRepPrinter←P960();
static word REFStructureRepPrinter←P1020();
static word REFStippleDataRepPrinter←P1080();
static word REFStateRepPrinter←P1140();
static word REFPenRepPrinter←P1200();
static word REFVECPrinter←P1260();
static word REFSFBoxPrinter←P1320();
static word REFSFVecPrinter←P1380();
static word REFTypefaceRepPrinter←P1440();
static word REFTransformationRepPrinter←P1500();
static word REFOutlineRepPrinter←P1560();
static word REFTrajectoryRepPrinter←P1620();
static word REFSCPairPrinter←P1680();
static word REFSCRealBoxPrinter←P1740();
static word REFSCRegionPrinter←P1800();
static word REFSCEdgeRepPrinter←P1860();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\074\177\166\242\300\203\113\217\044\100\164\000\000"};
static struct {unsigned f; char r[4];} string2 = {131074, "\004\017\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300ZT?\010\300\370;=;@t\000\000"};
static struct {unsigned f; char r[20];} string4 = {1048592, "\007\000\040\003\007\040\040\002\003\002\004\074\004\016\004\006\000\000\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\000\172\225\152\300\104\041\252\375\100\214\000\000"};
static struct {unsigned f; char r[16];} string6 = {851984, "\257\300\000\172\225\152\300\104\041\252\375\100\200\000\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\000\172\225\152\300\104\041\252\375\100\164\000\000"};
static struct {unsigned f; char r[16];} string8 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\100\260\000\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\100\214\000\000"};
static struct {unsigned f; char r[4];} string10 = {196611, "\004@\377"};
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\100\230\000\000"};
static struct {unsigned f; char r[4];} string12 = {131074, "\003\005\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\101\304\000\000"};
static struct {unsigned f; char r[4];} string14 = {196611, "\004C\200"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\101\334\000\000"};
static struct {unsigned f; char r[4];} string16 = {131074, "\003\004\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\046\300\267\143\300\022\215\240\122\100\244\000\000"};
static struct {unsigned f; char r[4];} string18 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\213\226\301\143\300\072\355\320\373\100\164\000\000"};
static struct {unsigned f; char r[16];} string20 = {851984, "\257\300\213\226\301\143\300\072\355\320\373\101\034\000\000"};
static struct {unsigned f; char r[12];} string21 = {655370, "\007\100\300\040\002\003\012\004\101\200\000"};
static struct {unsigned f; char r[16];} string22 = {851984, "\257\300\230\052\311\306\300\242\375\035\324\100\164\000\000"};
static struct {unsigned f; char r[4];} string23 = {196611, "\004@\360"};
static struct {unsigned f; char r[16];} string24 = {851984, "\257\300ZT?\010\300\370;=;BT\000\000"};
static struct {unsigned f; char r[12];} string25 = {524296, "\011\000\004\000\040\000\004\001\000\000\000"};
static struct {unsigned f; char r[16];} string26 = {851984, "\257\300ZT?\010\300\370;=;B`\000\000"};
static struct {unsigned f; char r[16];} string27 = {851984, "\257\300\132\124\077\010\300\370\073\075\073\100\354\000\000"};
static struct {unsigned f; char r[16];} string28 = {851984, "\257\300\207\164\301\163\300\327\135\041\305\106\214\000\000"};
static struct {unsigned f; char r[16];} string29 = {851984, "\257\300\231\275\333\246\300\032\361\021\012\100\324\000\000"};
static struct {unsigned f; char r[32];} string30 = {1900573, "\006\011\100\200\001\100\204\001\100\210\001\100\214\001\100\220\001\100\224\001\100\230\001\100\234\001\100\240\001\000\000"};
static struct {unsigned f; char r[16];} string31 = {851984, "\257\300\166\022\273\153\300\125\117\023\206\100\164\000\000"};
static struct {unsigned f; char r[16];} string32 = {851984, "\257\300\247\031\224\326\300\123\162\224\023\100\164\000\000"};
static struct {unsigned f; char r[16];} string33 = {851984, "\257\300\243\162\130\311\300\344\000\142\023\101\130\000\000"};
static struct {unsigned f; char r[16];} string34 = {851984, "\257\300\243\162\130\311\300\344\000\142\023\100\164\000\000"};
static struct {unsigned f; char r[16];} string35 = {851984, "\257\300\301\227\276\106\300\342\254\204\020\100\164\000\000"};
static struct {unsigned f; char r[4];} string36 = {196611, "\004@\357"};
static struct {unsigned f; char r[16];} string37 = {851984, "\257\300\121\117\377\026\300\315\013\026\004\100\164\000\000"};
static struct {unsigned f; char r[16];} string38 = {851984, "\257\300\354\147\236\353\300\316\347\225\106\102\060\000\000"};
static struct {unsigned f; char r[12];} string39 = {524296, "\011\000\004\040\040\000\010\001\000\000\000"};
static struct {unsigned f; char r[16];} string40 = {851984, "\257\300\354\147\236\353\300\316\347\225\106\100\340\000\000"};
static struct {unsigned f; char r[4];} string41 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string42 = {851984, "\257\300\222\214\017\031\300\363\352\337\134\100\274\000\000"};
static struct {unsigned f; char r[16];} string43 = {851984, "\257\300\012\210\021\274\300\115\201\121\025\100\164\000\000"};
static struct {unsigned f; char r[20];} string44 = {1048596, "\254\205\257\300\012\210\021\274\300\115\201\121\025\100\200\232\000\000\000"};
static struct {unsigned f; char r[16];} string45 = {851984, "\257\300\012\210\021\274\300\115\201\121\025\100\230\000\000"};
static struct {unsigned f; char r[16];} string46 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[16];} string47 = {851984, "\257\300\227\306\253\223\300\107\163\142\023\103\260\000\000"};
static struct {unsigned f; char r[20];} string48 = {1048596, "\211\004\003\107\115\124\300\212\174\364\337\300\361\376\000\156\000\000\000"};
static struct {unsigned f; char r[16];} string49 = {851984, "\257\300\231\275\333\246\300\032\361\021\012\100\310\000\000"};
static struct {unsigned f; char r[16];} string50 = {851984, "\257\300\231\275\333\246\300\032\361\021\012\100\274\000\000"};
static struct {unsigned f; char r[16];} string51 = {851984, "\257\300\231\275\333\246\300\032\361\021\012\100\200\000\000"};
static struct {unsigned f; char r[16];} string52 = {851984, "\257\300\213\226\301\143\300\072\355\320\373\103\274\000\000"};
static struct {unsigned f; char r[16];} string53 = {851984, "\257\300\270\205\022\057\300\370\127\213\112\100\214\000\000"};
static struct {unsigned f; char r[16];} string54 = {851984, "\257\300\121\117\377\026\300\315\013\026\004\101\050\000\000"};
static struct {unsigned f; char r[16];} string55 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\101\320\000\000"};
static struct {unsigned f; char r[4];} string56 = {131074, "\004\007\000"};
static struct {unsigned f; char r[4];} string57 = {65540, "\256\000\000"};
static struct {unsigned f; char r[16];} string58 = {851984, "colorOperator\000\000"};
static struct {unsigned f; char r[8];} string59 = {327688, "pixel\000\000"};
static struct {unsigned f; char r[4];} string60 = {65540, "(\000\000"};
static struct {unsigned f; char r[4];} string61 = {65540, ")\000\000"};
static struct {unsigned f; char r[4];} string62 = {131076, "op\000"};
static struct {unsigned f; char r[8];} string63 = {458760, "special"};
static struct {unsigned f; char r[8];} string64 = {262152, "type\000\000\000"};
static struct {unsigned f; char r[8];} string65 = {262152, "name\000\000\000"};
static struct {unsigned f; char r[12];} string66 = {655372, "substitute\000"};
static struct {unsigned f; char r[4];} string67 = {131076, "??\000"};
static struct {unsigned f; char r[8];} string68 = {458760, "sampled"};
static struct {unsigned f; char r[4];} string69 = {131076, "pa\000"};
static struct {unsigned f; char r[4];} string70 = {131076, "um\000"};
static struct {unsigned f; char r[16];} string71 = {786448, "sampledBlack\000\000\000"};
static struct {unsigned f; char r[8];} string72 = {327688, "clear\000\000"};
static struct {unsigned f; char r[8];} string73 = {262152, "xmin\000\000\000"};
static struct {unsigned f; char r[8];} string74 = {262152, "ymin\000\000\000"};
static struct {unsigned f; char r[8];} string75 = {262152, "xmax\000\000\000"};
static struct {unsigned f; char r[8];} string76 = {262152, "ymax\000\000\000"};
static struct {unsigned f; char r[4];} string77 = {65540, "x\000\000"};
static struct {unsigned f; char r[4];} string78 = {65540, "y\000\000"};
static struct {unsigned f; char r[4];} string79 = {65540, "w\000\000"};
static struct {unsigned f; char r[4];} string80 = {65540, "h\000\000"};
static struct {unsigned f; char r[12];} string81 = {655372, "leftExtent\000"};
static struct {unsigned f; char r[12];} string82 = {720908, "rightExtent"};
static struct {unsigned f; char r[8];} string83 = {458760, "descent"};
static struct {unsigned f; char r[8];} string84 = {393224, "ascent\000"};
static struct {unsigned f; char r[16];} string85 = {917520, "unorderedBoxes\000"};
static struct {unsigned f; char r[20];} string86 = {1048596, "multipleCoverage\000\000\000"};
static struct {unsigned f; char r[12];} string87 = {655372, "regionFill\000"};
static struct {unsigned f; char r[8];} string88 = {393224, "bitmap\000"};
static struct {unsigned f; char r[12];} string89 = {655372, "rawBitmaps\000"};
static struct {unsigned f; char r[16];} string90 = {786448, "runGroupChar\000\000\000"};
static struct {unsigned f; char r[12];} string91 = {655372, "rasterChar\000"};
static struct {unsigned f; char r[12];} string92 = {655372, "pixelArray\000"};
static struct {unsigned f; char r[8];} string93 = {327688, "works\000\000"};
static struct {unsigned f; char r[12];} string94 = {655372, "worksState\000"};
static struct {unsigned f; char r[12];} string95 = {524300, "constant\000\000\000"};
static struct {unsigned f; char r[8];} string96 = {262152, "parm\000\000\000"};
static struct {unsigned f; char r[8];} string97 = {327688, "allow\000\000"};
static struct {unsigned f; char r[8];} string98 = {393224, "bounds\000"};
static struct {unsigned f; char r[24];} string99 = {1310744, "scratchRawBitmapList\000\000\000"};
static struct {unsigned f; char r[12];} string100 = {524300, "classHas\000\000\000"};
static struct {unsigned f; char r[8];} string101 = {327688, "sSize\000\000"};
static struct {unsigned f; char r[8];} string102 = {327688, "fSize\000\000"};
static struct {unsigned f; char r[12];} string103 = {524300, "scanMode\000\000\000"};
static struct {unsigned f; char r[4];} string104 = {65540, "]\000\000"};
static struct {unsigned f; char r[20];} string105 = {1245204, "surfaceUnitsPerInch"};
static struct {unsigned f; char r[24];} string106 = {1310744, "surfaceUnitsPerPixel\000\000\000"};
static struct {unsigned f; char r[12];} string107 = {589836, "fontCache\000\000"};
static struct {unsigned f; char r[12];} string108 = {655372, "parameters\000"};
static struct {unsigned f; char r[8];} string109 = {458760, "clipBox"};
static struct {unsigned f; char r[12];} string110 = {524300, "clipMask\000\000\000"};
static struct {unsigned f; char r[16];} string111 = {786448, "charToClient\000\000\000"};
static struct {unsigned f; char r[12];} string112 = {524300, "typeface\000\000\000"};
static struct {unsigned f; char r[8];} string113 = {393224, "length\000"};
static struct {unsigned f; char r[8];} string114 = {458760, "samples"};
static struct {unsigned f; char r[4];} string115 = {196612, "box"};
static struct {unsigned f; char r[12];} string116 = {589836, "immutable\000\000"};
static struct {unsigned f; char r[16];} string117 = {851984, "bitsPerSample\000\000"};
static struct {unsigned f; char r[4];} string118 = {65540, "v\000\000"};
static struct {unsigned f; char r[8];} string119 = {393224, "raster\000"};
static struct {unsigned f; char r[12];} string120 = {720908, "bitsPerLine"};
static struct {unsigned f; char r[8];} string121 = {262152, "base\000\000\000"};
static struct {unsigned f; char r[8];} string122 = {327688, "%08xH\000\000"};
static struct {unsigned f; char r[4];} string123 = {196612, "ref"};
static struct {unsigned f; char r[8];} string124 = {393224, "object\000"};
static struct {unsigned f; char r[16];} string125 = {983056, "samplesPerPixel"};
static struct {unsigned f; char r[4];} string126 = {65540, "m\000\000"};
static struct {unsigned f; char r[8];} string127 = {262152, "word\000\000\000"};
static struct {unsigned f; char r[12];} string128 = {524300, "function\000\000\000"};
static struct {unsigned f; char r[12];} string129 = {524300, "propList\000\000\000"};
static struct {unsigned f; char r[12];} string130 = {655372, "restoreAll\000"};
static struct {unsigned f; char r[8];} string131 = {458760, "changed"};
static struct {unsigned f; char r[8];} string132 = {262152, "data\000\000\000"};
static struct {unsigned f; char r[4];} string133 = {65540, "p\000\000"};
static struct {unsigned f; char r[8];} string134 = {327688, "state\000\000"};
static struct {unsigned f; char r[4];} string135 = {131076, "np\000"};
static struct {unsigned f; char r[4];} string136 = {131076, ", \000"};
static struct {unsigned f; char r[4];} string137 = {131076, "cp\000"};
static struct {unsigned f; char r[16];} string138 = {917520, "clientToDevice\000"};
static struct {unsigned f; char r[16];} string139 = {786448, "viewToDevice\000\000\000"};
static struct {unsigned f; char r[8];} string140 = {262152, "font\000\000\000"};
static struct {unsigned f; char r[8];} string141 = {327688, "color\000\000"};
static struct {unsigned f; char r[8];} string142 = {458760, "clipper"};
static struct {unsigned f; char r[12];} string143 = {524300, "previous\000\000\000"};
static struct {unsigned f; char r[8];} string144 = {327688, "avail\000\000"};
static struct {unsigned f; char r[12];} string145 = {655372, "rasterData\000"};
static struct {unsigned f; char r[12];} string146 = {589836, "majorAxis\000\000"};
static struct {unsigned f; char r[12];} string147 = {589836, "minorAxis\000\000"};
static struct {unsigned f; char r[8];} string148 = {327688, "theta\000\000"};
static struct {unsigned f; char r[4];} string149 = {65540, "s\000\000"};
static struct {unsigned f; char r[4];} string150 = {196612, "min"};
static struct {unsigned f; char r[4];} string151 = {196612, "max"};
static struct {unsigned f; char r[4];} string152 = {65540, "f\000\000"};
static struct {unsigned f; char r[20];} string153 = {1048596, "alternateMetrics\000\000\000"};
static struct {unsigned f; char r[8];} string154 = {458760, "created"};
static struct {unsigned f; char r[4];} string155 = {131076, ": \000"};
static struct {unsigned f; char r[8];} string156 = {262152, "info\000\000\000"};
static struct {unsigned f; char r[12];} string157 = {720908, "fontExtents"};
static struct {unsigned f; char r[4];} string158 = {65540, "a\000\000"};
static struct {unsigned f; char r[4];} string159 = {65540, "b\000\000"};
static struct {unsigned f; char r[4];} string160 = {65540, "c\000\000"};
static struct {unsigned f; char r[4];} string161 = {65540, "d\000\000"};
static struct {unsigned f; char r[4];} string162 = {65540, "e\000\000"};
static struct {unsigned f; char r[4];} string163 = {131076, "tx\000"};
static struct {unsigned f; char r[4];} string164 = {131076, "ty\000"};
static struct {unsigned f; char r[16];} string165 = {786448, "integerTrans\000\000\000"};
static struct {unsigned f; char r[8];} string166 = {262152, "form\000\000\000"};
static struct {unsigned f; char r[8];} string167 = {458760, "oddWrap"};
static struct {unsigned f; char r[4];} string168 = {196612, "seq"};
static struct {unsigned f; char r[8];} string169 = {262152, "prev\000\000\000"};
static struct {unsigned f; char r[4];} string170 = {131076, "lp\000"};
static struct {unsigned f; char r[8];} string171 = {458760, "variant"};
static struct {unsigned f; char r[8];} string172 = {262152, "move\000\000\000"};
static struct {unsigned f; char r[8];} string173 = {262152, "line\000\000\000"};
static struct {unsigned f; char r[8];} string174 = {327688, "curve\000\000"};
static struct {unsigned f; char r[4];} string175 = {131076, "p1\000"};
static struct {unsigned f; char r[4];} string176 = {131076, "p2\000"};
static struct {unsigned f; char r[8];} string177 = {327688, "conic\000\000"};
static struct {unsigned f; char r[4];} string178 = {65540, "r\000\000"};
static struct {unsigned f; char r[4];} string179 = {196612, "arc"};
static struct {unsigned f; char r[8];} string180 = {262152, "sMin\000\000\000"};
static struct {unsigned f; char r[8];} string181 = {393224, "sCount\000"};
static struct {unsigned f; char r[4];} string182 = {131076, "f0\000"};
static struct {unsigned f; char r[8];} string183 = {327688, "class\000\000"};
static struct {unsigned f; char r[4];} string184 = {131076, "df\000"};
static struct {unsigned f; char r[12];} string185 = {589836, "wrapDelta\000\000"};
static struct {unsigned f; char r[8];} string186 = {262152, "link\000\000\000"};
static struct {unsigned f; char r[4];} string187 = {65540, "[\000\000"};
static struct {unsigned f; char r[16];} string188 = {851984, "\257\300\137\334\264\373\300\047\133\145\043\100\164\000\000"};
static struct {unsigned f; char r[12];} string189 = {655370, "\006\001\100\300\010\000\004\100\202\001\000"};
static struct {unsigned f; char r[16];} string190 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string191 = {851984, "\257\300\027\377\335\126\300\373\132\315\077\100\150\000\000"};
static struct {
   word f0[178]; word f178; word f179; word f180; 
   word f181; word f182; word f183; word f184; 
   word f185; word f186; word f187; word f188; 
   word f189; word f190; word f191; word f192; 
   word f193; word f194; word f195; word f196; 
   word f197; word f198; word f199; word f200; 
   word f201; word f202; word f203; word f204; 
   word f205; word f206; word f207; word f208; 
   word f209; word f210; word f211; word f212; 
   word f213; word f214; word f215; word f216; 
   word f217; word f218; word f219; word f220; 
   word f221; word f222; word f223; word f224; 
   word f225; word f226; word f227; word f228; 
   word f229; word f230; word f231; word f232; 
   word f233; word f234; word f235; word f236; 
   word f237; word f238; word f239; word f240; 
   word f241[3]; 
   } globalframe = {
   {0}, (word) REFSCEdgeRepPrinter←P1860, 0, (word) REFSCRegionPrinter←P1800, 
   0, (word) REFSCRealBoxPrinter←P1740, 0, (word) REFSCPairPrinter←P1680, 
   0, (word) REFTrajectoryRepPrinter←P1620, 0, (word) REFOutlineRepPrinter←P1560, 
   0, (word) REFTransformationRepPrinter←P1500, 0, (word) REFTypefaceRepPrinter←P1440, 
   0, (word) REFSFVecPrinter←P1380, 0, (word) REFSFBoxPrinter←P1320, 
   0, (word) REFVECPrinter←P1260, 0, (word) REFPenRepPrinter←P1200, 
   0, (word) REFStateRepPrinter←P1140, 0, (word) REFStippleDataRepPrinter←P1080, 
   0, (word) REFStructureRepPrinter←P1020, 0, (word) REFSampleEncodingRepPrinter←P960, 
   0, (word) REFPixelEncodingRepPrinter←P900, 0, (word) REFPixelArrayRepPrinter←P840, 
   0, (word) REFSampleMapRepPrinter←P780, 0, (word) REFSampleBufferRepPrinter←P720, 
   0, (word) REFFontRepPrinter←P660, 0, (word) REFDeviceClipperRepPrinter←P600, 
   0, (word) REFDeviceParmReprPrinter←P540, 0, (word) REFDeviceStateRepPrinter←P480, 
   0, (word) REFDeviceReprPrinter←P420, 0, (word) REFAllowedMasksPrinter←P360, 
   0, (word) REFExtentsPrinter←P300, 0, (word) REFRectanglePrinter←P240, 
   0, (word) REFBoxPrinter←P180, 0, (word) REFColorRepPrinter←P120, 
   0, (word) REFContextRepPrinter←P60, 0, (word) ImagerTypesPrintImpl←P0, 
   {0}
   };

static void NoName←Q3264()
   {
   register ptr gf←c0413 =  (ptr) &globalframe;
   word var←c37656;
   (* (( (ptr) gf←c0413)+4) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf←c0413)+5) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf←c0413)+6) ) = (word) XR←GetTypeIndexS((word) (&string5));
   (* (( (ptr) gf←c0413)+7) ) = (word) XR←GetTypeIndexS((word) (&string6));
   (* (( (ptr) gf←c0413)+8) ) = (word) XR←GetTypeIndexS((word) (&string7));
   (* (( (ptr) gf←c0413)+9) ) = (word) XR←GetTypeIndexS((word) (&string8));
   (* (( (ptr) gf←c0413)+10) ) = (word) XR←GetTypeIndex((word) &string9, 0, (word) &string10);
   (* (( (ptr) gf←c0413)+11) ) = (word) XR←GetTypeIndex((word) &string11, 0, (word) &string12);
   (* (( (ptr) gf←c0413)+12) ) = (word) XR←GetTypeIndex((word) &string13, 0, (word) &string14);
   (* (( (ptr) gf←c0413)+13) ) = (word) XR←GetTypeIndex((word) &string15, 0, (word) &string16);
   (* (( (ptr) gf←c0413)+14) ) = (word) XR←GetTypeIndex((word) &string17, 0, (word) &string18);
   (* (( (ptr) gf←c0413)+15) ) = (word) XR←GetTypeIndexS((word) (&string19));
   (* (( (ptr) gf←c0413)+16) ) = (word) XR←GetTypeIndex((word) &string20, 0, (word) &string21);
   (* (( (ptr) gf←c0413)+17) ) = (word) XR←GetTypeIndex((word) &string22, 0, (word) &string23);
   (* (( (ptr) gf←c0413)+18) ) = (word) XR←GetTypeIndex((word) &string24, 0, (word) &string25);
   (* (( (ptr) gf←c0413)+19) ) = (word) XR←GetTypeIndexS((word) (&string26));
   (* (( (ptr) gf←c0413)+20) ) = (word) XR←GetTypeIndex((word) &string27, 0, (word) &string18);
   (* (( (ptr) gf←c0413)+21) ) = (word) XR←GetTypeIndexS((word) (&string28));
   (* (( (ptr) gf←c0413)+22) ) = (word) XR←GetTypeIndex((word) &string29, 0, (word) &string30);
   (* (( (ptr) gf←c0413)+23) ) = (word) XR←GetTypeIndexS((word) (&string31));
   (* (( (ptr) gf←c0413)+24) ) = (word) XR←GetTypeIndexS((word) (&string32));
   (* (( (ptr) gf←c0413)+25) ) = (word) XR←GetTypeIndexS((word) (&string33));
   (* (( (ptr) gf←c0413)+26) ) = (word) XR←GetTypeIndexS((word) (&string34));
   (* (( (ptr) gf←c0413)+27) ) = (word) XR←GetTypeIndex((word) &string35, 0, (word) &string36);
   (* (( (ptr) gf←c0413)+28) ) = (word) XR←GetTypeIndexS((word) (&string37));
   (* (( (ptr) gf←c0413)+29) ) = (word) XR←GetTypeIndex((word) &string38, 0, (word) &string39);
   (* (( (ptr) gf←c0413)+30) ) = (word) XR←GetTypeIndex((word) &string40, 0, (word) &string41);
   (* (( (ptr) gf←c0413)+31) ) = (word) XR←GetTypeIndexS((word) (&string42));
   (* (( (ptr) gf←c0413)+32) ) = (word) XR←GetTypeIndexS((word) (&string43));
   (* (( (ptr) gf←c0413)+33) ) = (word) XR←GetTypeIndexS((word) (&string44));
   (* (( (ptr) gf←c0413)+34) ) = (word) XR←GetTypeIndex((word) &string45, 0, (word) &string12);
   (* (( (ptr) gf←c0413)+36) ) = (word) XR←GetTypeIndex((word) &string46, 0, (word) &string41);
   (* (( (ptr) gf←c0413)+38) ) = (word) XR←GetTypeIndexS((word) (&string47));
   (* (( (ptr) gf←c0413)+39) ) = (word) XR←GetTypeIndexS((word) (&string48));
   (* (( (ptr) gf←c0413)+40) ) = (word) XR←GetTypeIndexS((word) (&string49));
   (* (( (ptr) gf←c0413)+41) ) = (word) XR←GetTypeIndexS((word) (&string50));
   (* (( (ptr) gf←c0413)+42) ) = (word) XR←GetTypeIndexS((word) (&string51));
   (* (( (ptr) gf←c0413)+43) ) = (word) XR←GetTypeIndexS((word) (&string52));
   (* (( (ptr) gf←c0413)+44) ) = (word) XR←GetTypeIndexS((word) (&string53));
   (* (( (ptr) gf←c0413)+45) ) = (word) XR←GetTypeIndexS((word) (&string54));
   (* (( (ptr) gf←c0413)+46) ) = (word) XR←GetTypeIndex((word) &string55, 0, (word) &string56);
   (* (( (ptr) gf←c0413)+47) ) = (word) XR←GetTypeIndexS((word) (&string57));
   (*  (ptr) (( (bPt) gf←c0413)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string58);
   (*  (ptr) (( (bPt) gf←c0413)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string59);
   (*  (ptr) (( (bPt) gf←c0413)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string60);
   (*  (ptr) (( (bPt) gf←c0413)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string61);
   (*  (ptr) (( (bPt) gf←c0413)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string62);
   (*  (ptr) (( (bPt) gf←c0413)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string63);
   (*  (ptr) (( (bPt) gf←c0413)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string64);
   (*  (ptr) (( (bPt) gf←c0413)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string65);
   (*  (ptr) (( (bPt) gf←c0413)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string66);
   (*  (ptr) (( (bPt) gf←c0413)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string67);
   (*  (ptr) (( (bPt) gf←c0413)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string68);
   (*  (ptr) (( (bPt) gf←c0413)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string69);
   (*  (ptr) (( (bPt) gf←c0413)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string70);
   (*  (ptr) (( (bPt) gf←c0413)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string71);
   (*  (ptr) (( (bPt) gf←c0413)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string72);
   (*  (ptr) (( (bPt) gf←c0413)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string73);
   (*  (ptr) (( (bPt) gf←c0413)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string74);
   (*  (ptr) (( (bPt) gf←c0413)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string75);
   (*  (ptr) (( (bPt) gf←c0413)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string76);
   (*  (ptr) (( (bPt) gf←c0413)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string77);
   (*  (ptr) (( (bPt) gf←c0413)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string78);
   (*  (ptr) (( (bPt) gf←c0413)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string79);
   (*  (ptr) (( (bPt) gf←c0413)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string80);
   (*  (ptr) (( (bPt) gf←c0413)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string81);
   (*  (ptr) (( (bPt) gf←c0413)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string82);
   (*  (ptr) (( (bPt) gf←c0413)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string83);
   (*  (ptr) (( (bPt) gf←c0413)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string84);
   (*  (ptr) (( (bPt) gf←c0413)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string85);
   (*  (ptr) (( (bPt) gf←c0413)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string86);
   (*  (ptr) (( (bPt) gf←c0413)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string87);
   (*  (ptr) (( (bPt) gf←c0413)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string88);
   (*  (ptr) (( (bPt) gf←c0413)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string89);
   (*  (ptr) (( (bPt) gf←c0413)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string90);
   (*  (ptr) (( (bPt) gf←c0413)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string91);
   (*  (ptr) (( (bPt) gf←c0413)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string92);
   (*  (ptr) (( (bPt) gf←c0413)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string93);
   (*  (ptr) (( (bPt) gf←c0413)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string94);
   (*  (ptr) (( (bPt) gf←c0413)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string95);
   (*  (ptr) (( (bPt) gf←c0413)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string96);
   (*  (ptr) (( (bPt) gf←c0413)+348) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string97);
   (*  (ptr) (( (bPt) gf←c0413)+352) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string98);
   (*  (ptr) (( (bPt) gf←c0413)+356) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string99);
   (*  (ptr) (( (bPt) gf←c0413)+360) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string100);
   (*  (ptr) (( (bPt) gf←c0413)+364) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string101);
   (*  (ptr) (( (bPt) gf←c0413)+368) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string102);
   (*  (ptr) (( (bPt) gf←c0413)+372) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string103);
   (*  (ptr) (( (bPt) gf←c0413)+376) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string104);
   (*  (ptr) (( (bPt) gf←c0413)+380) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string105);
   (*  (ptr) (( (bPt) gf←c0413)+384) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string106);
   (*  (ptr) (( (bPt) gf←c0413)+388) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string107);
   (*  (ptr) (( (bPt) gf←c0413)+392) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string108);
   (*  (ptr) (( (bPt) gf←c0413)+396) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string109);
   (*  (ptr) (( (bPt) gf←c0413)+400) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string110);
   (*  (ptr) (( (bPt) gf←c0413)+404) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string111);
   (*  (ptr) (( (bPt) gf←c0413)+408) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string112);
   (*  (ptr) (( (bPt) gf←c0413)+412) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string113);
   (*  (ptr) (( (bPt) gf←c0413)+416) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string114);
   (*  (ptr) (( (bPt) gf←c0413)+420) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string115);
   (*  (ptr) (( (bPt) gf←c0413)+424) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string116);
   (*  (ptr) (( (bPt) gf←c0413)+428) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string117);
   (*  (ptr) (( (bPt) gf←c0413)+432) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string118);
   (*  (ptr) (( (bPt) gf←c0413)+436) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string119);
   (*  (ptr) (( (bPt) gf←c0413)+440) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string120);
   (*  (ptr) (( (bPt) gf←c0413)+444) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string121);
   (*  (ptr) (( (bPt) gf←c0413)+448) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string122);
   (*  (ptr) (( (bPt) gf←c0413)+452) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string123);
   (*  (ptr) (( (bPt) gf←c0413)+456) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string124);
   (*  (ptr) (( (bPt) gf←c0413)+460) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string125);
   (*  (ptr) (( (bPt) gf←c0413)+464) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string126);
   (*  (ptr) (( (bPt) gf←c0413)+468) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string127);
   (*  (ptr) (( (bPt) gf←c0413)+472) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string128);
   (*  (ptr) (( (bPt) gf←c0413)+476) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string129);
   (*  (ptr) (( (bPt) gf←c0413)+480) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string130);
   (*  (ptr) (( (bPt) gf←c0413)+484) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string131);
   (*  (ptr) (( (bPt) gf←c0413)+488) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string132);
   (*  (ptr) (( (bPt) gf←c0413)+492) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string133);
   (*  (ptr) (( (bPt) gf←c0413)+496) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string134);
   (*  (ptr) (( (bPt) gf←c0413)+500) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string135);
   (*  (ptr) (( (bPt) gf←c0413)+504) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string136);
   (*  (ptr) (( (bPt) gf←c0413)+508) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string137);
   (*  (ptr) (( (bPt) gf←c0413)+512) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string138);
   (*  (ptr) (( (bPt) gf←c0413)+516) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string139);
   (*  (ptr) (( (bPt) gf←c0413)+520) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string140);
   (*  (ptr) (( (bPt) gf←c0413)+524) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string141);
   (*  (ptr) (( (bPt) gf←c0413)+528) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string142);
   (*  (ptr) (( (bPt) gf←c0413)+532) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string143);
   (*  (ptr) (( (bPt) gf←c0413)+536) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string144);
   (*  (ptr) (( (bPt) gf←c0413)+540) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string145);
   (*  (ptr) (( (bPt) gf←c0413)+544) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string146);
   (*  (ptr) (( (bPt) gf←c0413)+548) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string147);
   (*  (ptr) (( (bPt) gf←c0413)+552) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string148);
   (*  (ptr) (( (bPt) gf←c0413)+556) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string149);
   (*  (ptr) (( (bPt) gf←c0413)+560) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string150);
   (*  (ptr) (( (bPt) gf←c0413)+564) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string151);
   (*  (ptr) (( (bPt) gf←c0413)+568) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string152);
   (*  (ptr) (( (bPt) gf←c0413)+572) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string153);
   (*  (ptr) (( (bPt) gf←c0413)+576) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string154);
   (*  (ptr) (( (bPt) gf←c0413)+580) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string155);
   (*  (ptr) (( (bPt) gf←c0413)+584) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string156);
   (*  (ptr) (( (bPt) gf←c0413)+588) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string157);
   (*  (ptr) (( (bPt) gf←c0413)+592) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string158);
   (*  (ptr) (( (bPt) gf←c0413)+596) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string159);
   (*  (ptr) (( (bPt) gf←c0413)+600) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string160);
   (*  (ptr) (( (bPt) gf←c0413)+604) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string161);
   (*  (ptr) (( (bPt) gf←c0413)+608) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string162);
   (*  (ptr) (( (bPt) gf←c0413)+612) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string163);
   (*  (ptr) (( (bPt) gf←c0413)+616) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string164);
   (*  (ptr) (( (bPt) gf←c0413)+620) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string165);
   (*  (ptr) (( (bPt) gf←c0413)+624) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string166);
   (*  (ptr) (( (bPt) gf←c0413)+628) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string167);
   (*  (ptr) (( (bPt) gf←c0413)+632) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string168);
   (*  (ptr) (( (bPt) gf←c0413)+636) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string169);
   (*  (ptr) (( (bPt) gf←c0413)+640) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string170);
   (*  (ptr) (( (bPt) gf←c0413)+644) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string171);
   (*  (ptr) (( (bPt) gf←c0413)+648) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string172);
   (*  (ptr) (( (bPt) gf←c0413)+652) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string173);
   (*  (ptr) (( (bPt) gf←c0413)+656) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string174);
   (*  (ptr) (( (bPt) gf←c0413)+660) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string175);
   (*  (ptr) (( (bPt) gf←c0413)+664) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string176);
   (*  (ptr) (( (bPt) gf←c0413)+668) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string177);
   (*  (ptr) (( (bPt) gf←c0413)+672) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string178);
   (*  (ptr) (( (bPt) gf←c0413)+676) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string179);
   (*  (ptr) (( (bPt) gf←c0413)+680) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string180);
   (*  (ptr) (( (bPt) gf←c0413)+684) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string181);
   (*  (ptr) (( (bPt) gf←c0413)+688) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string182);
   (*  (ptr) (( (bPt) gf←c0413)+692) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string183);
   (*  (ptr) (( (bPt) gf←c0413)+696) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string184);
   (*  (ptr) (( (bPt) gf←c0413)+700) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string185);
   (*  (ptr) (( (bPt) gf←c0413)+704) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string186);
   (*  (ptr) (( (bPt) gf←c0413)+708) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0413)+36) ), (word) &string187);
   (void) XR←DeclareGlobalFrame((word) "ImagerTypesPrintImpl", &globalframe, (word) XR←GetTypeIndex((word) &string188, 0, (word) &string189)
      , (word) (( (bPt) gf←c0413)+960)/* var←c30488 */ );
   var←c37656 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string190)), 103);
   (* (( (ptr) gf←c0413)+243)/* var←c30552 */  ) = var←c37656;
   (void) XR←ImportProcS(var←c37656, 799490);
   (void) XR←ImportProcS(var←c37656, 1063171);
   (void) XR←ImportProcS(var←c37656, 1071364);
   var←c37656 = (word) XR←ImportInterface((word) "RefPrint", (word) XR←GetTypeIndexS((word) (&string191)), 5);
   (* (( (ptr) gf←c0413)+242)/* var←c30520 */  ) = var←c37656;
   (void) XR←ImportProcS(var←c37656, 67633922);
   (void) XR←ImportProcS(var←c37656, 67634178);
   (void) XR←ImportProcS(var←c37656, 524290);
   }

static void ImagerTypesPrintImpl←P0(formal←c039, formal←c038)
   word formal←c039;
   word formal←c038;
   {
   register ptr gf←c37688 =  (ptr) &globalframe;
   /* ImagerTypesPrintImpl: */ 
SOURCE(219, 33100)
SOURCE(31102, 69)
   {
      word pd192;
      pd192 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd192 ))))((word) (( (bPt) gf←c37688)+952)/* var←c30456 */ , (* (( (ptr) gf←c37688)+4) ), pd192)
      ;
      };
SOURCE(31173, 65)
   {
      word pd193;
      pd193 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd193 ))))((word) (( (bPt) gf←c37688)+944)/* var←c30424 */ , (* (( (ptr) gf←c37688)+5) ), pd193)
      ;
      };
SOURCE(31240, 55)
   {
      word pd194;
      pd194 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd194 ))))((word) (( (bPt) gf←c37688)+936)/* var←c30392 */ , (* (( (ptr) gf←c37688)+6) ), pd194)
      ;
      };
SOURCE(31297, 67)
   {
      word pd195;
      pd195 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd195 ))))((word) (( (bPt) gf←c37688)+928)/* var←c30360 */ , (* (( (ptr) gf←c37688)+7) ), pd195)
      ;
      };
SOURCE(31366, 63)
   {
      word pd196;
      pd196 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd196 ))))((word) (( (bPt) gf←c37688)+920)/* var←c30328 */ , (* (( (ptr) gf←c37688)+8) ), pd196)
      ;
      };
SOURCE(31431, 73)
   {
      word pd197;
      pd197 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd197 ))))((word) (( (bPt) gf←c37688)+912)/* var←c30296 */ , (* (( (ptr) gf←c37688)+9) ), pd197)
      ;
      };
SOURCE(31506, 69)
   {
      word pd198;
      pd198 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd198 ))))((word) (( (bPt) gf←c37688)+904)/* var←c30264 */ , (* (( (ptr) gf←c37688)+10) ), pd198)
      ;
      };
SOURCE(31577, 77)
   {
      word pd199;
      pd199 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd199 ))))((word) (( (bPt) gf←c37688)+896)/* var←c30232 */ , (* (( (ptr) gf←c37688)+11) ), pd199)
      ;
      };
SOURCE(31656, 77)
   {
      word pd200;
      pd200 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd200 ))))((word) (( (bPt) gf←c37688)+888)/* var←c30200 */ , (* (( (ptr) gf←c37688)+12) ), pd200)
      ;
      };
SOURCE(31735, 81)
   {
      word pd201;
      pd201 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd201 ))))((word) (( (bPt) gf←c37688)+880)/* var←c30168 */ , (* (( (ptr) gf←c37688)+13) ), pd201)
      ;
      };
SOURCE(31818, 63)
   {
      word pd202;
      pd202 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd202 ))))((word) (( (bPt) gf←c37688)+872)/* var←c30136 */ , (* (( (ptr) gf←c37688)+14) ), pd202)
      ;
      };
SOURCE(31883, 79)
   {
      word pd203;
      pd203 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd203 ))))((word) (( (bPt) gf←c37688)+864)/* var←c30104 */ , (* (( (ptr) gf←c37688)+15) ), pd203)
      ;
      };
SOURCE(31964, 73)
   {
      word pd204;
      pd204 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd204 ))))((word) (( (bPt) gf←c37688)+856)/* var←c30072 */ , (* (( (ptr) gf←c37688)+16) ), pd204)
      ;
      };
SOURCE(32039, 75)
   {
      word pd205;
      pd205 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd205 ))))((word) (( (bPt) gf←c37688)+848)/* var←c30040 */ , (* (( (ptr) gf←c37688)+17) ), pd205)
      ;
      };
SOURCE(32116, 81)
   {
      word pd206;
      pd206 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd206 ))))((word) (( (bPt) gf←c37688)+840)/* var←c30008 */ , (* (( (ptr) gf←c37688)+18) ), pd206)
      ;
      };
SOURCE(32199, 83)
   {
      word pd207;
      pd207 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd207 ))))((word) (( (bPt) gf←c37688)+832)/* var←c29976 */ , (* (( (ptr) gf←c37688)+19) ), pd207)
      ;
      };
SOURCE(32284, 73)
   {
      word pd208;
      pd208 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd208 ))))((word) (( (bPt) gf←c37688)+824)/* var←c29944 */ , (* (( (ptr) gf←c37688)+20) ), pd208)
      ;
      };
SOURCE(32359, 77)
   {
      word pd209;
      pd209 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd209 ))))((word) (( (bPt) gf←c37688)+816)/* var←c29912 */ , (* (( (ptr) gf←c37688)+21) ), pd209)
      ;
      };
SOURCE(32438, 65)
   {
      word pd210;
      pd210 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd210 ))))((word) (( (bPt) gf←c37688)+808)/* var←c29880 */ , (* (( (ptr) gf←c37688)+22) ), pd210)
      ;
      };
SOURCE(32505, 61)
   {
      word pd211;
      pd211 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd211 ))))((word) (( (bPt) gf←c37688)+800)/* var←c29848 */ , (* (( (ptr) gf←c37688)+23) ), pd211)
      ;
      };
SOURCE(32568, 55)
   {
      word pd212;
      pd212 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd212 ))))((word) (( (bPt) gf←c37688)+792)/* var←c29816 */ , (* (( (ptr) gf←c37688)+24) ), pd212)
      ;
      };
SOURCE(32625, 59)
   {
      word pd213;
      pd213 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd213 ))))((word) (( (bPt) gf←c37688)+784)/* var←c29784 */ , (* (( (ptr) gf←c37688)+25) ), pd213)
      ;
      };
SOURCE(32686, 59)
   {
      word pd214;
      pd214 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd214 ))))((word) (( (bPt) gf←c37688)+776)/* var←c29752 */ , (* (( (ptr) gf←c37688)+26) ), pd214)
      ;
      };
SOURCE(32747, 71)
   {
      word pd215;
      pd215 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd215 ))))((word) (( (bPt) gf←c37688)+768)/* var←c29720 */ , (* (( (ptr) gf←c37688)+27) ), pd215)
      ;
      };
SOURCE(32820, 83)
   {
      word pd216;
      pd216 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd216 ))))((word) (( (bPt) gf←c37688)+760)/* var←c29688 */ , (* (( (ptr) gf←c37688)+28) ), pd216)
      ;
      };
SOURCE(32905, 69)
   {
      word pd217;
      pd217 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd217 ))))((word) (( (bPt) gf←c37688)+752)/* var←c29656 */ , (* (( (ptr) gf←c37688)+29) ), pd217)
      ;
      };
SOURCE(32976, 75)
   {
      word pd218;
      pd218 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd218 ))))((word) (( (bPt) gf←c37688)+744)/* var←c29624 */ , (* (( (ptr) gf←c37688)+30) ), pd218)
      ;
      };
SOURCE(33053, 61)
   {
      word pd219;
      pd219 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd219 ))))((word) (( (bPt) gf←c37688)+736)/* var←c29592 */ , (* (( (ptr) gf←c37688)+31) ), pd219)
      ;
      };
SOURCE(33116, 67)
   {
      word pd220;
      pd220 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd220 ))))((word) (( (bPt) gf←c37688)+728)/* var←c29560 */ , (* (( (ptr) gf←c37688)+32) ), pd220)
      ;
      };
SOURCE(33185, 65)
   {
      word pd221;
      pd221 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd221 ))))((word) (( (bPt) gf←c37688)+720)/* var←c29528 */ , (* (( (ptr) gf←c37688)+33) ), pd221)
      ;
      };
SOURCE(33252, 67)
   {
      word pd222;
      pd222 = (* (( (ptr) (* (( (ptr) gf←c37688)+242)/* var←c30520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd222 ))))((word) (( (bPt) gf←c37688)+712)/* var←c29496 */ , (* (( (ptr) gf←c37688)+34) ), pd222)
      ;
      };
   }

static word REFContextRepPrinter←P60(stream←v7400, ref←v7428)
   word stream←v7400;
   word ref←v7428;
   {
   register ptr gf←c37720 =  (ptr) &globalframe;
   word ok←v7472;
   word refContextRep←v3776;
   /* REFContextRepPrinter: */ 
SOURCE(304, 720)
SOURCE(304, 720)
   ok←v7472 = 1;
SOURCE(354, 55)
   refContextRep←v3776 = XR←Narrow(ref←v7428, (* (( (ptr) gf←c37720)+4) ));
SOURCE(413, 23)
   {
      word pd223;
      pd223 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd223 ))))(stream←v7400, (* (( (ptr) gf←c37720)+177) ), 0, 2147483647, pd223);
      };
SOURCE(440, 27)
   {
      word pd224;
      pd224 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd224 ))))(stream←v7400, (* (( (ptr) gf←c37720)+173) ), 0, 2147483647, pd224);
      };
SOURCE(471, 24)
   {
      word pd225;
      pd225 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd225 ))))(stream←v7400, (* (( (ptr) gf←c37720)+145) ), 0, 2147483647, pd225);
      };
SOURCE(499, 51)
   {
      word var←c30584;
      word pd226;
      pd226 = (* (( (ptr) (* (( (ptr) gf←c37720)+242)/* var←c30520 */  ))+8) );
      var←c30584 = (word) ( *( (fPt) ((*  (ptr) pd226 ))))(stream←v7400, (*  (ptr) refContextRep←v3776 ), pd226);
      };
SOURCE(554, 24)
   {
      word pd227;
      pd227 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd227 ))))(stream←v7400, (* (( (ptr) gf←c37720)+126) ), 0, 2147483647, pd227);
      };
SOURCE(582, 27)
   {
      word pd228;
      pd228 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd228 ))))(stream←v7400, (* (( (ptr) gf←c37720)+124) ), 0, 2147483647, pd228);
      };
SOURCE(613, 24)
   {
      word pd229;
      pd229 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd229 ))))(stream←v7400, (* (( (ptr) gf←c37720)+145) ), 0, 2147483647, pd229);
      };
SOURCE(641, 51)
   {
      word var←c30616;
      word pd230;
      pd230 = (* (( (ptr) (* (( (ptr) gf←c37720)+242)/* var←c30520 */  ))+8) );
      var←c30616 = (word) ( *( (fPt) ((*  (ptr) pd230 ))))(stream←v7400, (* (( (ptr) refContextRep←v3776)+1) ), pd230);
      };
SOURCE(696, 24)
   {
      word pd231;
      pd231 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd231 ))))(stream←v7400, (* (( (ptr) gf←c37720)+126) ), 0, 2147483647, pd231);
      };
SOURCE(724, 26)
   {
      word pd232;
      pd232 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd232 ))))(stream←v7400, (* (( (ptr) gf←c37720)+122) ), 0, 2147483647, pd232);
      };
SOURCE(754, 24)
   {
      word pd233;
      pd233 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd233 ))))(stream←v7400, (* (( (ptr) gf←c37720)+145) ), 0, 2147483647, pd233);
      };
SOURCE(782, 50)
   {
      word var←c30648;
      word pd234;
      pd234 = (* (( (ptr) (* (( (ptr) gf←c37720)+242)/* var←c30520 */  ))+8) );
      var←c30648 = (word) ( *( (fPt) ((*  (ptr) pd234 ))))(stream←v7400, (* (( (ptr) refContextRep←v3776)+2) ), pd234);
      };
SOURCE(836, 24)
   {
      word pd235;
      pd235 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd235 ))))(stream←v7400, (* (( (ptr) gf←c37720)+126) ), 0, 2147483647, pd235);
      };
SOURCE(864, 30)
   {
      word pd236;
      pd236 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd236 ))))(stream←v7400, (* (( (ptr) gf←c37720)+119) ), 0, 2147483647, pd236);
      };
SOURCE(898, 24)
   {
      word pd237;
      pd237 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd237 ))))(stream←v7400, (* (( (ptr) gf←c37720)+145) ), 0, 2147483647, pd237);
      };
SOURCE(926, 71)
   {
      W2 var←c30680;
      var←c30680.f0 = 4;
      var←c30680.f1 = (* (( (ptr) refContextRep←v3776)+3) );
      {
         word pd238;
         pd238 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd238 ))))(stream←v7400, (* (( (ptr) gf←c37720)+112) ), var←c30680, pd238);
         };
      };
SOURCE(1001, 23)
   {
      word pd239;
      pd239 = (* (( (ptr) (* (( (ptr) gf←c37720)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd239 ))))(stream←v7400, (* (( (ptr) gf←c37720)+94) ), 0, 2147483647, pd239);
      };
SOURCE(304, 720)
   return(ok←v7472);
   }

static word REFColorRepPrinter←P120(stream←v7532, ref←v7560)
   word stream←v7532;
   word ref←v7560;
   {
   register ptr gf←c37752 =  (ptr) &globalframe;
   word ok←v7604;
   word refColorRep←v3832;
   /* REFColorRepPrinter: */ 
SOURCE(1031, 2829)
SOURCE(1031, 2829)
   ok←v7604 = 1;
SOURCE(1079, 51)
   refColorRep←v3832 = XR←Narrow(ref←v7560, (* (( (ptr) gf←c37752)+5) ));
SOURCE(1134, 23)
   {
      word pd240;
      pd240 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd240 ))))(stream←v7532, (* (( (ptr) gf←c37752)+177) ), 0, 2147483647, pd240);
      };
SOURCE(1161, 2672)
   {
      word var←c30712;
      var←c30712 = refColorRep←v3832;
      if ((var←c30712 == 0)) {
         goto lab←L100000;
         };
      {
         word var←c31320;
         var←c31320 = (*  (ptr) var←c30712 );
         switch (var←c31320) {
            case 0: 
               {
                  word x←v3888;
                  x←v3888 = var←c30712;
SOURCE(1238, 30)
                  {
                     word pd241;
                     pd241 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd241 ))))(stream←v7532, (* (( (ptr) gf←c37752)+85) ), 0, 2147483647, pd241);
                     };
SOURCE(1272, 23)
                  {
                     word pd242;
                     pd242 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd242 ))))(stream←v7532, (* (( (ptr) gf←c37752)+177) ), 0, 2147483647, pd242);
                     };
SOURCE(1299, 1442)
                  {
                     word var←c30744;
                     var←c30744 = x←v3888;
                     if ((var←c30744 == 0)) {
                        goto lab←L100001;
                        };
                     {
                        word var←c31096;
                        var←c31096 = (* (( (ptr) var←c30744)+1) );
                        if ((var←c31096 == 0)) {
                           {
/*1*/   word x←v3944;
/*1*/   x←v3944 = var←c30744;
SOURCE(1369, 24)
/*1*/   {
/*1*/      word pd243;
/*1*/      pd243 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd243 ))))(stream←v7532, (* (( (ptr) gf←c37752)+52) ), 0, 2147483647, pd243);
/*1*/      };
SOURCE(1397, 23)
/*1*/   {
/*1*/      word pd244;
/*1*/      pd244 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd244 ))))(stream←v7532, (* (( (ptr) gf←c37752)+177) ), 0, 2147483647, pd244);
/*1*/      };
SOURCE(1424, 35)
/*1*/   {
/*1*/      word pd245;
/*1*/      pd245 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd245 ))))(stream←v7532, (* (( (ptr) gf←c37752)+48) ), 0, 2147483647, pd245);
/*1*/      };
SOURCE(1463, 24)
/*1*/   {
/*1*/      word pd246;
/*1*/      pd246 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd246 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd246);
/*1*/      };
SOURCE(1491, 47)
/*1*/   {
/*1*/      word var←c30776;
/*1*/      word pd247;
/*1*/      pd247 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
/*1*/      var←c30776 = (word) ( *( (fPt) ((*  (ptr) pd247 ))))(stream←v7532, (* (( (ptr) x←v3944)+2) ), pd247);
/*1*/      };
SOURCE(1542, 24)
/*1*/   {
/*1*/      word pd248;
/*1*/      pd248 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd248 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd248);
/*1*/      };
SOURCE(1570, 27)
/*1*/   {
/*1*/      word pd249;
/*1*/      pd249 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd249 ))))(stream←v7532, (* (( (ptr) gf←c37752)+49) ), 0, 2147483647, pd249);
/*1*/      };
SOURCE(1601, 24)
/*1*/   {
/*1*/      word pd250;
/*1*/      pd250 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd250 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd250);
/*1*/      };
SOURCE(1629, 361)
/*1*/   {
/*1*/      word first←v4000 = 1;
SOURCE(1659, 23)
/*1*/      {
/*1*/         word pd251;
/*1*/         pd251 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd251 ))))(stream←v7532, (* (( (ptr) gf←c37752)+50) ), 0, 2147483647, pd251);
/*1*/         };
SOURCE(1686, 49)
/*1*/      {
/*1*/         W2 var←c30808;
/*1*/         var←c30808.f0 = 5;
/*1*/         var←c30808.f1 = (* (( (ptr) x←v3944)+3) );
/*1*/         {
/*1*/            word pd252;
/*1*/            pd252 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+55) );
/*1*/            (void) ( *( (fPt) ((*  (ptr) pd252 ))))(stream←v7532, var←c30808, pd252);
/*1*/            };
/*1*/         };
SOURCE(1739, 23)
/*1*/      {
/*1*/         word pd253;
/*1*/         pd253 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd253 ))))(stream←v7532, (* (( (ptr) gf←c37752)+51) ), 0, 2147483647, pd253);
/*1*/         };
SOURCE(1766, 23)
/*1*/      {
/*1*/         word pd254;
/*1*/         pd254 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd254 ))))(stream←v7532, (* (( (ptr) gf←c37752)+177) ), 0, 2147483647, pd254);
/*1*/         };
SOURCE(1793, 180)
/*1*/      {
/*1*/         register word i←v4044 = 0;
/*1*/         register word noName←c30840;
/*1*/         noName←c30840 = (* (( (ptr) x←v3944)+3) );
/*1*/         if ((i←v4044 >= noName←c30840)) {
/*1*/            goto lab←L100002;
/*1*/            };
/*1*/         lab←L100005: ;
SOURCE(1838, 57)
/*1*/         if ((0 != first←v4000)) {
SOURCE(1852, 19)
/*1*/            first←v4000 = 0;
/*1*/            }
/*1*/         else {
SOURCE(1871, 24)
/*1*/            {
/*1*/               word pd255;
/*1*/               pd255 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/               (void) ( *( (fPt) ((*  (ptr) pd255 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd255);
/*1*/               };
/*1*/            };
SOURCE(1901, 72)
/*1*/         {
/*1*/            word var←c30936;
/*1*/            {
/*1*/               word var←c30872;
/*1*/               {
/*1*/                  word var←c30904;
/*1*/                  var←c30904 = XR←NewObject(4, (* (( (ptr) gf←c37752)+47) ));
/*1*/                  {
/*1*/                     word limit256;
/*1*/                     (*  (ptr) var←c30904 ) = (* ((( (ptr) x←v3944)+4)+(
/*1*/                           limit256 = (* (( (ptr) x←v3944)+3) ),
/*1*/                           BCK(i←v4044, limit256)
/*1*/                           )) );
/*1*/                     };
/*1*/                  var←c30872 = var←c30904;
/*1*/                  };
/*1*/               {
/*1*/                  word pd257;
/*1*/                  pd257 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+7) );
/*1*/                  var←c30936 = (word) ( *( (fPt) ((*  (ptr) pd257 ))))(stream←v7532, var←c30872, pd257);
/*1*/                  };
/*1*/               };
/*1*/            };
/*1*/         i←v4044 = (i←v4044 + 1);
/*1*/         if ((i←v4044 < noName←c30840)) {
/*1*/            goto lab←L100005;
/*1*/            };
/*1*/         lab←L100002: ;
/*1*/         };
/*1*/      };
SOURCE(1997, 23)
/*1*/   {
/*1*/      word pd258;
/*1*/      pd258 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd258 ))))(stream←v7532, (* (( (ptr) gf←c37752)+94) ), 0, 2147483647, pd258);
/*1*/      };
SOURCE(2024, 23)
/*1*/   {
/*1*/      word pd259;
/*1*/      pd259 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd259 ))))(stream←v7532, (* (( (ptr) gf←c37752)+94) ), 0, 2147483647, pd259);
/*1*/      };
/*1*/   };
                           }
                        else {
                           if ((var←c31096 == 1)) {
/*1*/   {
/*1*/      word x←v4088;
/*1*/      x←v4088 = var←c30744;
SOURCE(2112, 29)
/*1*/      {
/*1*/         word pd260;
/*1*/         pd260 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd260 ))))(stream←v7532, (* (( (ptr) gf←c37752)+53) ), 0, 2147483647, pd260);
/*1*/         };
SOURCE(2145, 23)
/*1*/      {
/*1*/         word pd261;
/*1*/         pd261 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd261 ))))(stream←v7532, (* (( (ptr) gf←c37752)+177) ), 0, 2147483647, pd261);
/*1*/         };
SOURCE(2172, 26)
/*1*/      {
/*1*/         word pd262;
/*1*/         pd262 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd262 ))))(stream←v7532, (* (( (ptr) gf←c37752)+54) ), 0, 2147483647, pd262);
/*1*/         };
SOURCE(2202, 24)
/*1*/      {
/*1*/         word pd263;
/*1*/         pd263 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd263 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd263);
/*1*/         };
SOURCE(2230, 38)
/*1*/      {
/*1*/         word var←c30968;
/*1*/         word pd264;
/*1*/         pd264 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
/*1*/         var←c30968 = (word) ( *( (fPt) ((*  (ptr) pd264 ))))(stream←v7532, (* (( (ptr) x←v4088)+2) ), pd264);
/*1*/         };
SOURCE(2272, 24)
/*1*/      {
/*1*/         word pd265;
/*1*/         pd265 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd265 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd265);
/*1*/         };
SOURCE(2300, 26)
/*1*/      {
/*1*/         word pd266;
/*1*/         pd266 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd266 ))))(stream←v7532, (* (( (ptr) gf←c37752)+55) ), 0, 2147483647, pd266);
/*1*/         };
SOURCE(2330, 24)
/*1*/      {
/*1*/         word pd267;
/*1*/         pd267 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd267 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd267);
/*1*/         };
SOURCE(2358, 38)
/*1*/      {
/*1*/         word var←c31000;
/*1*/         word pd268;
/*1*/         pd268 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
/*1*/         var←c31000 = (word) ( *( (fPt) ((*  (ptr) pd268 ))))(stream←v7532, (* (( (ptr) x←v4088)+3) ), pd268);
/*1*/         };
SOURCE(2400, 24)
/*1*/      {
/*1*/         word pd269;
/*1*/         pd269 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd269 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd269);
/*1*/         };
SOURCE(2428, 26)
/*1*/      {
/*1*/         word pd270;
/*1*/         pd270 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd270 ))))(stream←v7532, (* (( (ptr) gf←c37752)+122) ), 0, 2147483647, pd270);
/*1*/         };
SOURCE(2458, 24)
/*1*/      {
/*1*/         word pd271;
/*1*/         pd271 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd271 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd271);
/*1*/         };
SOURCE(2486, 38)
/*1*/      {
/*1*/         word var←c31032;
/*1*/         word pd272;
/*1*/         pd272 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
/*1*/         var←c31032 = (word) ( *( (fPt) ((*  (ptr) pd272 ))))(stream←v7532, (* (( (ptr) x←v4088)+4) ), pd272);
/*1*/         };
SOURCE(2528, 24)
/*1*/      {
/*1*/         word pd273;
/*1*/         pd273 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd273 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd273);
/*1*/         };
SOURCE(2556, 32)
/*1*/      {
/*1*/         word pd274;
/*1*/         pd274 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd274 ))))(stream←v7532, (* (( (ptr) gf←c37752)+56) ), 0, 2147483647, pd274);
/*1*/         };
SOURCE(2592, 24)
/*1*/      {
/*1*/         word pd275;
/*1*/         pd275 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd275 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd275);
/*1*/         };
SOURCE(2620, 44)
/*1*/      {
/*1*/         word var←c31064;
/*1*/         word pd276;
/*1*/         pd276 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
/*1*/         var←c31064 = (word) ( *( (fPt) ((*  (ptr) pd276 ))))(stream←v7532, (* (( (ptr) x←v4088)+5) ), pd276);
/*1*/         };
SOURCE(2668, 23)
/*1*/      {
/*1*/         word pd277;
/*1*/         pd277 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd277 ))))(stream←v7532, (* (( (ptr) gf←c37752)+94) ), 0, 2147483647, pd277);
/*1*/         };
/*1*/      };
/*1*/   }
                           else {
/*1*/   lab←L100001: ;
SOURCE(2717, 24)
/*1*/   {
/*1*/      word pd278;
/*1*/      pd278 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd278 ))))(stream←v7532, (* (( (ptr) gf←c37752)+57) ), 0, 2147483647, pd278);
/*1*/      };
/*1*/   };
                           };
                        };
                     };
SOURCE(2745, 23)
                  {
                     word pd279;
                     pd279 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd279 ))))(stream←v7532, (* (( (ptr) gf←c37752)+94) ), 0, 2147483647, pd279);
                     };
                  };
               break;
            case 1: 
               {
                  word x←v4144;
                  x←v4144 = var←c30712;
SOURCE(2824, 29)
                  {
                     word pd280;
                     pd280 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd280 ))))(stream←v7532, (* (( (ptr) gf←c37752)+58) ), 0, 2147483647, pd280);
                     };
SOURCE(2857, 23)
                  {
                     word pd281;
                     pd281 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd281 ))))(stream←v7532, (* (( (ptr) gf←c37752)+177) ), 0, 2147483647, pd281);
                     };
SOURCE(2884, 24)
                  {
                     word pd282;
                     pd282 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd282 ))))(stream←v7532, (* (( (ptr) gf←c37752)+59) ), 0, 2147483647, pd282);
                     };
SOURCE(2912, 24)
                  {
                     word pd283;
                     pd283 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd283 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd283);
                     };
SOURCE(2940, 36)
                  {
                     word var←c31128;
                     word pd284;
                     pd284 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
                     var←c31128 = (word) ( *( (fPt) ((*  (ptr) pd284 ))))(stream←v7532, (* (( (ptr) x←v4144)+1) ), pd284);
                     };
SOURCE(2980, 24)
                  {
                     word pd285;
                     pd285 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd285 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd285);
                     };
SOURCE(3008, 24)
                  {
                     word pd286;
                     pd286 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd286 ))))(stream←v7532, (* (( (ptr) gf←c37752)+60) ), 0, 2147483647, pd286);
                     };
SOURCE(3036, 24)
                  {
                     word pd287;
                     pd287 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd287 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd287);
                     };
SOURCE(3064, 36)
                  {
                     word var←c31160;
                     word pd288;
                     pd288 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
                     var←c31160 = (word) ( *( (fPt) ((*  (ptr) pd288 ))))(stream←v7532, (* (( (ptr) x←v4144)+2) ), pd288);
                     };
SOURCE(3104, 24)
                  {
                     word pd289;
                     pd289 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd289 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd289);
                     };
SOURCE(3132, 35)
                  {
                     word pd290;
                     pd290 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd290 ))))(stream←v7532, (* (( (ptr) gf←c37752)+48) ), 0, 2147483647, pd290);
                     };
SOURCE(3171, 24)
                  {
                     word pd291;
                     pd291 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd291 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd291);
                     };
SOURCE(3199, 47)
                  {
                     word var←c31192;
                     word pd292;
                     pd292 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
                     var←c31192 = (word) ( *( (fPt) ((*  (ptr) pd292 ))))(stream←v7532, (* (( (ptr) x←v4144)+3) ), pd292);
                     };
SOURCE(3250, 23)
                  {
                     word pd293;
                     pd293 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd293 ))))(stream←v7532, (* (( (ptr) gf←c37752)+94) ), 0, 2147483647, pd293);
                     };
                  };
               break;
            case 2: 
               {
                  word x←v4200;
                  x←v4200 = var←c30712;
SOURCE(3334, 34)
                  {
                     word pd294;
                     pd294 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd294 ))))(stream←v7532, (* (( (ptr) gf←c37752)+61) ), 0, 2147483647, pd294);
                     };
SOURCE(3372, 23)
                  {
                     word pd295;
                     pd295 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd295 ))))(stream←v7532, (* (( (ptr) gf←c37752)+177) ), 0, 2147483647, pd295);
                     };
SOURCE(3399, 24)
                  {
                     word pd296;
                     pd296 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd296 ))))(stream←v7532, (* (( (ptr) gf←c37752)+59) ), 0, 2147483647, pd296);
                     };
SOURCE(3427, 24)
                  {
                     word pd297;
                     pd297 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd297 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd297);
                     };
SOURCE(3455, 36)
                  {
                     word var←c31224;
                     word pd298;
                     pd298 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
                     var←c31224 = (word) ( *( (fPt) ((*  (ptr) pd298 ))))(stream←v7532, (* (( (ptr) x←v4200)+1) ), pd298);
                     };
SOURCE(3495, 24)
                  {
                     word pd299;
                     pd299 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd299 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd299);
                     };
SOURCE(3523, 24)
                  {
                     word pd300;
                     pd300 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd300 ))))(stream←v7532, (* (( (ptr) gf←c37752)+60) ), 0, 2147483647, pd300);
                     };
SOURCE(3551, 24)
                  {
                     word pd301;
                     pd301 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd301 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd301);
                     };
SOURCE(3579, 36)
                  {
                     word var←c31256;
                     word pd302;
                     pd302 = (* (( (ptr) (* (( (ptr) gf←c37752)+242)/* var←c30520 */  ))+8) );
                     var←c31256 = (word) ( *( (fPt) ((*  (ptr) pd302 ))))(stream←v7532, (* (( (ptr) x←v4200)+2) ), pd302);
                     };
SOURCE(3619, 24)
                  {
                     word pd303;
                     pd303 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd303 ))))(stream←v7532, (* (( (ptr) gf←c37752)+126) ), 0, 2147483647, pd303);
                     };
SOURCE(3647, 27)
                  {
                     word pd304;
                     pd304 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd304 ))))(stream←v7532, (* (( (ptr) gf←c37752)+62) ), 0, 2147483647, pd304);
                     };
SOURCE(3678, 24)
                  {
                     word pd305;
                     pd305 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd305 ))))(stream←v7532, (* (( (ptr) gf←c37752)+145) ), 0, 2147483647, pd305);
                     };
SOURCE(3706, 50)
                  {
                     W2 var←c31288;
                     var←c31288.f0 = 2;
                     var←c31288.f1 = (* (( (ptr) x←v4200)+3) );
                     {
                        word pd306;
                        pd306 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+55) );
                        (void) ( *( (fPt) ((*  (ptr) pd306 ))))(stream←v7532, var←c31288, pd306);
                        };
                     };
SOURCE(3760, 23)
                  {
                     word pd307;
                     pd307 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd307 ))))(stream←v7532, (* (( (ptr) gf←c37752)+94) ), 0, 2147483647, pd307);
                     };
                  };
               break;
            default: 
               lab←L100000: ;
SOURCE(3809, 24)
               {
                  word pd308;
                  pd308 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd308 ))))(stream←v7532, (* (( (ptr) gf←c37752)+57) ), 0, 2147483647, pd308);
                  };
               break;
            };
         };
      };
SOURCE(3837, 23)
   {
      word pd309;
      pd309 = (* (( (ptr) (* (( (ptr) gf←c37752)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd309 ))))(stream←v7532, (* (( (ptr) gf←c37752)+94) ), 0, 2147483647, pd309);
      };
SOURCE(1031, 2829)
   return(ok←v7604);
   }

static word REFBoxPrinter←P180(stream←v7664, ref←v7692)
   word stream←v7664;
   word ref←v7692;
   {
   register ptr gf←c37784 =  (ptr) &globalframe;
   word ok←v7736;
   word refBox←v4256;
   /* REFBoxPrinter: */ 
SOURCE(3867, 674)
SOURCE(3867, 674)
   ok←v7736 = 1;
SOURCE(3910, 41)
   refBox←v4256 = XR←Narrow(ref←v7692, (* (( (ptr) gf←c37784)+6) ));
SOURCE(3955, 23)
   {
      word pd310;
      pd310 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd310 ))))(stream←v7664, (* (( (ptr) gf←c37784)+177) ), 0, 2147483647, pd310);
      };
SOURCE(3982, 26)
   {
      word pd311;
      pd311 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd311 ))))(stream←v7664, (* (( (ptr) gf←c37784)+63) ), 0, 2147483647, pd311);
      };
SOURCE(4012, 24)
   {
      word pd312;
      pd312 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd312 ))))(stream←v7664, (* (( (ptr) gf←c37784)+145) ), 0, 2147483647, pd312);
      };
SOURCE(4040, 51)
   {
      W2 var←c31352;
      var←c31352.f0 = 8;
      var←c31352.f1 = (*  (ptr) refBox←v4256 );
      {
         word pd313;
         pd313 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd313 ))))(stream←v7664, var←c31352, pd313);
         };
      };
SOURCE(4095, 24)
   {
      word pd314;
      pd314 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd314 ))))(stream←v7664, (* (( (ptr) gf←c37784)+126) ), 0, 2147483647, pd314);
      };
SOURCE(4123, 26)
   {
      word pd315;
      pd315 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd315 ))))(stream←v7664, (* (( (ptr) gf←c37784)+64) ), 0, 2147483647, pd315);
      };
SOURCE(4153, 24)
   {
      word pd316;
      pd316 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd316 ))))(stream←v7664, (* (( (ptr) gf←c37784)+145) ), 0, 2147483647, pd316);
      };
SOURCE(4181, 51)
   {
      W2 var←c31384;
      var←c31384.f0 = 8;
      var←c31384.f1 = (* (( (ptr) refBox←v4256)+1) );
      {
         word pd317;
         pd317 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd317 ))))(stream←v7664, var←c31384, pd317);
         };
      };
SOURCE(4236, 24)
   {
      word pd318;
      pd318 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd318 ))))(stream←v7664, (* (( (ptr) gf←c37784)+126) ), 0, 2147483647, pd318);
      };
SOURCE(4264, 26)
   {
      word pd319;
      pd319 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd319 ))))(stream←v7664, (* (( (ptr) gf←c37784)+65) ), 0, 2147483647, pd319);
      };
SOURCE(4294, 24)
   {
      word pd320;
      pd320 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd320 ))))(stream←v7664, (* (( (ptr) gf←c37784)+145) ), 0, 2147483647, pd320);
      };
SOURCE(4322, 51)
   {
      W2 var←c31416;
      var←c31416.f0 = 8;
      var←c31416.f1 = (* (( (ptr) refBox←v4256)+2) );
      {
         word pd321;
         pd321 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd321 ))))(stream←v7664, var←c31416, pd321);
         };
      };
SOURCE(4377, 24)
   {
      word pd322;
      pd322 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd322 ))))(stream←v7664, (* (( (ptr) gf←c37784)+126) ), 0, 2147483647, pd322);
      };
SOURCE(4405, 26)
   {
      word pd323;
      pd323 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd323 ))))(stream←v7664, (* (( (ptr) gf←c37784)+66) ), 0, 2147483647, pd323);
      };
SOURCE(4435, 24)
   {
      word pd324;
      pd324 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd324 ))))(stream←v7664, (* (( (ptr) gf←c37784)+145) ), 0, 2147483647, pd324);
      };
SOURCE(4463, 51)
   {
      W2 var←c31448;
      var←c31448.f0 = 8;
      var←c31448.f1 = (* (( (ptr) refBox←v4256)+3) );
      {
         word pd325;
         pd325 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd325 ))))(stream←v7664, var←c31448, pd325);
         };
      };
SOURCE(4518, 23)
   {
      word pd326;
      pd326 = (* (( (ptr) (* (( (ptr) gf←c37784)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd326 ))))(stream←v7664, (* (( (ptr) gf←c37784)+94) ), 0, 2147483647, pd326);
      };
SOURCE(3867, 674)
   return(ok←v7736);
   }

static word REFRectanglePrinter←P240(stream←v7796, ref←v7824)
   word stream←v7796;
   word ref←v7824;
   {
   register ptr gf←c37816 =  (ptr) &globalframe;
   word ok←v7868;
   word refRectangle←v4312;
   /* REFRectanglePrinter: */ 
SOURCE(4548, 692)
SOURCE(4548, 692)
   ok←v7868 = 1;
SOURCE(4597, 53)
   refRectangle←v4312 = XR←Narrow(ref←v7824, (* (( (ptr) gf←c37816)+7) ));
SOURCE(4654, 23)
   {
      word pd327;
      pd327 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd327 ))))(stream←v7796, (* (( (ptr) gf←c37816)+177) ), 0, 2147483647, pd327);
      };
SOURCE(4681, 23)
   {
      word pd328;
      pd328 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd328 ))))(stream←v7796, (* (( (ptr) gf←c37816)+67) ), 0, 2147483647, pd328);
      };
SOURCE(4708, 24)
   {
      word pd329;
      pd329 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd329 ))))(stream←v7796, (* (( (ptr) gf←c37816)+145) ), 0, 2147483647, pd329);
      };
SOURCE(4736, 54)
   {
      W2 var←c31480;
      var←c31480.f0 = 8;
      var←c31480.f1 = (*  (ptr) refRectangle←v4312 );
      {
         word pd330;
         pd330 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd330 ))))(stream←v7796, var←c31480, pd330);
         };
      };
SOURCE(4794, 24)
   {
      word pd331;
      pd331 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd331 ))))(stream←v7796, (* (( (ptr) gf←c37816)+126) ), 0, 2147483647, pd331);
      };
SOURCE(4822, 23)
   {
      word pd332;
      pd332 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd332 ))))(stream←v7796, (* (( (ptr) gf←c37816)+68) ), 0, 2147483647, pd332);
      };
SOURCE(4849, 24)
   {
      word pd333;
      pd333 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd333 ))))(stream←v7796, (* (( (ptr) gf←c37816)+145) ), 0, 2147483647, pd333);
      };
SOURCE(4877, 54)
   {
      W2 var←c31512;
      var←c31512.f0 = 8;
      var←c31512.f1 = (* (( (ptr) refRectangle←v4312)+1) );
      {
         word pd334;
         pd334 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd334 ))))(stream←v7796, var←c31512, pd334);
         };
      };
SOURCE(4935, 24)
   {
      word pd335;
      pd335 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd335 ))))(stream←v7796, (* (( (ptr) gf←c37816)+126) ), 0, 2147483647, pd335);
      };
SOURCE(4963, 23)
   {
      word pd336;
      pd336 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd336 ))))(stream←v7796, (* (( (ptr) gf←c37816)+69) ), 0, 2147483647, pd336);
      };
SOURCE(4990, 24)
   {
      word pd337;
      pd337 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd337 ))))(stream←v7796, (* (( (ptr) gf←c37816)+145) ), 0, 2147483647, pd337);
      };
SOURCE(5018, 54)
   {
      W2 var←c31544;
      var←c31544.f0 = 8;
      var←c31544.f1 = (* (( (ptr) refRectangle←v4312)+2) );
      {
         word pd338;
         pd338 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd338 ))))(stream←v7796, var←c31544, pd338);
         };
      };
SOURCE(5076, 24)
   {
      word pd339;
      pd339 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd339 ))))(stream←v7796, (* (( (ptr) gf←c37816)+126) ), 0, 2147483647, pd339);
      };
SOURCE(5104, 23)
   {
      word pd340;
      pd340 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd340 ))))(stream←v7796, (* (( (ptr) gf←c37816)+70) ), 0, 2147483647, pd340);
      };
SOURCE(5131, 24)
   {
      word pd341;
      pd341 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd341 ))))(stream←v7796, (* (( (ptr) gf←c37816)+145) ), 0, 2147483647, pd341);
      };
SOURCE(5159, 54)
   {
      W2 var←c31576;
      var←c31576.f0 = 8;
      var←c31576.f1 = (* (( (ptr) refRectangle←v4312)+3) );
      {
         word pd342;
         pd342 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd342 ))))(stream←v7796, var←c31576, pd342);
         };
      };
SOURCE(5217, 23)
   {
      word pd343;
      pd343 = (* (( (ptr) (* (( (ptr) gf←c37816)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd343 ))))(stream←v7796, (* (( (ptr) gf←c37816)+94) ), 0, 2147483647, pd343);
      };
SOURCE(4548, 692)
   return(ok←v7868);
   }

static word REFExtentsPrinter←P300(stream←v7928, ref←v7956)
   word stream←v7928;
   word ref←v7956;
   {
   register ptr gf←c37848 =  (ptr) &globalframe;
   word ok←v8000;
   word refExtents←v4368;
   /* REFExtentsPrinter: */ 
SOURCE(5247, 738)
SOURCE(5247, 738)
   ok←v8000 = 1;
SOURCE(5294, 49)
   refExtents←v4368 = XR←Narrow(ref←v7956, (* (( (ptr) gf←c37848)+8) ));
SOURCE(5347, 23)
   {
      word pd344;
      pd344 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd344 ))))(stream←v7928, (* (( (ptr) gf←c37848)+177) ), 0, 2147483647, pd344);
      };
SOURCE(5374, 32)
   {
      word pd345;
      pd345 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd345 ))))(stream←v7928, (* (( (ptr) gf←c37848)+71) ), 0, 2147483647, pd345);
      };
SOURCE(5410, 24)
   {
      word pd346;
      pd346 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd346 ))))(stream←v7928, (* (( (ptr) gf←c37848)+145) ), 0, 2147483647, pd346);
      };
SOURCE(5438, 61)
   {
      W2 var←c31608;
      var←c31608.f0 = 8;
      var←c31608.f1 = (*  (ptr) refExtents←v4368 );
      {
         word pd347;
         pd347 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd347 ))))(stream←v7928, var←c31608, pd347);
         };
      };
SOURCE(5503, 24)
   {
      word pd348;
      pd348 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd348 ))))(stream←v7928, (* (( (ptr) gf←c37848)+126) ), 0, 2147483647, pd348);
      };
SOURCE(5531, 33)
   {
      word pd349;
      pd349 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd349 ))))(stream←v7928, (* (( (ptr) gf←c37848)+72) ), 0, 2147483647, pd349);
      };
SOURCE(5568, 24)
   {
      word pd350;
      pd350 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd350 ))))(stream←v7928, (* (( (ptr) gf←c37848)+145) ), 0, 2147483647, pd350);
      };
SOURCE(5596, 62)
   {
      W2 var←c31640;
      var←c31640.f0 = 8;
      var←c31640.f1 = (* (( (ptr) refExtents←v4368)+1) );
      {
         word pd351;
         pd351 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd351 ))))(stream←v7928, var←c31640, pd351);
         };
      };
SOURCE(5662, 24)
   {
      word pd352;
      pd352 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd352 ))))(stream←v7928, (* (( (ptr) gf←c37848)+126) ), 0, 2147483647, pd352);
      };
SOURCE(5690, 29)
   {
      word pd353;
      pd353 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd353 ))))(stream←v7928, (* (( (ptr) gf←c37848)+73) ), 0, 2147483647, pd353);
      };
SOURCE(5723, 24)
   {
      word pd354;
      pd354 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd354 ))))(stream←v7928, (* (( (ptr) gf←c37848)+145) ), 0, 2147483647, pd354);
      };
SOURCE(5751, 58)
   {
      W2 var←c31672;
      var←c31672.f0 = 8;
      var←c31672.f1 = (* (( (ptr) refExtents←v4368)+2) );
      {
         word pd355;
         pd355 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd355 ))))(stream←v7928, var←c31672, pd355);
         };
      };
SOURCE(5813, 24)
   {
      word pd356;
      pd356 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd356 ))))(stream←v7928, (* (( (ptr) gf←c37848)+126) ), 0, 2147483647, pd356);
      };
SOURCE(5841, 28)
   {
      word pd357;
      pd357 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd357 ))))(stream←v7928, (* (( (ptr) gf←c37848)+74) ), 0, 2147483647, pd357);
      };
SOURCE(5873, 24)
   {
      word pd358;
      pd358 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd358 ))))(stream←v7928, (* (( (ptr) gf←c37848)+145) ), 0, 2147483647, pd358);
      };
SOURCE(5901, 57)
   {
      W2 var←c31704;
      var←c31704.f0 = 8;
      var←c31704.f1 = (* (( (ptr) refExtents←v4368)+3) );
      {
         word pd359;
         pd359 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd359 ))))(stream←v7928, var←c31704, pd359);
         };
      };
SOURCE(5962, 23)
   {
      word pd360;
      pd360 = (* (( (ptr) (* (( (ptr) gf←c37848)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd360 ))))(stream←v7928, (* (( (ptr) gf←c37848)+94) ), 0, 2147483647, pd360);
      };
SOURCE(5247, 738)
   return(ok←v8000);
   }

static word REFAllowedMasksPrinter←P360(stream←v8060, ref←v8088)
   word stream←v8060;
   word ref←v8088;
   {
   register ptr gf←c37880 =  (ptr) &globalframe;
   word ok←v8132;
   word refAllowedMasks←v4424;
   /* REFAllowedMasksPrinter: */ 
SOURCE(5992, 1473)
SOURCE(5992, 1473)
   ok←v8132 = 1;
SOURCE(6044, 59)
   refAllowedMasks←v4424 = XR←Narrow(ref←v8088, (* (( (ptr) gf←c37880)+9) ));
SOURCE(6107, 23)
   {
      word pd361;
      pd361 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd361 ))))(stream←v8060, (* (( (ptr) gf←c37880)+177) ), 0, 2147483647, pd361);
      };
SOURCE(6134, 36)
   {
      word pd362;
      pd362 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd362 ))))(stream←v8060, (* (( (ptr) gf←c37880)+75) ), 0, 2147483647, pd362);
      };
SOURCE(6174, 24)
   {
      word pd363;
      pd363 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd363 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd363);
      };
SOURCE(6202, 73)
   {
      W2 var←c31736;
      var←c31736.f0 = 2;
      var←c31736.f1 =  (unsigned) (*(int*)refAllowedMasks←v4424<0);
      {
         word pd364;
         pd364 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd364 ))))(stream←v8060, var←c31736, pd364);
         };
      };
SOURCE(6279, 24)
   {
      word pd365;
      pd365 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd365 ))))(stream←v8060, (* (( (ptr) gf←c37880)+126) ), 0, 2147483647, pd365);
      };
SOURCE(6307, 38)
   {
      word pd366;
      pd366 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd366 ))))(stream←v8060, (* (( (ptr) gf←c37880)+76) ), 0, 2147483647, pd366);
      };
SOURCE(6349, 24)
   {
      word pd367;
      pd367 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd367 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd367);
      };
SOURCE(6377, 75)
   {
      W2 var←c31768;
      var←c31768.f0 = 2;
      var←c31768.f1 =  (unsigned) (((unsigned)(*  (bPt) refAllowedMasks←v4424 ) << 25) >> 31);
      {
         word pd368;
         pd368 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd368 ))))(stream←v8060, var←c31768, pd368);
         };
      };
SOURCE(6456, 24)
   {
      word pd369;
      pd369 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd369 ))))(stream←v8060, (* (( (ptr) gf←c37880)+126) ), 0, 2147483647, pd369);
      };
SOURCE(6484, 32)
   {
      word pd370;
      pd370 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd370 ))))(stream←v8060, (* (( (ptr) gf←c37880)+77) ), 0, 2147483647, pd370);
      };
SOURCE(6520, 24)
   {
      word pd371;
      pd371 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd371 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd371);
      };
SOURCE(6548, 69)
   {
      W2 var←c31800;
      var←c31800.f0 = 2;
      var←c31800.f1 =  (unsigned) (((unsigned)(*  (bPt) refAllowedMasks←v4424 ) << 26) >> 31);
      {
         word pd372;
         pd372 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd372 ))))(stream←v8060, var←c31800, pd372);
         };
      };
SOURCE(6621, 24)
   {
      word pd373;
      pd373 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd373 ))))(stream←v8060, (* (( (ptr) gf←c37880)+126) ), 0, 2147483647, pd373);
      };
SOURCE(6649, 28)
   {
      word pd374;
      pd374 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd374 ))))(stream←v8060, (* (( (ptr) gf←c37880)+78) ), 0, 2147483647, pd374);
      };
SOURCE(6681, 24)
   {
      word pd375;
      pd375 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd375 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd375);
      };
SOURCE(6709, 65)
   {
      W2 var←c31832;
      var←c31832.f0 = 2;
      var←c31832.f1 =  (unsigned) (((unsigned)(*  (bPt) refAllowedMasks←v4424 ) << 27) >> 31);
      {
         word pd376;
         pd376 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd376 ))))(stream←v8060, var←c31832, pd376);
         };
      };
SOURCE(6778, 24)
   {
      word pd377;
      pd377 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd377 ))))(stream←v8060, (* (( (ptr) gf←c37880)+126) ), 0, 2147483647, pd377);
      };
SOURCE(6806, 32)
   {
      word pd378;
      pd378 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd378 ))))(stream←v8060, (* (( (ptr) gf←c37880)+79) ), 0, 2147483647, pd378);
      };
SOURCE(6842, 24)
   {
      word pd379;
      pd379 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd379 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd379);
      };
SOURCE(6870, 69)
   {
      W2 var←c31864;
      var←c31864.f0 = 2;
      var←c31864.f1 =  (unsigned) (((unsigned)(*  (bPt) refAllowedMasks←v4424 ) << 28) >> 31);
      {
         word pd380;
         pd380 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd380 ))))(stream←v8060, var←c31864, pd380);
         };
      };
SOURCE(6943, 24)
   {
      word pd381;
      pd381 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd381 ))))(stream←v8060, (* (( (ptr) gf←c37880)+126) ), 0, 2147483647, pd381);
      };
SOURCE(6971, 34)
   {
      word pd382;
      pd382 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd382 ))))(stream←v8060, (* (( (ptr) gf←c37880)+80) ), 0, 2147483647, pd382);
      };
SOURCE(7009, 24)
   {
      word pd383;
      pd383 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd383 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd383);
      };
SOURCE(7037, 71)
   {
      W2 var←c31896;
      var←c31896.f0 = 2;
      var←c31896.f1 =  (unsigned) (((unsigned)(*  (bPt) refAllowedMasks←v4424 ) << 29) >> 31);
      {
         word pd384;
         pd384 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd384 ))))(stream←v8060, var←c31896, pd384);
         };
      };
SOURCE(7112, 24)
   {
      word pd385;
      pd385 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd385 ))))(stream←v8060, (* (( (ptr) gf←c37880)+126) ), 0, 2147483647, pd385);
      };
SOURCE(7140, 32)
   {
      word pd386;
      pd386 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd386 ))))(stream←v8060, (* (( (ptr) gf←c37880)+81) ), 0, 2147483647, pd386);
      };
SOURCE(7176, 24)
   {
      word pd387;
      pd387 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd387 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd387);
      };
SOURCE(7204, 69)
   {
      W2 var←c31928;
      var←c31928.f0 = 2;
      var←c31928.f1 =  (unsigned) (((unsigned)(*  (bPt) refAllowedMasks←v4424 ) << 30) >> 31);
      {
         word pd388;
         pd388 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd388 ))))(stream←v8060, var←c31928, pd388);
         };
      };
SOURCE(7277, 24)
   {
      word pd389;
      pd389 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd389 ))))(stream←v8060, (* (( (ptr) gf←c37880)+126) ), 0, 2147483647, pd389);
      };
SOURCE(7305, 32)
   {
      word pd390;
      pd390 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd390 ))))(stream←v8060, (* (( (ptr) gf←c37880)+82) ), 0, 2147483647, pd390);
      };
SOURCE(7341, 24)
   {
      word pd391;
      pd391 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd391 ))))(stream←v8060, (* (( (ptr) gf←c37880)+145) ), 0, 2147483647, pd391);
      };
SOURCE(7369, 69)
   {
      W2 var←c31960;
      var←c31960.f0 = 2;
      var←c31960.f1 = ( (((unsigned)(*  (ptr) refAllowedMasks←v4424 ) << 7) >> 7) );
      {
         word pd392;
         pd392 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd392 ))))(stream←v8060, var←c31960, pd392);
         };
      };
SOURCE(7442, 23)
   {
      word pd393;
      pd393 = (* (( (ptr) (* (( (ptr) gf←c37880)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd393 ))))(stream←v8060, (* (( (ptr) gf←c37880)+94) ), 0, 2147483647, pd393);
      };
SOURCE(5992, 1473)
   return(ok←v8132);
   }

static word REFDeviceReprPrinter←P420(stream←v8192, ref←v8220)
   word stream←v8192;
   word ref←v8220;
   {
   register ptr gf←c37912 =  (ptr) &globalframe;
   word ok←v8264;
   word refDeviceRepr←v4480;
   /* REFDeviceReprPrinter: */ 
SOURCE(7472, 1025)
SOURCE(7472, 1025)
   ok←v8264 = 1;
SOURCE(7522, 55)
   refDeviceRepr←v4480 = XR←Narrow(ref←v8220, (* (( (ptr) gf←c37912)+10) ));
SOURCE(7581, 23)
   {
      word pd394;
      pd394 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd394 ))))(stream←v8192, (* (( (ptr) gf←c37912)+177) ), 0, 2147483647, pd394);
      };
SOURCE(7608, 27)
   {
      word pd395;
      pd395 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd395 ))))(stream←v8192, (* (( (ptr) gf←c37912)+83) ), 0, 2147483647, pd395);
      };
SOURCE(7639, 24)
   {
      word pd396;
      pd396 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd396 ))))(stream←v8192, (* (( (ptr) gf←c37912)+145) ), 0, 2147483647, pd396);
      };
SOURCE(7667, 51)
   {
      word var←c31992;
      word pd397;
      pd397 = (* (( (ptr) (* (( (ptr) gf←c37912)+242)/* var←c30520 */  ))+8) );
      var←c31992 = (word) ( *( (fPt) ((*  (ptr) pd397 ))))(stream←v8192, (*  (ptr) refDeviceRepr←v4480 ), pd397);
      };
SOURCE(7722, 24)
   {
      word pd398;
      pd398 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd398 ))))(stream←v8192, (* (( (ptr) gf←c37912)+126) ), 0, 2147483647, pd398);
      };
SOURCE(7750, 32)
   {
      word pd399;
      pd399 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd399 ))))(stream←v8192, (* (( (ptr) gf←c37912)+84) ), 0, 2147483647, pd399);
      };
SOURCE(7786, 24)
   {
      word pd400;
      pd400 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd400 ))))(stream←v8192, (* (( (ptr) gf←c37912)+145) ), 0, 2147483647, pd400);
      };
SOURCE(7814, 92)
   {
      word var←c32088;
      {
         word var←c32024;
         {
            word var←c32056;
            var←c32056 = XR←NewObject(12, (* (( (ptr) gf←c37912)+46) ));
            (*  (W3Pt) var←c32056 ) = (*  (W3Pt) (( (ptr) refDeviceRepr←v4480)+1) );
            var←c32024 = var←c32056;
            };
         {
            word pd401;
            pd401 = (* (( (ptr) (* (( (ptr) gf←c37912)+242)/* var←c30520 */  ))+7) );
            var←c32088 = (word) ( *( (fPt) ((*  (ptr) pd401 ))))(stream←v8192, var←c32024, pd401);
            };
         };
      };
SOURCE(7910, 24)
   {
      word pd402;
      pd402 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd402 ))))(stream←v8192, (* (( (ptr) gf←c37912)+126) ), 0, 2147483647, pd402);
      };
SOURCE(7938, 27)
   {
      word pd403;
      pd403 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd403 ))))(stream←v8192, (* (( (ptr) gf←c37912)+173) ), 0, 2147483647, pd403);
      };
SOURCE(7969, 24)
   {
      word pd404;
      pd404 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd404 ))))(stream←v8192, (* (( (ptr) gf←c37912)+145) ), 0, 2147483647, pd404);
      };
SOURCE(7997, 51)
   {
      word var←c32120;
      word pd405;
      pd405 = (* (( (ptr) (* (( (ptr) gf←c37912)+242)/* var←c30520 */  ))+8) );
      var←c32120 = (word) ( *( (fPt) ((*  (ptr) pd405 ))))(stream←v8192, (* (( (ptr) refDeviceRepr←v4480)+4) ), pd405);
      };
SOURCE(8052, 24)
   {
      word pd406;
      pd406 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd406 ))))(stream←v8192, (* (( (ptr) gf←c37912)+126) ), 0, 2147483647, pd406);
      };
SOURCE(8080, 26)
   {
      word pd407;
      pd407 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd407 ))))(stream←v8192, (* (( (ptr) gf←c37912)+86) ), 0, 2147483647, pd407);
      };
SOURCE(8110, 24)
   {
      word pd408;
      pd408 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd408 ))))(stream←v8192, (* (( (ptr) gf←c37912)+145) ), 0, 2147483647, pd408);
      };
SOURCE(8138, 50)
   {
      word var←c32152;
      word pd409;
      pd409 = (* (( (ptr) (* (( (ptr) gf←c37912)+242)/* var←c30520 */  ))+8) );
      var←c32152 = (word) ( *( (fPt) ((*  (ptr) pd409 ))))(stream←v8192, (* (( (ptr) refDeviceRepr←v4480)+5) ), pd409);
      };
SOURCE(8192, 24)
   {
      word pd410;
      pd410 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd410 ))))(stream←v8192, (* (( (ptr) gf←c37912)+126) ), 0, 2147483647, pd410);
      };
SOURCE(8220, 27)
   {
      word pd411;
      pd411 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd411 ))))(stream←v8192, (* (( (ptr) gf←c37912)+124) ), 0, 2147483647, pd411);
      };
SOURCE(8251, 24)
   {
      word pd412;
      pd412 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd412 ))))(stream←v8192, (* (( (ptr) gf←c37912)+145) ), 0, 2147483647, pd412);
      };
SOURCE(8279, 51)
   {
      word var←c32184;
      word pd413;
      pd413 = (* (( (ptr) (* (( (ptr) gf←c37912)+242)/* var←c30520 */  ))+8) );
      var←c32184 = (word) ( *( (fPt) ((*  (ptr) pd413 ))))(stream←v8192, (* (( (ptr) refDeviceRepr←v4480)+6) ), pd413);
      };
SOURCE(8334, 24)
   {
      word pd414;
      pd414 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd414 ))))(stream←v8192, (* (( (ptr) gf←c37912)+126) ), 0, 2147483647, pd414);
      };
SOURCE(8362, 26)
   {
      word pd415;
      pd415 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd415 ))))(stream←v8192, (* (( (ptr) gf←c37912)+122) ), 0, 2147483647, pd415);
      };
SOURCE(8392, 24)
   {
      word pd416;
      pd416 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd416 ))))(stream←v8192, (* (( (ptr) gf←c37912)+145) ), 0, 2147483647, pd416);
      };
SOURCE(8420, 50)
   {
      word var←c32216;
      word pd417;
      pd417 = (* (( (ptr) (* (( (ptr) gf←c37912)+242)/* var←c30520 */  ))+8) );
      var←c32216 = (word) ( *( (fPt) ((*  (ptr) pd417 ))))(stream←v8192, (* (( (ptr) refDeviceRepr←v4480)+7) ), pd417);
      };
SOURCE(8474, 23)
   {
      word pd418;
      pd418 = (* (( (ptr) (* (( (ptr) gf←c37912)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd418 ))))(stream←v8192, (* (( (ptr) gf←c37912)+94) ), 0, 2147483647, pd418);
      };
SOURCE(7472, 1025)
   return(ok←v8264);
   }

static word REFDeviceStateRepPrinter←P480(stream←v8324, ref←v8352)
   word stream←v8324;
   word ref←v8352;
   {
   register ptr gf←c37944 =  (ptr) &globalframe;
   word ok←v8396;
   word refDeviceStateRep←v4536;
   /* REFDeviceStateRepPrinter: */ 
SOURCE(8504, 687)
SOURCE(8504, 687)
   ok←v8396 = 1;
SOURCE(8558, 63)
   refDeviceStateRep←v4536 = XR←Narrow(ref←v8352, (* (( (ptr) gf←c37944)+11) ));
SOURCE(8625, 23)
   {
      word pd419;
      pd419 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd419 ))))(stream←v8324, (* (( (ptr) gf←c37944)+177) ), 0, 2147483647, pd419);
      };
SOURCE(8652, 27)
   {
      word pd420;
      pd420 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd420 ))))(stream←v8324, (* (( (ptr) gf←c37944)+87) ), 0, 2147483647, pd420);
      };
SOURCE(8683, 24)
   {
      word pd421;
      pd421 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd421 ))))(stream←v8324, (* (( (ptr) gf←c37944)+145) ), 0, 2147483647, pd421);
      };
SOURCE(8711, 93)
   {
      word var←c32312;
      {
         word var←c32248;
         {
            word var←c32280;
            var←c32280 = XR←NewObject(4, (* (( (ptr) gf←c37944)+9) ));
            (*  (ptr) var←c32280 ) = (*  (ptr) refDeviceStateRep←v4536 );
            var←c32248 = var←c32280;
            };
         {
            word pd422;
            pd422 = (* (( (ptr) (* (( (ptr) gf←c37944)+242)/* var←c30520 */  ))+7) );
            var←c32312 = (word) ( *( (fPt) ((*  (ptr) pd422 ))))(stream←v8324, var←c32248, pd422);
            };
         };
      };
SOURCE(8808, 24)
   {
      word pd423;
      pd423 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd423 ))))(stream←v8324, (* (( (ptr) gf←c37944)+126) ), 0, 2147483647, pd423);
      };
SOURCE(8836, 28)
   {
      word pd424;
      pd424 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd424 ))))(stream←v8324, (* (( (ptr) gf←c37944)+88) ), 0, 2147483647, pd424);
      };
SOURCE(8868, 24)
   {
      word pd425;
      pd425 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd425 ))))(stream←v8324, (* (( (ptr) gf←c37944)+145) ), 0, 2147483647, pd425);
      };
SOURCE(8896, 75)
   {
      word var←c32408;
      {
         word var←c32344;
         {
            word var←c32376;
            var←c32376 = XR←NewObject(16, (* (( (ptr) gf←c37944)+25) ));
            (*  (W4Pt) var←c32376 ) = (*  (W4Pt) (( (ptr) refDeviceStateRep←v4536)+1) );
            var←c32344 = var←c32376;
            };
         {
            word pd426;
            pd426 = (* (( (ptr) (* (( (ptr) gf←c37944)+242)/* var←c30520 */  ))+7) );
            var←c32408 = (word) ( *( (fPt) ((*  (ptr) pd426 ))))(stream←v8324, var←c32344, pd426);
            };
         };
      };
SOURCE(8975, 24)
   {
      word pd427;
      pd427 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd427 ))))(stream←v8324, (* (( (ptr) gf←c37944)+126) ), 0, 2147483647, pd427);
      };
SOURCE(9003, 42)
   {
      word pd428;
      pd428 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd428 ))))(stream←v8324, (* (( (ptr) gf←c37944)+89) ), 0, 2147483647, pd428);
      };
SOURCE(9049, 24)
   {
      word pd429;
      pd429 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd429 ))))(stream←v8324, (* (( (ptr) gf←c37944)+145) ), 0, 2147483647, pd429);
      };
SOURCE(9077, 87)
   {
      W2 var←c32440;
      var←c32440.f0 = 4;
      var←c32440.f1 = (* (( (ptr) refDeviceStateRep←v4536)+5) );
      {
         word pd430;
         pd430 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd430 ))))(stream←v8324, (* (( (ptr) gf←c37944)+112) ), var←c32440, pd430);
         };
      };
SOURCE(9168, 23)
   {
      word pd431;
      pd431 = (* (( (ptr) (* (( (ptr) gf←c37944)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd431 ))))(stream←v8324, (* (( (ptr) gf←c37944)+94) ), 0, 2147483647, pd431);
      };
SOURCE(8504, 687)
   return(ok←v8396);
   }

static word REFDeviceParmReprPrinter←P540(stream←v8456, ref←v8484)
   word stream←v8456;
   word ref←v8484;
   {
   register ptr gf←c37976 =  (ptr) &globalframe;
   word ok←v8528;
   word refDeviceParmRepr←v4592;
   /* REFDeviceParmReprPrinter: */ 
SOURCE(9198, 1915)
SOURCE(9198, 1915)
   ok←v8528 = 1;
SOURCE(9252, 63)
   refDeviceParmRepr←v4592 = XR←Narrow(ref←v8484, (* (( (ptr) gf←c37976)+12) ));
SOURCE(9319, 23)
   {
      word pd432;
      pd432 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd432 ))))(stream←v8456, (* (( (ptr) gf←c37976)+177) ), 0, 2147483647, pd432);
      };
SOURCE(9346, 30)
   {
      word pd433;
      pd433 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd433 ))))(stream←v8456, (* (( (ptr) gf←c37976)+90) ), 0, 2147483647, pd433);
      };
SOURCE(9380, 24)
   {
      word pd434;
      pd434 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd434 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd434);
      };
SOURCE(9408, 23)
   {
      word pd435;
      pd435 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd435 ))))(stream←v8456, (* (( (ptr) gf←c37976)+177) ), 0, 2147483647, pd435);
      };
SOURCE(9435, 249)
   {
      word first←v4648 = 1;
SOURCE(9465, 202)
      {
         register word i←v4692 = 0;
         lab←L100009: ;
SOURCE(9532, 57)
         if ((0 != first←v4648)) {
SOURCE(9546, 19)
            first←v4648 = 0;
            }
         else {
SOURCE(9565, 24)
            {
               word pd436;
               pd436 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd436 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd436);
               };
            };
SOURCE(9595, 72)
         {
            W2 var←c32472;
            var←c32472.f0 = 2;
            var←c32472.f1 =  (unsigned) XR←ExtractField(refDeviceParmRepr←v4592, 27 + (word) i←v4692, 1);
            {
               word pd437;
               pd437 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+55) );
               (void) ( *( (fPt) ((*  (ptr) pd437 ))))(stream←v8456, var←c32472, pd437);
               };
            };
         if ((i←v4692 >= 4)) {
            goto lab←L100006;
            };
         i←v4692 = (i←v4692 + 1);
         goto lab←L100009;
         lab←L100006: ;
         };
      };
SOURCE(9691, 23)
   {
      word pd438;
      pd438 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd438 ))))(stream←v8456, (* (( (ptr) gf←c37976)+94) ), 0, 2147483647, pd438);
      };
SOURCE(9718, 24)
   {
      word pd439;
      pd439 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd439 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd439);
      };
SOURCE(9746, 27)
   {
      word pd440;
      pd440 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd440 ))))(stream←v8456, (* (( (ptr) gf←c37976)+91) ), 0, 2147483647, pd440);
      };
SOURCE(9777, 24)
   {
      word pd441;
      pd441 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd441 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd441);
      };
SOURCE(9805, 66)
   {
      W2 var←c32504;
      var←c32504.f0 = 5;
      var←c32504.f1 = (* (( (ptr) refDeviceParmRepr←v4592)+1) );
      {
         word pd442;
         pd442 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd442 ))))(stream←v8456, var←c32504, pd442);
         };
      };
SOURCE(9875, 24)
   {
      word pd443;
      pd443 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd443 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd443);
      };
SOURCE(9903, 27)
   {
      word pd444;
      pd444 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd444 ))))(stream←v8456, (* (( (ptr) gf←c37976)+92) ), 0, 2147483647, pd444);
      };
SOURCE(9934, 24)
   {
      word pd445;
      pd445 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd445 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd445);
      };
SOURCE(9962, 66)
   {
      W2 var←c32536;
      var←c32536.f0 = 5;
      var←c32536.f1 = (* (( (ptr) refDeviceParmRepr←v4592)+2) );
      {
         word pd446;
         pd446 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd446 ))))(stream←v8456, var←c32536, pd446);
         };
      };
SOURCE(10032, 24)
   {
      word pd447;
      pd447 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd447 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd447);
      };
SOURCE(10060, 30)
   {
      word pd448;
      pd448 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd448 ))))(stream←v8456, (* (( (ptr) gf←c37976)+93) ), 0, 2147483647, pd448);
      };
SOURCE(10094, 24)
   {
      word pd449;
      pd449 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd449 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd449);
      };
SOURCE(10122, 100)
   {
      word var←c32632;
      {
         word var←c32568;
         {
            word var←c32600;
            var←c32600 = XR←NewObject(4, (* (( (ptr) gf←c37976)+45) ));
            (*  (ptr) var←c32600 ) =  (unsigned) ((* (( (bPt) refDeviceParmRepr←v4592)+15) ) & 017);
            var←c32568 = var←c32600;
            };
         {
            word pd450;
            pd450 = (* (( (ptr) (* (( (ptr) gf←c37976)+242)/* var←c30520 */  ))+7) );
            var←c32632 = (word) ( *( (fPt) ((*  (ptr) pd450 ))))(stream←v8456, var←c32568, pd450);
            };
         };
      };
SOURCE(10226, 24)
   {
      word pd451;
      pd451 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd451 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd451);
      };
SOURCE(10254, 41)
   {
      word pd452;
      pd452 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd452 ))))(stream←v8456, (* (( (ptr) gf←c37976)+95) ), 0, 2147483647, pd452);
      };
SOURCE(10299, 24)
   {
      word pd453;
      pd453 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd453 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd453);
      };
SOURCE(10327, 93)
   {
      word var←c32728;
      {
         word var←c32664;
         {
            word var←c32696;
            var←c32696 = XR←NewObject(8, (* (( (ptr) gf←c37976)+24) ));
            (*  (W2Pt) var←c32696 ) = (*  (W2Pt) (( (ptr) refDeviceParmRepr←v4592)+4) );
            var←c32664 = var←c32696;
            };
         {
            word pd454;
            pd454 = (* (( (ptr) (* (( (ptr) gf←c37976)+242)/* var←c30520 */  ))+7) );
            var←c32728 = (word) ( *( (fPt) ((*  (ptr) pd454 ))))(stream←v8456, var←c32664, pd454);
            };
         };
      };
SOURCE(10424, 24)
   {
      word pd455;
      pd455 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd455 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd455);
      };
SOURCE(10452, 42)
   {
      word pd456;
      pd456 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd456 ))))(stream←v8456, (* (( (ptr) gf←c37976)+96) ), 0, 2147483647, pd456);
      };
SOURCE(10498, 24)
   {
      word pd457;
      pd457 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd457 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd457);
      };
SOURCE(10526, 81)
   {
      W2 var←c32760;
      var←c32760.f0 = 5;
      var←c32760.f1 = (* (( (ptr) refDeviceParmRepr←v4592)+6) );
      {
         word pd458;
         pd458 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd458 ))))(stream←v8456, var←c32760, pd458);
         };
      };
SOURCE(10611, 24)
   {
      word pd459;
      pd459 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd459 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd459);
      };
SOURCE(10639, 31)
   {
      word pd460;
      pd460 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd460 ))))(stream←v8456, (* (( (ptr) gf←c37976)+97) ), 0, 2147483647, pd460);
      };
SOURCE(10674, 24)
   {
      word pd461;
      pd461 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd461 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd461);
      };
SOURCE(10702, 59)
   {
      word var←c32792;
      word pd462;
      pd462 = (* (( (ptr) (* (( (ptr) gf←c37976)+242)/* var←c30520 */  ))+8) );
      var←c32792 = (word) ( *( (fPt) ((*  (ptr) pd462 ))))(stream←v8456, (* (( (ptr) refDeviceParmRepr←v4592)+7) ), pd462);
      };
SOURCE(10765, 24)
   {
      word pd463;
      pd463 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd463 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd463);
      };
SOURCE(10793, 32)
   {
      word pd464;
      pd464 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd464 ))))(stream←v8456, (* (( (ptr) gf←c37976)+98) ), 0, 2147483647, pd464);
      };
SOURCE(10829, 24)
   {
      word pd465;
      pd465 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd465 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd465);
      };
SOURCE(10857, 60)
   {
      word var←c32824;
      word pd466;
      pd466 = (* (( (ptr) (* (( (ptr) gf←c37976)+242)/* var←c30520 */  ))+8) );
      var←c32824 = (word) ( *( (fPt) ((*  (ptr) pd466 ))))(stream←v8456, (* (( (ptr) refDeviceParmRepr←v4592)+8) ), pd466);
      };
SOURCE(10921, 24)
   {
      word pd467;
      pd467 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd467 ))))(stream←v8456, (* (( (ptr) gf←c37976)+126) ), 0, 2147483647, pd467);
      };
SOURCE(10949, 30)
   {
      word pd468;
      pd468 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd468 ))))(stream←v8456, (* (( (ptr) gf←c37976)+119) ), 0, 2147483647, pd468);
      };
SOURCE(10983, 24)
   {
      word pd469;
      pd469 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd469 ))))(stream←v8456, (* (( (ptr) gf←c37976)+145) ), 0, 2147483647, pd469);
      };
SOURCE(11011, 75)
   {
      W2 var←c32856;
      var←c32856.f0 = 4;
      var←c32856.f1 = (* (( (ptr) refDeviceParmRepr←v4592)+9) );
      {
         word pd470;
         pd470 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd470 ))))(stream←v8456, (* (( (ptr) gf←c37976)+112) ), var←c32856, pd470);
         };
      };
SOURCE(11090, 23)
   {
      word pd471;
      pd471 = (* (( (ptr) (* (( (ptr) gf←c37976)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd471 ))))(stream←v8456, (* (( (ptr) gf←c37976)+94) ), 0, 2147483647, pd471);
      };
SOURCE(9198, 1915)
   return(ok←v8528);
   }

static word REFDeviceClipperRepPrinter←P600(stream←v8588, ref←v8616)
   word stream←v8588;
   word ref←v8616;
   {
   register ptr gf←c38008 =  (ptr) &globalframe;
   word ok←v8660;
   word refDeviceClipperRep←v4736;
   /* REFDeviceClipperRepPrinter: */ 
SOURCE(11120, 491)
SOURCE(11120, 491)
   ok←v8660 = 1;
SOURCE(11176, 67)
   refDeviceClipperRep←v4736 = XR←Narrow(ref←v8616, (* (( (ptr) gf←c38008)+13) ));
SOURCE(11247, 23)
   {
      word pd472;
      pd472 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd472 ))))(stream←v8588, (* (( (ptr) gf←c38008)+177) ), 0, 2147483647, pd472);
      };
SOURCE(11274, 29)
   {
      word pd473;
      pd473 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd473 ))))(stream←v8588, (* (( (ptr) gf←c38008)+99) ), 0, 2147483647, pd473);
      };
SOURCE(11307, 24)
   {
      word pd474;
      pd474 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd474 ))))(stream←v8588, (* (( (ptr) gf←c38008)+145) ), 0, 2147483647, pd474);
      };
SOURCE(11335, 78)
   {
      word var←c32952;
      {
         word var←c32888;
         {
            word var←c32920;
            var←c32920 = XR←NewObject(16, (* (( (ptr) gf←c38008)+25) ));
            (*  (W4Pt) var←c32920 ) = (*  (W4Pt) refDeviceClipperRep←v4736 );
            var←c32888 = var←c32920;
            };
         {
            word pd475;
            pd475 = (* (( (ptr) (* (( (ptr) gf←c38008)+242)/* var←c30520 */  ))+7) );
            var←c32952 = (word) ( *( (fPt) ((*  (ptr) pd475 ))))(stream←v8588, var←c32888, pd475);
            };
         };
      };
SOURCE(11417, 24)
   {
      word pd476;
      pd476 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd476 ))))(stream←v8588, (* (( (ptr) gf←c38008)+126) ), 0, 2147483647, pd476);
      };
SOURCE(11445, 30)
   {
      word pd477;
      pd477 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd477 ))))(stream←v8588, (* (( (ptr) gf←c38008)+100) ), 0, 2147483647, pd477);
      };
SOURCE(11479, 24)
   {
      word pd478;
      pd478 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd478 ))))(stream←v8588, (* (( (ptr) gf←c38008)+145) ), 0, 2147483647, pd478);
      };
SOURCE(11507, 77)
   {
      W2 var←c32984;
      var←c32984.f0 = 4;
      var←c32984.f1 = (* (( (ptr) refDeviceClipperRep←v4736)+4) );
      {
         word pd479;
         pd479 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd479 ))))(stream←v8588, (* (( (ptr) gf←c38008)+112) ), var←c32984, pd479);
         };
      };
SOURCE(11588, 23)
   {
      word pd480;
      pd480 = (* (( (ptr) (* (( (ptr) gf←c38008)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd480 ))))(stream←v8588, (* (( (ptr) gf←c38008)+94) ), 0, 2147483647, pd480);
      };
SOURCE(11120, 491)
   return(ok←v8660);
   }

static word REFFontRepPrinter←P660(stream←v8720, ref←v8748)
   word stream←v8720;
   word ref←v8748;
   {
   register ptr gf←c38040 =  (ptr) &globalframe;
   word ok←v8792;
   word refFontRep←v4792;
   /* REFFontRepPrinter: */ 
SOURCE(11618, 420)
SOURCE(11618, 420)
   ok←v8792 = 1;
SOURCE(11665, 49)
   refFontRep←v4792 = XR←Narrow(ref←v8748, (* (( (ptr) gf←c38040)+14) ));
SOURCE(11718, 23)
   {
      word pd481;
      pd481 = (* (( (ptr) (* (( (ptr) gf←c38040)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd481 ))))(stream←v8720, (* (( (ptr) gf←c38040)+177) ), 0, 2147483647, pd481);
      };
SOURCE(11745, 34)
   {
      word pd482;
      pd482 = (* (( (ptr) (* (( (ptr) gf←c38040)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd482 ))))(stream←v8720, (* (( (ptr) gf←c38040)+101) ), 0, 2147483647, pd482);
      };
SOURCE(11783, 24)
   {
      word pd483;
      pd483 = (* (( (ptr) (* (( (ptr) gf←c38040)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd483 ))))(stream←v8720, (* (( (ptr) gf←c38040)+145) ), 0, 2147483647, pd483);
      };
SOURCE(11811, 55)
   {
      word var←c33016;
      word pd484;
      pd484 = (* (( (ptr) (* (( (ptr) gf←c38040)+242)/* var←c30520 */  ))+8) );
      var←c33016 = (word) ( *( (fPt) ((*  (ptr) pd484 ))))(stream←v8720, (*  (ptr) refFontRep←v4792 ), pd484);
      };
SOURCE(11870, 24)
   {
      word pd485;
      pd485 = (* (( (ptr) (* (( (ptr) gf←c38040)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd485 ))))(stream←v8720, (* (( (ptr) gf←c38040)+126) ), 0, 2147483647, pd485);
      };
SOURCE(11898, 30)
   {
      word pd486;
      pd486 = (* (( (ptr) (* (( (ptr) gf←c38040)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd486 ))))(stream←v8720, (* (( (ptr) gf←c38040)+102) ), 0, 2147483647, pd486);
      };
SOURCE(11932, 24)
   {
      word pd487;
      pd487 = (* (( (ptr) (* (( (ptr) gf←c38040)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd487 ))))(stream←v8720, (* (( (ptr) gf←c38040)+145) ), 0, 2147483647, pd487);
      };
SOURCE(11960, 51)
   {
      word var←c33048;
      word pd488;
      pd488 = (* (( (ptr) (* (( (ptr) gf←c38040)+242)/* var←c30520 */  ))+8) );
      var←c33048 = (word) ( *( (fPt) ((*  (ptr) pd488 ))))(stream←v8720, (* (( (ptr) refFontRep←v4792)+1) ), pd488);
      };
SOURCE(12015, 23)
   {
      word pd489;
      pd489 = (* (( (ptr) (* (( (ptr) gf←c38040)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd489 ))))(stream←v8720, (* (( (ptr) gf←c38040)+94) ), 0, 2147483647, pd489);
      };
SOURCE(11618, 420)
   return(ok←v8792);
   }

static word REFSampleBufferRepPrinter←P720(stream←v8852, ref←v8880)
   word stream←v8852;
   word ref←v8880;
   {
   register ptr gf←c38072 =  (ptr) &globalframe;
   word ok←v8924;
   word refSampleBufferRep←v4848;
   /* REFSampleBufferRepPrinter: */ 
SOURCE(12045, 827)
SOURCE(12045, 827)
   ok←v8924 = 1;
SOURCE(12100, 65)
   refSampleBufferRep←v4848 = XR←Narrow(ref←v8880, (* (( (ptr) gf←c38072)+15) ));
SOURCE(12169, 23)
   {
      word pd490;
      pd490 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd490 ))))(stream←v8852, (* (( (ptr) gf←c38072)+177) ), 0, 2147483647, pd490);
      };
SOURCE(12196, 28)
   {
      word pd491;
      pd491 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd491 ))))(stream←v8852, (* (( (ptr) gf←c38072)+103) ), 0, 2147483647, pd491);
      };
SOURCE(12228, 24)
   {
      word pd492;
      pd492 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd492 ))))(stream←v8852, (* (( (ptr) gf←c38072)+145) ), 0, 2147483647, pd492);
      };
SOURCE(12256, 68)
   {
      W2 var←c33080;
      var←c33080.f0 = 5;
      var←c33080.f1 = (*  (ptr) refSampleBufferRep←v4848 );
      {
         word pd493;
         pd493 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd493 ))))(stream←v8852, var←c33080, pd493);
         };
      };
SOURCE(12328, 24)
   {
      word pd494;
      pd494 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd494 ))))(stream←v8852, (* (( (ptr) gf←c38072)+126) ), 0, 2147483647, pd494);
      };
SOURCE(12356, 29)
   {
      word pd495;
      pd495 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd495 ))))(stream←v8852, (* (( (ptr) gf←c38072)+104) ), 0, 2147483647, pd495);
      };
SOURCE(12389, 24)
   {
      word pd496;
      pd496 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd496 ))))(stream←v8852, (* (( (ptr) gf←c38072)+145) ), 0, 2147483647, pd496);
      };
SOURCE(12417, 398)
   {
      word first←v4904 = 1;
SOURCE(12447, 23)
      {
         word pd497;
         pd497 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd497 ))))(stream←v8852, (* (( (ptr) gf←c38072)+50) ), 0, 2147483647, pd497);
         };
SOURCE(12474, 71)
      {
         W2 var←c33112;
         var←c33112.f0 = 5;
         var←c33112.f1 = (* (( (ptr) refSampleBufferRep←v4848)+1) );
         {
            word pd498;
            pd498 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+55) );
            (void) ( *( (fPt) ((*  (ptr) pd498 ))))(stream←v8852, var←c33112, pd498);
            };
         };
SOURCE(12549, 23)
      {
         word pd499;
         pd499 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd499 ))))(stream←v8852, (* (( (ptr) gf←c38072)+51) ), 0, 2147483647, pd499);
         };
SOURCE(12576, 23)
      {
         word pd500;
         pd500 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd500 ))))(stream←v8852, (* (( (ptr) gf←c38072)+177) ), 0, 2147483647, pd500);
         };
SOURCE(12603, 195)
      {
         register word i←v4948 = 0;
         register word noName←c33144;
         noName←c33144 = (* (( (ptr) refSampleBufferRep←v4848)+1) );
         if ((i←v4948 >= noName←c33144)) {
            goto lab←L100010;
            };
         lab←L100013: ;
SOURCE(12670, 57)
         if ((0 != first←v4904)) {
SOURCE(12684, 19)
            first←v4904 = 0;
            }
         else {
SOURCE(12703, 24)
            {
               word pd501;
               pd501 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd501 ))))(stream←v8852, (* (( (ptr) gf←c38072)+126) ), 0, 2147483647, pd501);
               };
            };
SOURCE(12733, 65)
         {
            W2 var←c33176;
            var←c33176.f0 = 4;
            {
               word limit502;
               var←c33176.f1 = (* ((( (ptr) refSampleBufferRep←v4848)+2)+(
                     limit502 = (* (( (ptr) refSampleBufferRep←v4848)+1) ),
                     BCK(i←v4948, limit502)
                     )) );
               };
            {
               word pd503;
               pd503 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+55) );
               (void) ( *( (fPt) ((*  (ptr) pd503 ))))(stream←v8852, var←c33176, pd503);
               };
            };
         i←v4948 = (i←v4948 + 1);
         if ((i←v4948 < noName←c33144)) {
            goto lab←L100013;
            };
         lab←L100010: ;
         };
      };
SOURCE(12822, 23)
   {
      word pd504;
      pd504 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd504 ))))(stream←v8852, (* (( (ptr) gf←c38072)+94) ), 0, 2147483647, pd504);
      };
SOURCE(12849, 23)
   {
      word pd505;
      pd505 = (* (( (ptr) (* (( (ptr) gf←c38072)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd505 ))))(stream←v8852, (* (( (ptr) gf←c38072)+94) ), 0, 2147483647, pd505);
      };
SOURCE(12045, 827)
   return(ok←v8924);
   }

static word REFSampleMapRepPrinter←P780(stream←v8984, ref←v9012)
   word stream←v8984;
   word ref←v9012;
   {
   register ptr gf←c38104 =  (ptr) &globalframe;
   word ok←v9056;
   word refSampleMapRep←v4992;
   /* REFSampleMapRepPrinter: */ 
SOURCE(12879, 1719)
SOURCE(12879, 1719)
   ok←v9056 = 1;
SOURCE(12931, 59)
   refSampleMapRep←v4992 = XR←Narrow(ref←v9012, (* (( (ptr) gf←c38104)+16) ));
SOURCE(12994, 23)
   {
      word pd506;
      pd506 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd506 ))))(stream←v8984, (* (( (ptr) gf←c38104)+177) ), 0, 2147483647, pd506);
      };
SOURCE(13021, 25)
   {
      word pd507;
      pd507 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd507 ))))(stream←v8984, (* (( (ptr) gf←c38104)+105) ), 0, 2147483647, pd507);
      };
SOURCE(13050, 24)
   {
      word pd508;
      pd508 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd508 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd508);
      };
SOURCE(13078, 70)
   {
      word var←c33272;
      {
         word var←c33208;
         {
            word var←c33240;
            var←c33240 = XR←NewObject(16, (* (( (ptr) gf←c38104)+25) ));
            (*  (W4Pt) var←c33240 ) = (*  (W4Pt) refSampleMapRep←v4992 );
            var←c33208 = var←c33240;
            };
         {
            word pd509;
            pd509 = (* (( (ptr) (* (( (ptr) gf←c38104)+242)/* var←c30520 */  ))+7) );
            var←c33272 = (word) ( *( (fPt) ((*  (ptr) pd509 ))))(stream←v8984, var←c33208, pd509);
            };
         };
      };
SOURCE(13152, 24)
   {
      word pd510;
      pd510 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd510 ))))(stream←v8984, (* (( (ptr) gf←c38104)+126) ), 0, 2147483647, pd510);
      };
SOURCE(13180, 31)
   {
      word pd511;
      pd511 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd511 ))))(stream←v8984, (* (( (ptr) gf←c38104)+106) ), 0, 2147483647, pd511);
      };
SOURCE(13215, 24)
   {
      word pd512;
      pd512 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd512 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd512);
      };
SOURCE(13243, 68)
   {
      W2 var←c33304;
      var←c33304.f0 = 2;
      var←c33304.f1 = (* (( (ptr) refSampleMapRep←v4992)+4) );
      {
         word pd513;
         pd513 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd513 ))))(stream←v8984, var←c33304, pd513);
         };
      };
SOURCE(13315, 24)
   {
      word pd514;
      pd514 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd514 ))))(stream←v8984, (* (( (ptr) gf←c38104)+126) ), 0, 2147483647, pd514);
      };
SOURCE(13343, 35)
   {
      word pd515;
      pd515 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd515 ))))(stream←v8984, (* (( (ptr) gf←c38104)+107) ), 0, 2147483647, pd515);
      };
SOURCE(13382, 24)
   {
      word pd516;
      pd516 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd516 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd516);
      };
SOURCE(13410, 72)
   {
      W2 var←c33336;
      var←c33336.f0 = 5;
      var←c33336.f1 = (* (( (ptr) refSampleMapRep←v4992)+5) );
      {
         word pd517;
         pd517 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd517 ))))(stream←v8984, var←c33336, pd517);
         };
      };
SOURCE(13486, 24)
   {
      word pd518;
      pd518 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd518 ))))(stream←v8984, (* (( (ptr) gf←c38104)+126) ), 0, 2147483647, pd518);
      };
SOURCE(13514, 23)
   {
      word pd519;
      pd519 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd519 ))))(stream←v8984, (* (( (ptr) gf←c38104)+108) ), 0, 2147483647, pd519);
      };
SOURCE(13541, 24)
   {
      word pd520;
      pd520 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd520 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd520);
      };
SOURCE(13569, 1002)
   {
      word var←c33368;
      var←c33368 = refSampleMapRep←v4992;
      if ((var←c33368 == 0)) {
         goto lab←L100014;
         };
      {
         word var←c33624;
         var←c33624 = (* (( (ptr) var←c33368)+6) );
         if ((var←c33624 == 0)) {
            {
               word x←v5048;
               x←v5048 = var←c33368;
SOURCE(13652, 28)
               {
                  word pd521;
                  pd521 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd521 ))))(stream←v8984, (* (( (ptr) gf←c38104)+109) ), 0, 2147483647, pd521);
                  };
SOURCE(13684, 23)
               {
                  word pd522;
                  pd522 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd522 ))))(stream←v8984, (* (( (ptr) gf←c38104)+177) ), 0, 2147483647, pd522);
                  };
SOURCE(13711, 33)
               {
                  word pd523;
                  pd523 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd523 ))))(stream←v8984, (* (( (ptr) gf←c38104)+110) ), 0, 2147483647, pd523);
                  };
SOURCE(13748, 24)
               {
                  word pd524;
                  pd524 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd524 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd524);
                  };
SOURCE(13776, 57)
               {
                  W2 var←c33400;
                  var←c33400.f0 = 4;
                  var←c33400.f1 = (* (( (ptr) x←v5048)+7) );
                  {
                     word pd525;
                     pd525 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+55) );
                     (void) ( *( (fPt) ((*  (ptr) pd525 ))))(stream←v8984, var←c33400, pd525);
                     };
                  };
SOURCE(13837, 24)
               {
                  word pd526;
                  pd526 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd526 ))))(stream←v8984, (* (( (ptr) gf←c38104)+126) ), 0, 2147483647, pd526);
                  };
SOURCE(13865, 26)
               {
                  word pd527;
                  pd527 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd527 ))))(stream←v8984, (* (( (ptr) gf←c38104)+111) ), 0, 2147483647, pd527);
                  };
SOURCE(13895, 24)
               {
                  word pd528;
                  pd528 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd528 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd528);
                  };
SOURCE(13923, 74)
               {
                  word var←c33496;
                  {
                     word var←c33432;
                     {
                        word var←c33464;
                        var←c33464 = XR←NewObject(8, (* (( (ptr) gf←c38104)+44) ));
                        (*  (W2Pt) var←c33464 ) = (*  (W2Pt) (( (ptr) x←v5048)+8) );
                        var←c33432 = var←c33464;
                        };
                     {
                        word pd529;
                        pd529 = (* (( (ptr) (* (( (ptr) gf←c38104)+242)/* var←c30520 */  ))+7) );
                        var←c33496 = (word) ( *( (fPt) ((*  (ptr) pd529 ))))(stream←v8984, var←c33432, pd529);
                        };
                     };
                  };
SOURCE(14001, 24)
               {
                  word pd530;
                  pd530 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd530 ))))(stream←v8984, (* (( (ptr) gf←c38104)+126) ), 0, 2147483647, pd530);
                  };
SOURCE(14029, 25)
               {
                  word pd531;
                  pd531 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd531 ))))(stream←v8984, (* (( (ptr) gf←c38104)+113) ), 0, 2147483647, pd531);
                  };
SOURCE(14058, 24)
               {
                  word pd532;
                  pd532 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd532 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd532);
                  };
SOURCE(14086, 37)
               {
                  word var←c33528;
                  word pd533;
                  pd533 = (* (( (ptr) (* (( (ptr) gf←c38104)+242)/* var←c30520 */  ))+8) );
                  var←c33528 = (word) ( *( (fPt) ((*  (ptr) pd533 ))))(stream←v8984, (* (( (ptr) x←v5048)+10) ), pd533);
                  };
SOURCE(14127, 23)
               {
                  word pd534;
                  pd534 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd534 ))))(stream←v8984, (* (( (ptr) gf←c38104)+94) ), 0, 2147483647, pd534);
                  };
               };
            }
         else {
            if ((var←c33624 == 1)) {
               {
                  word x←v5104;
                  x←v5104 = var←c33368;
SOURCE(14209, 28)
                  {
                     word pd535;
                     pd535 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd535 ))))(stream←v8984, (* (( (ptr) gf←c38104)+114) ), 0, 2147483647, pd535);
                     };
SOURCE(14241, 23)
                  {
                     word pd536;
                     pd536 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd536 ))))(stream←v8984, (* (( (ptr) gf←c38104)+177) ), 0, 2147483647, pd536);
                     };
SOURCE(14268, 27)
                  {
                     word pd537;
                     pd537 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd537 ))))(stream←v8984, (* (( (ptr) gf←c38104)+173) ), 0, 2147483647, pd537);
                     };
SOURCE(14299, 24)
                  {
                     word pd538;
                     pd538 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd538 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd538);
                     };
SOURCE(14327, 39)
                  {
                     word var←c33560;
                     word pd539;
                     pd539 = (* (( (ptr) (* (( (ptr) gf←c38104)+242)/* var←c30520 */  ))+8) );
                     var←c33560 = (word) ( *( (fPt) ((*  (ptr) pd539 ))))(stream←v8984, (* (( (ptr) x←v5104)+7) ), pd539);
                     };
SOURCE(14370, 24)
                  {
                     word pd540;
                     pd540 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd540 ))))(stream←v8984, (* (( (ptr) gf←c38104)+126) ), 0, 2147483647, pd540);
                     };
SOURCE(14398, 26)
                  {
                     word pd541;
                     pd541 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd541 ))))(stream←v8984, (* (( (ptr) gf←c38104)+122) ), 0, 2147483647, pd541);
                     };
SOURCE(14428, 24)
                  {
                     word pd542;
                     pd542 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd542 ))))(stream←v8984, (* (( (ptr) gf←c38104)+145) ), 0, 2147483647, pd542);
                     };
SOURCE(14456, 38)
                  {
                     word var←c33592;
                     word pd543;
                     pd543 = (* (( (ptr) (* (( (ptr) gf←c38104)+242)/* var←c30520 */  ))+8) );
                     var←c33592 = (word) ( *( (fPt) ((*  (ptr) pd543 ))))(stream←v8984, (* (( (ptr) x←v5104)+8) ), pd543);
                     };
SOURCE(14498, 23)
                  {
                     word pd544;
                     pd544 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd544 ))))(stream←v8984, (* (( (ptr) gf←c38104)+94) ), 0, 2147483647, pd544);
                     };
                  };
               }
            else {
               lab←L100014: ;
SOURCE(14547, 24)
               {
                  word pd545;
                  pd545 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd545 ))))(stream←v8984, (* (( (ptr) gf←c38104)+57) ), 0, 2147483647, pd545);
                  };
               };
            };
         };
      };
SOURCE(14575, 23)
   {
      word pd546;
      pd546 = (* (( (ptr) (* (( (ptr) gf←c38104)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd546 ))))(stream←v8984, (* (( (ptr) gf←c38104)+94) ), 0, 2147483647, pd546);
      };
SOURCE(12879, 1719)
   return(ok←v9056);
   }

static word REFPixelArrayRepPrinter←P840(stream←v9116, ref←v9144)
   word stream←v9116;
   word ref←v9144;
   {
   register ptr gf←c38136 =  (ptr) &globalframe;
   word ok←v9188;
   word refPixelArrayRep←v5160;
   /* REFPixelArrayRepPrinter: */ 
SOURCE(14605, 1385)
SOURCE(14605, 1385)
   ok←v9188 = 1;
SOURCE(14658, 61)
   refPixelArrayRep←v5160 = XR←Narrow(ref←v9144, (* (( (ptr) gf←c38136)+17) ));
SOURCE(14723, 23)
   {
      word pd547;
      pd547 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd547 ))))(stream←v9116, (* (( (ptr) gf←c38136)+177) ), 0, 2147483647, pd547);
      };
SOURCE(14750, 31)
   {
      word pd548;
      pd548 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd548 ))))(stream←v9116, (* (( (ptr) gf←c38136)+106) ), 0, 2147483647, pd548);
      };
SOURCE(14785, 24)
   {
      word pd549;
      pd549 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd549 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd549);
      };
SOURCE(14813, 69)
   {
      W2 var←c33656;
      var←c33656.f0 = 2;
      var←c33656.f1 = (*  (ptr) refPixelArrayRep←v5160 );
      {
         word pd550;
         pd550 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd550 ))))(stream←v9116, var←c33656, pd550);
         };
      };
SOURCE(14886, 24)
   {
      word pd551;
      pd551 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd551 ))))(stream←v9116, (* (( (ptr) gf←c38136)+126) ), 0, 2147483647, pd551);
      };
SOURCE(14914, 37)
   {
      word pd552;
      pd552 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd552 ))))(stream←v9116, (* (( (ptr) gf←c38136)+115) ), 0, 2147483647, pd552);
      };
SOURCE(14955, 24)
   {
      word pd553;
      pd553 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd553 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd553);
      };
SOURCE(14983, 75)
   {
      W2 var←c33688;
      var←c33688.f0 = 5;
      var←c33688.f1 = (* (( (ptr) refPixelArrayRep←v5160)+1) );
      {
         word pd554;
         pd554 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd554 ))))(stream←v9116, var←c33688, pd554);
         };
      };
SOURCE(15062, 24)
   {
      word pd555;
      pd555 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd555 ))))(stream←v9116, (* (( (ptr) gf←c38136)+126) ), 0, 2147483647, pd555);
      };
SOURCE(15090, 27)
   {
      word pd556;
      pd556 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd556 ))))(stream←v9116, (* (( (ptr) gf←c38136)+91) ), 0, 2147483647, pd556);
      };
SOURCE(15121, 24)
   {
      word pd557;
      pd557 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd557 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd557);
      };
SOURCE(15149, 65)
   {
      W2 var←c33720;
      var←c33720.f0 = 5;
      var←c33720.f1 = (* (( (ptr) refPixelArrayRep←v5160)+2) );
      {
         word pd558;
         pd558 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd558 ))))(stream←v9116, var←c33720, pd558);
         };
      };
SOURCE(15218, 24)
   {
      word pd559;
      pd559 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd559 ))))(stream←v9116, (* (( (ptr) gf←c38136)+126) ), 0, 2147483647, pd559);
      };
SOURCE(15246, 27)
   {
      word pd560;
      pd560 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd560 ))))(stream←v9116, (* (( (ptr) gf←c38136)+92) ), 0, 2147483647, pd560);
      };
SOURCE(15277, 24)
   {
      word pd561;
      pd561 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd561 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd561);
      };
SOURCE(15305, 65)
   {
      W2 var←c33752;
      var←c33752.f0 = 5;
      var←c33752.f1 = (* (( (ptr) refPixelArrayRep←v5160)+3) );
      {
         word pd562;
         pd562 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd562 ))))(stream←v9116, var←c33752, pd562);
         };
      };
SOURCE(15374, 24)
   {
      word pd563;
      pd563 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd563 ))))(stream←v9116, (* (( (ptr) gf←c38136)+126) ), 0, 2147483647, pd563);
      };
SOURCE(15402, 23)
   {
      word pd564;
      pd564 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd564 ))))(stream←v9116, (* (( (ptr) gf←c38136)+116) ), 0, 2147483647, pd564);
      };
SOURCE(15429, 24)
   {
      word pd565;
      pd565 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd565 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd565);
      };
SOURCE(15457, 50)
   {
      word var←c33784;
      word pd566;
      pd566 = (* (( (ptr) (* (( (ptr) gf←c38136)+242)/* var←c30520 */  ))+8) );
      var←c33784 = (word) ( *( (fPt) ((*  (ptr) pd566 ))))(stream←v9116, (* (( (ptr) refPixelArrayRep←v5160)+4) ), pd566);
      };
SOURCE(15511, 24)
   {
      word pd567;
      pd567 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd567 ))))(stream←v9116, (* (( (ptr) gf←c38136)+126) ), 0, 2147483647, pd567);
      };
SOURCE(15539, 27)
   {
      word pd568;
      pd568 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd568 ))))(stream←v9116, (* (( (ptr) gf←c38136)+173) ), 0, 2147483647, pd568);
      };
SOURCE(15570, 24)
   {
      word pd569;
      pd569 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd569 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd569);
      };
SOURCE(15598, 54)
   {
      word var←c33816;
      word pd570;
      pd570 = (* (( (ptr) (* (( (ptr) gf←c38136)+242)/* var←c30520 */  ))+8) );
      var←c33816 = (word) ( *( (fPt) ((*  (ptr) pd570 ))))(stream←v9116, (* (( (ptr) refPixelArrayRep←v5160)+5) ), pd570);
      };
SOURCE(15656, 24)
   {
      word pd571;
      pd571 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd571 ))))(stream←v9116, (* (( (ptr) gf←c38136)+126) ), 0, 2147483647, pd571);
      };
SOURCE(15684, 26)
   {
      word pd572;
      pd572 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd572 ))))(stream←v9116, (* (( (ptr) gf←c38136)+122) ), 0, 2147483647, pd572);
      };
SOURCE(15714, 24)
   {
      word pd573;
      pd573 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd573 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd573);
      };
SOURCE(15742, 53)
   {
      word var←c33848;
      word pd574;
      pd574 = (* (( (ptr) (* (( (ptr) gf←c38136)+242)/* var←c30520 */  ))+8) );
      var←c33848 = (word) ( *( (fPt) ((*  (ptr) pd574 ))))(stream←v9116, (* (( (ptr) refPixelArrayRep←v5160)+6) ), pd574);
      };
SOURCE(15799, 24)
   {
      word pd575;
      pd575 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd575 ))))(stream←v9116, (* (( (ptr) gf←c38136)+126) ), 0, 2147483647, pd575);
      };
SOURCE(15827, 30)
   {
      word pd576;
      pd576 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd576 ))))(stream←v9116, (* (( (ptr) gf←c38136)+119) ), 0, 2147483647, pd576);
      };
SOURCE(15861, 24)
   {
      word pd577;
      pd577 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd577 ))))(stream←v9116, (* (( (ptr) gf←c38136)+145) ), 0, 2147483647, pd577);
      };
SOURCE(15889, 74)
   {
      W2 var←c33880;
      var←c33880.f0 = 4;
      var←c33880.f1 = (* (( (ptr) refPixelArrayRep←v5160)+7) );
      {
         word pd578;
         pd578 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd578 ))))(stream←v9116, (* (( (ptr) gf←c38136)+112) ), var←c33880, pd578);
         };
      };
SOURCE(15967, 23)
   {
      word pd579;
      pd579 = (* (( (ptr) (* (( (ptr) gf←c38136)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd579 ))))(stream←v9116, (* (( (ptr) gf←c38136)+94) ), 0, 2147483647, pd579);
      };
SOURCE(14605, 1385)
   return(ok←v9188);
   }

static word REFPixelEncodingRepPrinter←P900(stream←v9248, ref←v9276)
   word stream←v9248;
   word ref←v9276;
   {
   register ptr gf←c38168 =  (ptr) &globalframe;
   word ok←v9320;
   word refPixelEncodingRep←v5216;
   /* REFPixelEncodingRepPrinter: */ 
SOURCE(15997, 612)
SOURCE(15997, 612)
   ok←v9320 = 1;
SOURCE(16053, 67)
   refPixelEncodingRep←v5216 = XR←Narrow(ref←v9276, (* (( (ptr) gf←c38168)+18) ));
SOURCE(16124, 23)
   {
      word pd580;
      pd580 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd580 ))))(stream←v9248, (* (( (ptr) gf←c38168)+177) ), 0, 2147483647, pd580);
      };
SOURCE(16151, 401)
   {
      word first←v5272 = 1;
SOURCE(16181, 23)
      {
         word pd581;
         pd581 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd581 ))))(stream←v9248, (* (( (ptr) gf←c38168)+50) ), 0, 2147483647, pd581);
         };
SOURCE(16208, 78)
      {
         W2 var←c33912;
         var←c33912.f0 = 5;
         var←c33912.f1 = (*  (ptr) refPixelEncodingRep←v5216 );
         {
            word pd582;
            pd582 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+55) );
            (void) ( *( (fPt) ((*  (ptr) pd582 ))))(stream←v9248, var←c33912, pd582);
            };
         };
SOURCE(16290, 23)
      {
         word pd583;
         pd583 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd583 ))))(stream←v9248, (* (( (ptr) gf←c38168)+51) ), 0, 2147483647, pd583);
         };
SOURCE(16317, 23)
      {
         word pd584;
         pd584 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd584 ))))(stream←v9248, (* (( (ptr) gf←c38168)+177) ), 0, 2147483647, pd584);
         };
SOURCE(16344, 191)
      {
         register word i←v5316 = 0;
         register word noName←c33944;
         noName←c33944 = (*  (ptr) refPixelEncodingRep←v5216 );
         if ((i←v5316 >= noName←c33944)) {
            goto lab←L100015;
            };
         lab←L100018: ;
SOURCE(16418, 57)
         if ((0 != first←v5272)) {
SOURCE(16432, 19)
            first←v5272 = 0;
            }
         else {
SOURCE(16451, 24)
            {
               word pd585;
               pd585 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd585 ))))(stream←v9248, (* (( (ptr) gf←c38168)+126) ), 0, 2147483647, pd585);
               };
            };
SOURCE(16481, 54)
         {
            word var←c33976;
            word pd586;
            word limit587;
            pd586 = (* (( (ptr) (* (( (ptr) gf←c38168)+242)/* var←c30520 */  ))+8) );
            var←c33976 = (word) ( *( (fPt) ((*  (ptr) pd586 ))))(stream←v9248, (* ((( (ptr) refPixelEncodingRep←v5216)+1)+(
                     limit587 = (*  (ptr) refPixelEncodingRep←v5216 ),
                     BCK(i←v5316, limit587)
                     )) ), pd586);
            };
         i←v5316 = (i←v5316 + 1);
         if ((i←v5316 < noName←c33944)) {
            goto lab←L100018;
            };
         lab←L100015: ;
         };
      };
SOURCE(16559, 23)
   {
      word pd588;
      pd588 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd588 ))))(stream←v9248, (* (( (ptr) gf←c38168)+94) ), 0, 2147483647, pd588);
      };
SOURCE(16586, 23)
   {
      word pd589;
      pd589 = (* (( (ptr) (* (( (ptr) gf←c38168)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd589 ))))(stream←v9248, (* (( (ptr) gf←c38168)+94) ), 0, 2147483647, pd589);
      };
SOURCE(15997, 612)
   return(ok←v9320);
   }

static word REFSampleEncodingRepPrinter←P960(stream←v9380, ref←v9408)
   word stream←v9380;
   word ref←v9408;
   {
   register ptr gf←c38200 =  (ptr) &globalframe;
   word ok←v9452;
   word refSampleEncodingRep←v5360;
   /* REFSampleEncodingRepPrinter: */ 
SOURCE(16616, 604)
SOURCE(16616, 604)
   ok←v9452 = 1;
SOURCE(16673, 69)
   refSampleEncodingRep←v5360 = XR←Narrow(ref←v9408, (* (( (ptr) gf←c38200)+19) ));
SOURCE(16746, 23)
   {
      word pd590;
      pd590 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd590 ))))(stream←v9380, (* (( (ptr) gf←c38200)+177) ), 0, 2147483647, pd590);
      };
SOURCE(16773, 390)
   {
      word first←v5416 = 1;
SOURCE(16803, 23)
      {
         word pd591;
         pd591 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd591 ))))(stream←v9380, (* (( (ptr) gf←c38200)+50) ), 0, 2147483647, pd591);
         };
SOURCE(16830, 68)
      {
         W2 var←c34008;
         var←c34008.f0 = 5;
         var←c34008.f1 = (*  (ptr) refSampleEncodingRep←v5360 );
         {
            word pd592;
            pd592 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+55) );
            (void) ( *( (fPt) ((*  (ptr) pd592 ))))(stream←v9380, var←c34008, pd592);
            };
         };
SOURCE(16902, 23)
      {
         word pd593;
         pd593 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd593 ))))(stream←v9380, (* (( (ptr) gf←c38200)+51) ), 0, 2147483647, pd593);
         };
SOURCE(16929, 23)
      {
         word pd594;
         pd594 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd594 ))))(stream←v9380, (* (( (ptr) gf←c38200)+177) ), 0, 2147483647, pd594);
         };
SOURCE(16956, 190)
      {
         register word i←v5460 = 0;
         register word noName←c34040;
         noName←c34040 = (*  (ptr) refSampleEncodingRep←v5360 );
         if ((i←v5460 >= noName←c34040)) {
            goto lab←L100019;
            };
         lab←L100022: ;
SOURCE(17020, 57)
         if ((0 != first←v5416)) {
SOURCE(17034, 19)
            first←v5416 = 0;
            }
         else {
SOURCE(17053, 24)
            {
               word pd595;
               pd595 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd595 ))))(stream←v9380, (* (( (ptr) gf←c38200)+126) ), 0, 2147483647, pd595);
               };
            };
SOURCE(17083, 63)
         {
            W2 var←c34072;
            var←c34072.f0 = 8;
            {
               word limit596;
               var←c34072.f1 = (* ((( (ptr) refSampleEncodingRep←v5360)+1)+(
                     limit596 = (*  (ptr) refSampleEncodingRep←v5360 ),
                     BCK(i←v5460, limit596)
                     )) );
               };
            {
               word pd597;
               pd597 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+55) );
               (void) ( *( (fPt) ((*  (ptr) pd597 ))))(stream←v9380, var←c34072, pd597);
               };
            };
         i←v5460 = (i←v5460 + 1);
         if ((i←v5460 < noName←c34040)) {
            goto lab←L100022;
            };
         lab←L100019: ;
         };
      };
SOURCE(17170, 23)
   {
      word pd598;
      pd598 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd598 ))))(stream←v9380, (* (( (ptr) gf←c38200)+94) ), 0, 2147483647, pd598);
      };
SOURCE(17197, 23)
   {
      word pd599;
      pd599 = (* (( (ptr) (* (( (ptr) gf←c38200)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd599 ))))(stream←v9380, (* (( (ptr) gf←c38200)+94) ), 0, 2147483647, pd599);
      };
SOURCE(16616, 604)
   return(ok←v9452);
   }

static word REFStructureRepPrinter←P1020(stream←v9512, ref←v9540)
   word stream←v9512;
   word ref←v9540;
   {
   register ptr gf←c38232 =  (ptr) &globalframe;
   word ok←v9584;
   word refStructureRep←v5504;
   /* REFStructureRepPrinter: */ 
SOURCE(17227, 423)
SOURCE(17227, 423)
   ok←v9584 = 1;
SOURCE(17279, 59)
   refStructureRep←v5504 = XR←Narrow(ref←v9540, (* (( (ptr) gf←c38232)+20) ));
SOURCE(17342, 23)
   {
      word pd600;
      pd600 = (* (( (ptr) (* (( (ptr) gf←c38232)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd600 ))))(stream←v9512, (* (( (ptr) gf←c38232)+177) ), 0, 2147483647, pd600);
      };
SOURCE(17369, 27)
   {
      word pd601;
      pd601 = (* (( (ptr) (* (( (ptr) gf←c38232)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd601 ))))(stream←v9512, (* (( (ptr) gf←c38232)+173) ), 0, 2147483647, pd601);
      };
SOURCE(17400, 24)
   {
      word pd602;
      pd602 = (* (( (ptr) (* (( (ptr) gf←c38232)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd602 ))))(stream←v9512, (* (( (ptr) gf←c38232)+145) ), 0, 2147483647, pd602);
      };
SOURCE(17428, 53)
   {
      word var←c34104;
      word pd603;
      pd603 = (* (( (ptr) (* (( (ptr) gf←c38232)+242)/* var←c30520 */  ))+8) );
      var←c34104 = (word) ( *( (fPt) ((*  (ptr) pd603 ))))(stream←v9512, (*  (ptr) refStructureRep←v5504 ), pd603);
      };
SOURCE(17485, 24)
   {
      word pd604;
      pd604 = (* (( (ptr) (* (( (ptr) gf←c38232)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd604 ))))(stream←v9512, (* (( (ptr) gf←c38232)+126) ), 0, 2147483647, pd604);
      };
SOURCE(17513, 26)
   {
      word pd605;
      pd605 = (* (( (ptr) (* (( (ptr) gf←c38232)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd605 ))))(stream←v9512, (* (( (ptr) gf←c38232)+122) ), 0, 2147483647, pd605);
      };
SOURCE(17543, 24)
   {
      word pd606;
      pd606 = (* (( (ptr) (* (( (ptr) gf←c38232)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd606 ))))(stream←v9512, (* (( (ptr) gf←c38232)+145) ), 0, 2147483647, pd606);
      };
SOURCE(17571, 52)
   {
      word var←c34136;
      word pd607;
      pd607 = (* (( (ptr) (* (( (ptr) gf←c38232)+242)/* var←c30520 */  ))+8) );
      var←c34136 = (word) ( *( (fPt) ((*  (ptr) pd607 ))))(stream←v9512, (* (( (ptr) refStructureRep←v5504)+1) ), pd607);
      };
SOURCE(17627, 23)
   {
      word pd608;
      pd608 = (* (( (ptr) (* (( (ptr) gf←c38232)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd608 ))))(stream←v9512, (* (( (ptr) gf←c38232)+94) ), 0, 2147483647, pd608);
      };
SOURCE(17227, 423)
   return(ok←v9584);
   }

static word REFStippleDataRepPrinter←P1080(stream←v9644, ref←v9672)
   word stream←v9644;
   word ref←v9672;
   {
   register ptr gf←c38264 =  (ptr) &globalframe;
   word ok←v9716;
   word refStippleDataRep←v5560;
   /* REFStippleDataRepPrinter: */ 
SOURCE(17657, 485)
SOURCE(17657, 485)
   ok←v9716 = 1;
SOURCE(17711, 63)
   refStippleDataRep←v5560 = XR←Narrow(ref←v9672, (* (( (ptr) gf←c38264)+21) ));
SOURCE(17778, 23)
   {
      word pd609;
      pd609 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd609 ))))(stream←v9644, (* (( (ptr) gf←c38264)+177) ), 0, 2147483647, pd609);
      };
SOURCE(17805, 26)
   {
      word pd610;
      pd610 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd610 ))))(stream←v9644, (* (( (ptr) gf←c38264)+117) ), 0, 2147483647, pd610);
      };
SOURCE(17835, 24)
   {
      word pd611;
      pd611 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd611 ))))(stream←v9644, (* (( (ptr) gf←c38264)+145) ), 0, 2147483647, pd611);
      };
SOURCE(17863, 66)
   {
      W2 var←c34168;
      var←c34168.f0 = 4;
      var←c34168.f1 = (*  (ptr) refStippleDataRep←v5560 );
      {
         word pd612;
         pd612 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd612 ))))(stream←v9644, var←c34168, pd612);
         };
      };
SOURCE(17933, 24)
   {
      word pd613;
      pd613 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd613 ))))(stream←v9644, (* (( (ptr) gf←c38264)+126) ), 0, 2147483647, pd613);
      };
SOURCE(17961, 30)
   {
      word pd614;
      pd614 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd614 ))))(stream←v9644, (* (( (ptr) gf←c38264)+118) ), 0, 2147483647, pd614);
      };
SOURCE(17995, 24)
   {
      word pd615;
      pd615 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd615 ))))(stream←v9644, (* (( (ptr) gf←c38264)+145) ), 0, 2147483647, pd615);
      };
SOURCE(18023, 92)
   {
      word var←c34264;
      {
         word var←c34200;
         {
            word var←c34232;
            var←c34232 = XR←NewObject(4, (* (( (ptr) gf←c38264)+43) ));
            (*  (ptr) var←c34232 ) =  (unsigned) ((* (( (bPt) refStippleDataRep←v5560)+7) ) & 7);
            var←c34200 = var←c34232;
            };
         {
            word pd616;
            pd616 = (* (( (ptr) (* (( (ptr) gf←c38264)+242)/* var←c30520 */  ))+7) );
            var←c34264 = (word) ( *( (fPt) ((*  (ptr) pd616 ))))(stream←v9644, var←c34200, pd616);
            };
         };
      };
SOURCE(18119, 23)
   {
      word pd617;
      pd617 = (* (( (ptr) (* (( (ptr) gf←c38264)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd617 ))))(stream←v9644, (* (( (ptr) gf←c38264)+94) ), 0, 2147483647, pd617);
      };
SOURCE(17657, 485)
   return(ok←v9716);
   }

static word REFStateRepPrinter←P1140(stream←v9776, ref←v9804)
   word stream←v9776;
   word ref←v9804;
   {
   register ptr gf←c38296 =  (ptr) &globalframe;
   word ok←v9848;
   word refStateRep←v5616;
   /* REFStateRepPrinter: */ 
SOURCE(18149, 2144)
SOURCE(18149, 2144)
   ok←v9848 = 1;
SOURCE(18197, 51)
   refStateRep←v5616 = XR←Narrow(ref←v9804, (* (( (ptr) gf←c38296)+22) ));
SOURCE(18252, 23)
   {
      word pd618;
      pd618 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd618 ))))(stream←v9776, (* (( (ptr) gf←c38296)+177) ), 0, 2147483647, pd618);
      };
SOURCE(18279, 32)
   {
      word pd619;
      pd619 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd619 ))))(stream←v9776, (* (( (ptr) gf←c38296)+120) ), 0, 2147483647, pd619);
      };
SOURCE(18315, 24)
   {
      word pd620;
      pd620 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd620 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd620);
      };
SOURCE(18343, 65)
   {
      W2 var←c34296;
      var←c34296.f0 = 2;
      var←c34296.f1 = (*  (ptr) refStateRep←v5616 );
      {
         word pd621;
         pd621 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd621 ))))(stream←v9776, var←c34296, pd621);
         };
      };
SOURCE(18412, 24)
   {
      word pd622;
      pd622 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd622 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd622);
      };
SOURCE(18440, 29)
   {
      word pd623;
      pd623 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd623 ))))(stream←v9776, (* (( (ptr) gf←c38296)+121) ), 0, 2147483647, pd623);
      };
SOURCE(18473, 24)
   {
      word pd624;
      pd624 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd624 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd624);
      };
SOURCE(18501, 87)
   {
      word var←c34392;
      {
         word var←c34328;
         {
            word var←c34360;
            var←c34360 = XR←NewObject(4, (* (( (ptr) gf←c38296)+42) ));
            (*  (ptr) var←c34360 ) = (* (( (ptr) refStateRep←v5616)+1) );
            var←c34328 = var←c34360;
            };
         {
            word pd625;
            pd625 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+7) );
            var←c34392 = (word) ( *( (fPt) ((*  (ptr) pd625 ))))(stream←v9776, var←c34328, pd625);
            };
         };
      };
SOURCE(18592, 24)
   {
      word pd626;
      pd626 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd626 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd626);
      };
SOURCE(18620, 23)
   {
      word pd627;
      pd627 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd627 ))))(stream←v9776, (* (( (ptr) gf←c38296)+123) ), 0, 2147483647, pd627);
      };
SOURCE(18647, 24)
   {
      word pd628;
      pd628 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd628 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd628);
      };
SOURCE(18675, 89)
   {
      word var←c34488;
      {
         word var←c34424;
         {
            word var←c34456;
            var←c34456 = XR←NewObject(36, (* (( (ptr) gf←c38296)+41) ));
            (*  (W9Pt) var←c34456 ) = (*  (W9Pt) (( (ptr) refStateRep←v5616)+2) );
            var←c34424 = var←c34456;
            };
         {
            word pd629;
            pd629 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+7) );
            var←c34488 = (word) ( *( (fPt) ((*  (ptr) pd629 ))))(stream←v9776, var←c34424, pd629);
            };
         };
      };
SOURCE(18768, 24)
   {
      word pd630;
      pd630 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd630 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd630);
      };
SOURCE(18796, 24)
   {
      word pd631;
      pd631 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd631 ))))(stream←v9776, (* (( (ptr) gf←c38296)+125) ), 0, 2147483647, pd631);
      };
SOURCE(18824, 24)
   {
      word pd632;
      pd632 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd632 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd632);
      };
SOURCE(18852, 93)
   {
      word var←c34584;
      {
         word var←c34520;
         {
            word var←c34552;
            var←c34552 = XR←NewObject(84, (* (( (ptr) gf←c38296)+40) ));
            (*  (W21Pt) var←c34552 ) = (*  (W21Pt) (( (ptr) refStateRep←v5616)+11) );
            var←c34520 = var←c34552;
            };
         {
            word pd633;
            pd633 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+7) );
            var←c34584 = (word) ( *( (fPt) ((*  (ptr) pd633 ))))(stream←v9776, var←c34520, pd633);
            };
         };
      };
SOURCE(18949, 24)
   {
      word pd634;
      pd634 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd634 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd634);
      };
SOURCE(18977, 24)
   {
      word pd635;
      pd635 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd635 ))))(stream←v9776, (* (( (ptr) gf←c38296)+127) ), 0, 2147483647, pd635);
      };
SOURCE(19005, 24)
   {
      word pd636;
      pd636 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd636 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd636);
      };
SOURCE(19033, 46)
   {
      word var←c34616;
      word pd637;
      pd637 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34616 = (word) ( *( (fPt) ((*  (ptr) pd637 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+32) ), pd637);
      };
SOURCE(19083, 24)
   {
      word pd638;
      pd638 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd638 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd638);
      };
SOURCE(19111, 36)
   {
      word pd639;
      pd639 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd639 ))))(stream←v9776, (* (( (ptr) gf←c38296)+128) ), 0, 2147483647, pd639);
      };
SOURCE(19151, 24)
   {
      word pd640;
      pd640 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd640 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd640);
      };
SOURCE(19179, 58)
   {
      word var←c34648;
      word pd641;
      pd641 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34648 = (word) ( *( (fPt) ((*  (ptr) pd641 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+33) ), pd641);
      };
SOURCE(19241, 24)
   {
      word pd642;
      pd642 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd642 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd642);
      };
SOURCE(19269, 34)
   {
      word pd643;
      pd643 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd643 ))))(stream←v9776, (* (( (ptr) gf←c38296)+129) ), 0, 2147483647, pd643);
      };
SOURCE(19307, 24)
   {
      word pd644;
      pd644 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd644 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd644);
      };
SOURCE(19335, 56)
   {
      word var←c34680;
      word pd645;
      pd645 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34680 = (word) ( *( (fPt) ((*  (ptr) pd645 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+34) ), pd645);
      };
SOURCE(19395, 24)
   {
      word pd646;
      pd646 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd646 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd646);
      };
SOURCE(19423, 26)
   {
      word pd647;
      pd647 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd647 ))))(stream←v9776, (* (( (ptr) gf←c38296)+130) ), 0, 2147483647, pd647);
      };
SOURCE(19453, 24)
   {
      word pd648;
      pd648 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd648 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd648);
      };
SOURCE(19481, 48)
   {
      word var←c34712;
      word pd649;
      pd649 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34712 = (word) ( *( (fPt) ((*  (ptr) pd649 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+35) ), pd649);
      };
SOURCE(19533, 24)
   {
      word pd650;
      pd650 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd650 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd650);
      };
SOURCE(19561, 27)
   {
      word pd651;
      pd651 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd651 ))))(stream←v9776, (* (( (ptr) gf←c38296)+131) ), 0, 2147483647, pd651);
      };
SOURCE(19592, 24)
   {
      word pd652;
      pd652 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd652 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd652);
      };
SOURCE(19620, 49)
   {
      word var←c34744;
      word pd653;
      pd653 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34744 = (word) ( *( (fPt) ((*  (ptr) pd653 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+36) ), pd653);
      };
SOURCE(19673, 24)
   {
      word pd654;
      pd654 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd654 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd654);
      };
SOURCE(19701, 29)
   {
      word pd655;
      pd655 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd655 ))))(stream←v9776, (* (( (ptr) gf←c38296)+132) ), 0, 2147483647, pd655);
      };
SOURCE(19734, 24)
   {
      word pd656;
      pd656 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd656 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd656);
      };
SOURCE(19762, 68)
   {
      W2 var←c34776;
      var←c34776.f0 = 4;
      var←c34776.f1 = (* (( (ptr) refStateRep←v5616)+37) );
      {
         word pd657;
         pd657 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd657 ))))(stream←v9776, (* (( (ptr) gf←c38296)+112) ), var←c34776, pd657);
         };
      };
SOURCE(19834, 24)
   {
      word pd658;
      pd658 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd658 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd658);
      };
SOURCE(19862, 30)
   {
      word pd659;
      pd659 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd659 ))))(stream←v9776, (* (( (ptr) gf←c38296)+133) ), 0, 2147483647, pd659);
      };
SOURCE(19896, 24)
   {
      word pd660;
      pd660 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd660 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd660);
      };
SOURCE(19924, 52)
   {
      word var←c34808;
      word pd661;
      pd661 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34808 = (word) ( *( (fPt) ((*  (ptr) pd661 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+38) ), pd661);
      };
SOURCE(19980, 24)
   {
      word pd662;
      pd662 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd662 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd662);
      };
SOURCE(20008, 27)
   {
      word pd663;
      pd663 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd663 ))))(stream←v9776, (* (( (ptr) gf←c38296)+134) ), 0, 2147483647, pd663);
      };
SOURCE(20039, 24)
   {
      word pd664;
      pd664 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd664 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd664);
      };
SOURCE(20067, 49)
   {
      word var←c34840;
      word pd665;
      pd665 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34840 = (word) ( *( (fPt) ((*  (ptr) pd665 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+39) ), pd665);
      };
SOURCE(20120, 24)
   {
      word pd666;
      pd666 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd666 ))))(stream←v9776, (* (( (ptr) gf←c38296)+126) ), 0, 2147483647, pd666);
      };
SOURCE(20148, 32)
   {
      word pd667;
      pd667 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd667 ))))(stream←v9776, (* (( (ptr) gf←c38296)+135) ), 0, 2147483647, pd667);
      };
SOURCE(20184, 24)
   {
      word pd668;
      pd668 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd668 ))))(stream←v9776, (* (( (ptr) gf←c38296)+145) ), 0, 2147483647, pd668);
      };
SOURCE(20212, 54)
   {
      word var←c34872;
      word pd669;
      pd669 = (* (( (ptr) (* (( (ptr) gf←c38296)+242)/* var←c30520 */  ))+8) );
      var←c34872 = (word) ( *( (fPt) ((*  (ptr) pd669 ))))(stream←v9776, (* (( (ptr) refStateRep←v5616)+40) ), pd669);
      };
SOURCE(20270, 23)
   {
      word pd670;
      pd670 = (* (( (ptr) (* (( (ptr) gf←c38296)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd670 ))))(stream←v9776, (* (( (ptr) gf←c38296)+94) ), 0, 2147483647, pd670);
      };
SOURCE(18149, 2144)
   return(ok←v9848);
   }

static word REFPenRepPrinter←P1200(stream←v9908, ref←v9936)
   word stream←v9908;
   word ref←v9936;
   {
   register ptr gf←c38328 =  (ptr) &globalframe;
   word ok←v9980;
   word refPenRep←v5672;
   /* REFPenRepPrinter: */ 
SOURCE(20300, 1249)
SOURCE(20300, 1249)
   ok←v9980 = 1;
SOURCE(20346, 47)
   refPenRep←v5672 = XR←Narrow(ref←v9936, (* (( (ptr) gf←c38328)+23) ));
SOURCE(20397, 23)
   {
      word pd671;
      pd671 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd671 ))))(stream←v9908, (* (( (ptr) gf←c38328)+177) ), 0, 2147483647, pd671);
      };
SOURCE(20424, 28)
   {
      word pd672;
      pd672 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd672 ))))(stream←v9908, (* (( (ptr) gf←c38328)+88) ), 0, 2147483647, pd672);
      };
SOURCE(20456, 24)
   {
      word pd673;
      pd673 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd673 ))))(stream←v9908, (* (( (ptr) gf←c38328)+145) ), 0, 2147483647, pd673);
      };
SOURCE(20484, 72)
   {
      word var←c34968;
      {
         word var←c34904;
         {
            word var←c34936;
            var←c34936 = XR←NewObject(8, (* (( (ptr) gf←c38328)+24) ));
            (*  (W2Pt) var←c34936 ) = (*  (W2Pt) refPenRep←v5672 );
            var←c34904 = var←c34936;
            };
         {
            word pd674;
            pd674 = (* (( (ptr) (* (( (ptr) gf←c38328)+242)/* var←c30520 */  ))+7) );
            var←c34968 = (word) ( *( (fPt) ((*  (ptr) pd674 ))))(stream←v9908, var←c34904, pd674);
            };
         };
      };
SOURCE(20560, 24)
   {
      word pd675;
      pd675 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd675 ))))(stream←v9908, (* (( (ptr) gf←c38328)+126) ), 0, 2147483647, pd675);
      };
SOURCE(20588, 31)
   {
      word pd676;
      pd676 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd676 ))))(stream←v9908, (* (( (ptr) gf←c38328)+136) ), 0, 2147483647, pd676);
      };
SOURCE(20623, 24)
   {
      word pd677;
      pd677 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd677 ))))(stream←v9908, (* (( (ptr) gf←c38328)+145) ), 0, 2147483647, pd677);
      };
SOURCE(20651, 59)
   {
      W2 var←c35000;
      var←c35000.f0 = 8;
      var←c35000.f1 = (* (( (ptr) refPenRep←v5672)+2) );
      {
         word pd678;
         pd678 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd678 ))))(stream←v9908, var←c35000, pd678);
         };
      };
SOURCE(20714, 24)
   {
      word pd679;
      pd679 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd679 ))))(stream←v9908, (* (( (ptr) gf←c38328)+126) ), 0, 2147483647, pd679);
      };
SOURCE(20742, 31)
   {
      word pd680;
      pd680 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd680 ))))(stream←v9908, (* (( (ptr) gf←c38328)+137) ), 0, 2147483647, pd680);
      };
SOURCE(20777, 24)
   {
      word pd681;
      pd681 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd681 ))))(stream←v9908, (* (( (ptr) gf←c38328)+145) ), 0, 2147483647, pd681);
      };
SOURCE(20805, 59)
   {
      W2 var←c35032;
      var←c35032.f0 = 8;
      var←c35032.f1 = (* (( (ptr) refPenRep←v5672)+3) );
      {
         word pd682;
         pd682 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd682 ))))(stream←v9908, var←c35032, pd682);
         };
      };
SOURCE(20868, 24)
   {
      word pd683;
      pd683 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd683 ))))(stream←v9908, (* (( (ptr) gf←c38328)+126) ), 0, 2147483647, pd683);
      };
SOURCE(20896, 27)
   {
      word pd684;
      pd684 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd684 ))))(stream←v9908, (* (( (ptr) gf←c38328)+138) ), 0, 2147483647, pd684);
      };
SOURCE(20927, 24)
   {
      word pd685;
      pd685 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd685 ))))(stream←v9908, (* (( (ptr) gf←c38328)+145) ), 0, 2147483647, pd685);
      };
SOURCE(20955, 77)
   {
      word var←c35128;
      {
         word var←c35064;
         {
            word var←c35096;
            var←c35096 = XR←NewObject(4, (* (( (ptr) gf←c38328)+47) ));
            (*  (ptr) var←c35096 ) = (* (( (ptr) refPenRep←v5672)+4) );
            var←c35064 = var←c35096;
            };
         {
            word pd686;
            pd686 = (* (( (ptr) (* (( (ptr) gf←c38328)+242)/* var←c30520 */  ))+7) );
            var←c35128 = (word) ( *( (fPt) ((*  (ptr) pd686 ))))(stream←v9908, var←c35064, pd686);
            };
         };
      };
SOURCE(21036, 24)
   {
      word pd687;
      pd687 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd687 ))))(stream←v9908, (* (( (ptr) gf←c38328)+126) ), 0, 2147483647, pd687);
      };
SOURCE(21064, 23)
   {
      word pd688;
      pd688 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd688 ))))(stream←v9908, (* (( (ptr) gf←c38328)+139) ), 0, 2147483647, pd688);
      };
SOURCE(21091, 24)
   {
      word pd689;
      pd689 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd689 ))))(stream←v9908, (* (( (ptr) gf←c38328)+145) ), 0, 2147483647, pd689);
      };
SOURCE(21119, 373)
   {
      word first←v5728 = 1;
SOURCE(21149, 23)
      {
         word pd690;
         pd690 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd690 ))))(stream←v9908, (* (( (ptr) gf←c38328)+50) ), 0, 2147483647, pd690);
         };
SOURCE(21176, 57)
      {
         W2 var←c35160;
         var←c35160.f0 = 5;
         var←c35160.f1 = (* (( (ptr) refPenRep←v5672)+5) );
         {
            word pd691;
            pd691 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+55) );
            (void) ( *( (fPt) ((*  (ptr) pd691 ))))(stream←v9908, var←c35160, pd691);
            };
         };
SOURCE(21237, 23)
      {
         word pd692;
         pd692 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd692 ))))(stream←v9908, (* (( (ptr) gf←c38328)+51) ), 0, 2147483647, pd692);
         };
SOURCE(21264, 23)
      {
         word pd693;
         pd693 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd693 ))))(stream←v9908, (* (( (ptr) gf←c38328)+177) ), 0, 2147483647, pd693);
         };
SOURCE(21291, 184)
      {
         register word i←v5772 = 0;
         register word noName←c35192;
         noName←c35192 = (* (( (ptr) refPenRep←v5672)+5) );
         if ((i←v5772 >= noName←c35192)) {
            goto lab←L100023;
            };
         lab←L100026: ;
SOURCE(21344, 57)
         if ((0 != first←v5728)) {
SOURCE(21358, 19)
            first←v5728 = 0;
            }
         else {
SOURCE(21377, 24)
            {
               word pd694;
               pd694 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd694 ))))(stream←v9908, (* (( (ptr) gf←c38328)+126) ), 0, 2147483647, pd694);
               };
            };
SOURCE(21407, 68)
         {
            word var←c35288;
            {
               word var←c35224;
               {
                  word var←c35256;
                  var←c35256 = XR←NewObject(8, (* (( (ptr) gf←c38328)+24) ));
                  {
                     word limit695;
                     (*  (W2Pt) var←c35256 ) = (* (( (W2Pt) (( (ptr) refPenRep←v5672)+6))+(
                           limit695 = (* (( (ptr) refPenRep←v5672)+5) ),
                           BCK(i←v5772, limit695)
                           )) );
                     };
                  var←c35224 = var←c35256;
                  };
               {
                  word pd696;
                  pd696 = (* (( (ptr) (* (( (ptr) gf←c38328)+242)/* var←c30520 */  ))+7) );
                  var←c35288 = (word) ( *( (fPt) ((*  (ptr) pd696 ))))(stream←v9908, var←c35224, pd696);
                  };
               };
            };
         i←v5772 = (i←v5772 + 1);
         if ((i←v5772 < noName←c35192)) {
            goto lab←L100026;
            };
         lab←L100023: ;
         };
      };
SOURCE(21499, 23)
   {
      word pd697;
      pd697 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd697 ))))(stream←v9908, (* (( (ptr) gf←c38328)+94) ), 0, 2147483647, pd697);
      };
SOURCE(21526, 23)
   {
      word pd698;
      pd698 = (* (( (ptr) (* (( (ptr) gf←c38328)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd698 ))))(stream←v9908, (* (( (ptr) gf←c38328)+94) ), 0, 2147483647, pd698);
      };
SOURCE(20300, 1249)
   return(ok←v9980);
   }

static word REFVECPrinter←P1260(stream←v10040, ref←v10068)
   word stream←v10040;
   word ref←v10068;
   {
   register ptr gf←c38360 =  (ptr) &globalframe;
   word ok←v10112;
   word refVEC←v5816;
   /* REFVECPrinter: */ 
SOURCE(21556, 380)
SOURCE(21556, 380)
   ok←v10112 = 1;
SOURCE(21599, 41)
   refVEC←v5816 = XR←Narrow(ref←v10068, (* (( (ptr) gf←c38360)+24) ));
SOURCE(21644, 23)
   {
      word pd699;
      pd699 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd699 ))))(stream←v10040, (* (( (ptr) gf←c38360)+177) ), 0, 2147483647, pd699);
      };
SOURCE(21671, 23)
   {
      word pd700;
      pd700 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd700 ))))(stream←v10040, (* (( (ptr) gf←c38360)+67) ), 0, 2147483647, pd700);
      };
SOURCE(21698, 24)
   {
      word pd701;
      pd701 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd701 ))))(stream←v10040, (* (( (ptr) gf←c38360)+145) ), 0, 2147483647, pd701);
      };
SOURCE(21726, 48)
   {
      W2 var←c35320;
      var←c35320.f0 = 8;
      var←c35320.f1 = (*  (ptr) refVEC←v5816 );
      {
         word pd702;
         pd702 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd702 ))))(stream←v10040, var←c35320, pd702);
         };
      };
SOURCE(21778, 24)
   {
      word pd703;
      pd703 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd703 ))))(stream←v10040, (* (( (ptr) gf←c38360)+126) ), 0, 2147483647, pd703);
      };
SOURCE(21806, 23)
   {
      word pd704;
      pd704 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd704 ))))(stream←v10040, (* (( (ptr) gf←c38360)+68) ), 0, 2147483647, pd704);
      };
SOURCE(21833, 24)
   {
      word pd705;
      pd705 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd705 ))))(stream←v10040, (* (( (ptr) gf←c38360)+145) ), 0, 2147483647, pd705);
      };
SOURCE(21861, 48)
   {
      W2 var←c35352;
      var←c35352.f0 = 8;
      var←c35352.f1 = (* (( (ptr) refVEC←v5816)+1) );
      {
         word pd706;
         pd706 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd706 ))))(stream←v10040, var←c35352, pd706);
         };
      };
SOURCE(21913, 23)
   {
      word pd707;
      pd707 = (* (( (ptr) (* (( (ptr) gf←c38360)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd707 ))))(stream←v10040, (* (( (ptr) gf←c38360)+94) ), 0, 2147483647, pd707);
      };
SOURCE(21556, 380)
   return(ok←v10112);
   }

static word REFSFBoxPrinter←P1320(stream←v10172, ref←v10200)
   word stream←v10172;
   word ref←v10200;
   {
   register ptr gf←c38392 =  (ptr) &globalframe;
   word ok←v10244;
   word refSFBox←v5872;
   /* REFSFBoxPrinter: */ 
SOURCE(21943, 420)
SOURCE(21943, 420)
   ok←v10244 = 1;
SOURCE(21988, 45)
   refSFBox←v5872 = XR←Narrow(ref←v10200, (* (( (ptr) gf←c38392)+25) ));
SOURCE(22037, 23)
   {
      word pd708;
      pd708 = (* (( (ptr) (* (( (ptr) gf←c38392)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd708 ))))(stream←v10172, (* (( (ptr) gf←c38392)+177) ), 0, 2147483647, pd708);
      };
SOURCE(22064, 25)
   {
      word pd709;
      pd709 = (* (( (ptr) (* (( (ptr) gf←c38392)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd709 ))))(stream←v10172, (* (( (ptr) gf←c38392)+140) ), 0, 2147483647, pd709);
      };
SOURCE(22093, 24)
   {
      word pd710;
      pd710 = (* (( (ptr) (* (( (ptr) gf←c38392)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd710 ))))(stream←v10172, (* (( (ptr) gf←c38392)+145) ), 0, 2147483647, pd710);
      };
SOURCE(22121, 63)
   {
      word var←c35448;
      {
         word var←c35384;
         {
            word var←c35416;
            var←c35416 = XR←NewObject(8, (* (( (ptr) gf←c38392)+26) ));
            (*  (W2Pt) var←c35416 ) = (*  (W2Pt) refSFBox←v5872 );
            var←c35384 = var←c35416;
            };
         {
            word pd711;
            pd711 = (* (( (ptr) (* (( (ptr) gf←c38392)+242)/* var←c30520 */  ))+7) );
            var←c35448 = (word) ( *( (fPt) ((*  (ptr) pd711 ))))(stream←v10172, var←c35384, pd711);
            };
         };
      };
SOURCE(22188, 24)
   {
      word pd712;
      pd712 = (* (( (ptr) (* (( (ptr) gf←c38392)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd712 ))))(stream←v10172, (* (( (ptr) gf←c38392)+126) ), 0, 2147483647, pd712);
      };
SOURCE(22216, 25)
   {
      word pd713;
      pd713 = (* (( (ptr) (* (( (ptr) gf←c38392)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd713 ))))(stream←v10172, (* (( (ptr) gf←c38392)+141) ), 0, 2147483647, pd713);
      };
SOURCE(22245, 24)
   {
      word pd714;
      pd714 = (* (( (ptr) (* (( (ptr) gf←c38392)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd714 ))))(stream←v10172, (* (( (ptr) gf←c38392)+145) ), 0, 2147483647, pd714);
      };
SOURCE(22273, 63)
   {
      word var←c35544;
      {
         word var←c35480;
         {
            word var←c35512;
            var←c35512 = XR←NewObject(8, (* (( (ptr) gf←c38392)+26) ));
            (*  (W2Pt) var←c35512 ) = (*  (W2Pt) (( (ptr) refSFBox←v5872)+2) );
            var←c35480 = var←c35512;
            };
         {
            word pd715;
            pd715 = (* (( (ptr) (* (( (ptr) gf←c38392)+242)/* var←c30520 */  ))+7) );
            var←c35544 = (word) ( *( (fPt) ((*  (ptr) pd715 ))))(stream←v10172, var←c35480, pd715);
            };
         };
      };
SOURCE(22340, 23)
   {
      word pd716;
      pd716 = (* (( (ptr) (* (( (ptr) gf←c38392)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd716 ))))(stream←v10172, (* (( (ptr) gf←c38392)+94) ), 0, 2147483647, pd716);
      };
SOURCE(21943, 420)
   return(ok←v10244);
   }

static word REFSFVecPrinter←P1380(stream←v10304, ref←v10332)
   word stream←v10304;
   word ref←v10332;
   {
   register ptr gf←c38424 =  (ptr) &globalframe;
   word ok←v10376;
   word refSFVec←v5928;
   /* REFSFVecPrinter: */ 
SOURCE(22370, 396)
SOURCE(22370, 396)
   ok←v10376 = 1;
SOURCE(22415, 45)
   refSFVec←v5928 = XR←Narrow(ref←v10332, (* (( (ptr) gf←c38424)+26) ));
SOURCE(22464, 23)
   {
      word pd717;
      pd717 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd717 ))))(stream←v10304, (* (( (ptr) gf←c38424)+177) ), 0, 2147483647, pd717);
      };
SOURCE(22491, 23)
   {
      word pd718;
      pd718 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd718 ))))(stream←v10304, (* (( (ptr) gf←c38424)+139) ), 0, 2147483647, pd718);
      };
SOURCE(22518, 24)
   {
      word pd719;
      pd719 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd719 ))))(stream←v10304, (* (( (ptr) gf←c38424)+145) ), 0, 2147483647, pd719);
      };
SOURCE(22546, 53)
   {
      W2 var←c35576;
      var←c35576.f0 = 5;
      var←c35576.f1 = (*  (ptr) refSFVec←v5928 );
      {
         word pd720;
         pd720 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd720 ))))(stream←v10304, var←c35576, pd720);
         };
      };
SOURCE(22603, 24)
   {
      word pd721;
      pd721 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd721 ))))(stream←v10304, (* (( (ptr) gf←c38424)+126) ), 0, 2147483647, pd721);
      };
SOURCE(22631, 23)
   {
      word pd722;
      pd722 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd722 ))))(stream←v10304, (* (( (ptr) gf←c38424)+142) ), 0, 2147483647, pd722);
      };
SOURCE(22658, 24)
   {
      word pd723;
      pd723 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd723 ))))(stream←v10304, (* (( (ptr) gf←c38424)+145) ), 0, 2147483647, pd723);
      };
SOURCE(22686, 53)
   {
      W2 var←c35608;
      var←c35608.f0 = 5;
      var←c35608.f1 = (* (( (ptr) refSFVec←v5928)+1) );
      {
         word pd724;
         pd724 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd724 ))))(stream←v10304, var←c35608, pd724);
         };
      };
SOURCE(22743, 23)
   {
      word pd725;
      pd725 = (* (( (ptr) (* (( (ptr) gf←c38424)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd725 ))))(stream←v10304, (* (( (ptr) gf←c38424)+94) ), 0, 2147483647, pd725);
      };
SOURCE(22370, 396)
   return(ok←v10376);
   }

static word REFTypefaceRepPrinter←P1440(stream←v10436, ref←v10464)
   word stream←v10436;
   word ref←v10464;
   {
   register ptr gf←c38456 =  (ptr) &globalframe;
   word ok←v10508;
   word refTypefaceRep←v5984;
   /* REFTypefaceRepPrinter: */ 
SOURCE(22773, 1359)
SOURCE(22773, 1359)
   ok←v10508 = 1;
SOURCE(22824, 57)
   refTypefaceRep←v5984 = XR←Narrow(ref←v10464, (* (( (ptr) gf←c38456)+27) ));
SOURCE(22885, 23)
   {
      word pd726;
      pd726 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd726 ))))(stream←v10436, (* (( (ptr) gf←c38456)+177) ), 0, 2147483647, pd726);
      };
SOURCE(22912, 27)
   {
      word pd727;
      pd727 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd727 ))))(stream←v10436, (* (( (ptr) gf←c38456)+173) ), 0, 2147483647, pd727);
      };
SOURCE(22943, 24)
   {
      word pd728;
      pd728 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd728 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd728);
      };
SOURCE(22971, 52)
   {
      word var←c35640;
      word pd729;
      pd729 = (* (( (ptr) (* (( (ptr) gf←c38456)+242)/* var←c30520 */  ))+8) );
      var←c35640 = (word) ( *( (fPt) ((*  (ptr) pd729 ))))(stream←v10436, (*  (ptr) refTypefaceRep←v5984 ), pd729);
      };
SOURCE(23027, 24)
   {
      word pd730;
      pd730 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd730 ))))(stream←v10436, (* (( (ptr) gf←c38456)+126) ), 0, 2147483647, pd730);
      };
SOURCE(23055, 26)
   {
      word pd731;
      pd731 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd731 ))))(stream←v10436, (* (( (ptr) gf←c38456)+122) ), 0, 2147483647, pd731);
      };
SOURCE(23085, 24)
   {
      word pd732;
      pd732 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd732 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd732);
      };
SOURCE(23113, 51)
   {
      word var←c35672;
      word pd733;
      pd733 = (* (( (ptr) (* (( (ptr) gf←c38456)+242)/* var←c30520 */  ))+8) );
      var←c35672 = (word) ( *( (fPt) ((*  (ptr) pd733 ))))(stream←v10436, (* (( (ptr) refTypefaceRep←v5984)+1) ), pd733);
      };
SOURCE(23168, 24)
   {
      word pd734;
      pd734 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd734 ))))(stream←v10436, (* (( (ptr) gf←c38456)+126) ), 0, 2147483647, pd734);
      };
SOURCE(23196, 26)
   {
      word pd735;
      pd735 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd735 ))))(stream←v10436, (* (( (ptr) gf←c38456)+55) ), 0, 2147483647, pd735);
      };
SOURCE(23226, 24)
   {
      word pd736;
      pd736 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd736 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd736);
      };
SOURCE(23254, 51)
   {
      word var←c35704;
      word pd737;
      pd737 = (* (( (ptr) (* (( (ptr) gf←c38456)+242)/* var←c30520 */  ))+8) );
      var←c35704 = (word) ( *( (fPt) ((*  (ptr) pd737 ))))(stream←v10436, (* (( (ptr) refTypefaceRep←v5984)+2) ), pd737);
      };
SOURCE(23309, 24)
   {
      word pd738;
      pd738 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd738 ))))(stream←v10436, (* (( (ptr) gf←c38456)+126) ), 0, 2147483647, pd738);
      };
SOURCE(23337, 38)
   {
      word pd739;
      pd739 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd739 ))))(stream←v10436, (* (( (ptr) gf←c38456)+143) ), 0, 2147483647, pd739);
      };
SOURCE(23379, 24)
   {
      word pd740;
      pd740 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd740 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd740);
      };
SOURCE(23407, 63)
   {
      word var←c35736;
      word pd741;
      pd741 = (* (( (ptr) (* (( (ptr) gf←c38456)+242)/* var←c30520 */  ))+8) );
      var←c35736 = (word) ( *( (fPt) ((*  (ptr) pd741 ))))(stream←v10436, (* (( (ptr) refTypefaceRep←v5984)+3) ), pd741);
      };
SOURCE(23474, 24)
   {
      word pd742;
      pd742 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd742 ))))(stream←v10436, (* (( (ptr) gf←c38456)+126) ), 0, 2147483647, pd742);
      };
SOURCE(23502, 29)
   {
      word pd743;
      pd743 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd743 ))))(stream←v10436, (* (( (ptr) gf←c38456)+144) ), 0, 2147483647, pd743);
      };
SOURCE(23535, 24)
   {
      word pd744;
      pd744 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd744 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd744);
      };
SOURCE(23563, 80)
   {
      word var←c35832;
      {
         word var←c35768;
         {
            word var←c35800;
            var←c35800 = XR←NewObject(4, (* (( (ptr) gf←c38456)+39) ));
            (*  (ptr) var←c35800 ) = (* (( (ptr) refTypefaceRep←v5984)+4) );
            var←c35768 = var←c35800;
            };
         {
            word pd745;
            pd745 = (* (( (ptr) (* (( (ptr) gf←c38456)+242)/* var←c30520 */  ))+7) );
            var←c35832 = (word) ( *( (fPt) ((*  (ptr) pd745 ))))(stream←v10436, var←c35768, pd745);
            };
         };
      };
SOURCE(23647, 24)
   {
      word pd746;
      pd746 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd746 ))))(stream←v10436, (* (( (ptr) gf←c38456)+126) ), 0, 2147483647, pd746);
      };
SOURCE(23675, 26)
   {
      word pd747;
      pd747 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd747 ))))(stream←v10436, (* (( (ptr) gf←c38456)+146) ), 0, 2147483647, pd747);
      };
SOURCE(23705, 24)
   {
      word pd748;
      pd748 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd748 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd748);
      };
SOURCE(23733, 51)
   {
      word var←c35864;
      word pd749;
      pd749 = (* (( (ptr) (* (( (ptr) gf←c38456)+242)/* var←c30520 */  ))+8) );
      var←c35864 = (word) ( *( (fPt) ((*  (ptr) pd749 ))))(stream←v10436, (* (( (ptr) refTypefaceRep←v5984)+5) ), pd749);
      };
SOURCE(23788, 24)
   {
      word pd750;
      pd750 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd750 ))))(stream←v10436, (* (( (ptr) gf←c38456)+126) ), 0, 2147483647, pd750);
      };
SOURCE(23816, 33)
   {
      word pd751;
      pd751 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd751 ))))(stream←v10436, (* (( (ptr) gf←c38456)+147) ), 0, 2147483647, pd751);
      };
SOURCE(23853, 24)
   {
      word pd752;
      pd752 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd752 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd752);
      };
SOURCE(23881, 58)
   {
      word var←c35896;
      word pd753;
      pd753 = (* (( (ptr) (* (( (ptr) gf←c38456)+242)/* var←c30520 */  ))+8) );
      var←c35896 = (word) ( *( (fPt) ((*  (ptr) pd753 ))))(stream←v10436, (* (( (ptr) refTypefaceRep←v5984)+6) ), pd753);
      };
SOURCE(23943, 24)
   {
      word pd754;
      pd754 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd754 ))))(stream←v10436, (* (( (ptr) gf←c38456)+126) ), 0, 2147483647, pd754);
      };
SOURCE(23971, 30)
   {
      word pd755;
      pd755 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd755 ))))(stream←v10436, (* (( (ptr) gf←c38456)+119) ), 0, 2147483647, pd755);
      };
SOURCE(24005, 24)
   {
      word pd756;
      pd756 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd756 ))))(stream←v10436, (* (( (ptr) gf←c38456)+145) ), 0, 2147483647, pd756);
      };
SOURCE(24033, 72)
   {
      W2 var←c35928;
      var←c35928.f0 = 4;
      var←c35928.f1 = (* (( (ptr) refTypefaceRep←v5984)+7) );
      {
         word pd757;
         pd757 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd757 ))))(stream←v10436, (* (( (ptr) gf←c38456)+112) ), var←c35928, pd757);
         };
      };
SOURCE(24109, 23)
   {
      word pd758;
      pd758 = (* (( (ptr) (* (( (ptr) gf←c38456)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd758 ))))(stream←v10436, (* (( (ptr) gf←c38456)+94) ), 0, 2147483647, pd758);
      };
SOURCE(22773, 1359)
   return(ok←v10508);
   }

static word REFTransformationRepPrinter←P1500(stream←v10568, ref←v10596)
   word stream←v10568;
   word ref←v10596;
   {
   register ptr gf←c38488 =  (ptr) &globalframe;
   word ok←v10640;
   word refTransformationRep←v6040;
   /* REFTransformationRepPrinter: */ 
SOURCE(24139, 1686)
SOURCE(24139, 1686)
   ok←v10640 = 1;
SOURCE(24196, 69)
   refTransformationRep←v6040 = XR←Narrow(ref←v10596, (* (( (ptr) gf←c38488)+28) ));
SOURCE(24269, 23)
   {
      word pd759;
      pd759 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd759 ))))(stream←v10568, (* (( (ptr) gf←c38488)+177) ), 0, 2147483647, pd759);
      };
SOURCE(24296, 23)
   {
      word pd760;
      pd760 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd760 ))))(stream←v10568, (* (( (ptr) gf←c38488)+148) ), 0, 2147483647, pd760);
      };
SOURCE(24323, 24)
   {
      word pd761;
      pd761 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd761 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd761);
      };
SOURCE(24351, 62)
   {
      W2 var←c35960;
      var←c35960.f0 = 8;
      var←c35960.f1 = (*  (ptr) refTransformationRep←v6040 );
      {
         word pd762;
         pd762 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd762 ))))(stream←v10568, var←c35960, pd762);
         };
      };
SOURCE(24417, 24)
   {
      word pd763;
      pd763 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd763 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd763);
      };
SOURCE(24445, 23)
   {
      word pd764;
      pd764 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd764 ))))(stream←v10568, (* (( (ptr) gf←c38488)+149) ), 0, 2147483647, pd764);
      };
SOURCE(24472, 24)
   {
      word pd765;
      pd765 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd765 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd765);
      };
SOURCE(24500, 62)
   {
      W2 var←c35992;
      var←c35992.f0 = 8;
      var←c35992.f1 = (* (( (ptr) refTransformationRep←v6040)+1) );
      {
         word pd766;
         pd766 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd766 ))))(stream←v10568, var←c35992, pd766);
         };
      };
SOURCE(24566, 24)
   {
      word pd767;
      pd767 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd767 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd767);
      };
SOURCE(24594, 23)
   {
      word pd768;
      pd768 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd768 ))))(stream←v10568, (* (( (ptr) gf←c38488)+150) ), 0, 2147483647, pd768);
      };
SOURCE(24621, 24)
   {
      word pd769;
      pd769 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd769 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd769);
      };
SOURCE(24649, 62)
   {
      W2 var←c36024;
      var←c36024.f0 = 8;
      var←c36024.f1 = (* (( (ptr) refTransformationRep←v6040)+2) );
      {
         word pd770;
         pd770 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd770 ))))(stream←v10568, var←c36024, pd770);
         };
      };
SOURCE(24715, 24)
   {
      word pd771;
      pd771 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd771 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd771);
      };
SOURCE(24743, 23)
   {
      word pd772;
      pd772 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd772 ))))(stream←v10568, (* (( (ptr) gf←c38488)+151) ), 0, 2147483647, pd772);
      };
SOURCE(24770, 24)
   {
      word pd773;
      pd773 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd773 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd773);
      };
SOURCE(24798, 62)
   {
      W2 var←c36056;
      var←c36056.f0 = 8;
      var←c36056.f1 = (* (( (ptr) refTransformationRep←v6040)+3) );
      {
         word pd774;
         pd774 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd774 ))))(stream←v10568, var←c36056, pd774);
         };
      };
SOURCE(24864, 24)
   {
      word pd775;
      pd775 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd775 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd775);
      };
SOURCE(24892, 23)
   {
      word pd776;
      pd776 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd776 ))))(stream←v10568, (* (( (ptr) gf←c38488)+152) ), 0, 2147483647, pd776);
      };
SOURCE(24919, 24)
   {
      word pd777;
      pd777 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd777 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd777);
      };
SOURCE(24947, 62)
   {
      W2 var←c36088;
      var←c36088.f0 = 8;
      var←c36088.f1 = (* (( (ptr) refTransformationRep←v6040)+4) );
      {
         word pd778;
         pd778 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd778 ))))(stream←v10568, var←c36088, pd778);
         };
      };
SOURCE(25013, 24)
   {
      word pd779;
      pd779 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd779 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd779);
      };
SOURCE(25041, 23)
   {
      word pd780;
      pd780 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd780 ))))(stream←v10568, (* (( (ptr) gf←c38488)+142) ), 0, 2147483647, pd780);
      };
SOURCE(25068, 24)
   {
      word pd781;
      pd781 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd781 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd781);
      };
SOURCE(25096, 62)
   {
      W2 var←c36120;
      var←c36120.f0 = 8;
      var←c36120.f1 = (* (( (ptr) refTransformationRep←v6040)+5) );
      {
         word pd782;
         pd782 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd782 ))))(stream←v10568, var←c36120, pd782);
         };
      };
SOURCE(25162, 24)
   {
      word pd783;
      pd783 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd783 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd783);
      };
SOURCE(25190, 24)
   {
      word pd784;
      pd784 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd784 ))))(stream←v10568, (* (( (ptr) gf←c38488)+153) ), 0, 2147483647, pd784);
      };
SOURCE(25218, 24)
   {
      word pd785;
      pd785 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd785 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd785);
      };
SOURCE(25246, 66)
   {
      W2 var←c36152;
      var←c36152.f0 = 5;
      var←c36152.f1 = (* (( (ptr) refTransformationRep←v6040)+6) );
      {
         word pd786;
         pd786 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd786 ))))(stream←v10568, var←c36152, pd786);
         };
      };
SOURCE(25316, 24)
   {
      word pd787;
      pd787 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd787 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd787);
      };
SOURCE(25344, 24)
   {
      word pd788;
      pd788 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd788 ))))(stream←v10568, (* (( (ptr) gf←c38488)+154) ), 0, 2147483647, pd788);
      };
SOURCE(25372, 24)
   {
      word pd789;
      pd789 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd789 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd789);
      };
SOURCE(25400, 66)
   {
      W2 var←c36184;
      var←c36184.f0 = 5;
      var←c36184.f1 = (* (( (ptr) refTransformationRep←v6040)+7) );
      {
         word pd790;
         pd790 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd790 ))))(stream←v10568, var←c36184, pd790);
         };
      };
SOURCE(25470, 24)
   {
      word pd791;
      pd791 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd791 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd791);
      };
SOURCE(25498, 34)
   {
      word pd792;
      pd792 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd792 ))))(stream←v10568, (* (( (ptr) gf←c38488)+155) ), 0, 2147483647, pd792);
      };
SOURCE(25536, 24)
   {
      word pd793;
      pd793 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd793 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd793);
      };
SOURCE(25564, 76)
   {
      W2 var←c36216;
      var←c36216.f0 = 2;
      var←c36216.f1 = (* (( (ptr) refTransformationRep←v6040)+8) );
      {
         word pd794;
         pd794 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd794 ))))(stream←v10568, var←c36216, pd794);
         };
      };
SOURCE(25644, 24)
   {
      word pd795;
      pd795 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd795 ))))(stream←v10568, (* (( (ptr) gf←c38488)+126) ), 0, 2147483647, pd795);
      };
SOURCE(25672, 26)
   {
      word pd796;
      pd796 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd796 ))))(stream←v10568, (* (( (ptr) gf←c38488)+156) ), 0, 2147483647, pd796);
      };
SOURCE(25702, 24)
   {
      word pd797;
      pd797 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd797 ))))(stream←v10568, (* (( (ptr) gf←c38488)+145) ), 0, 2147483647, pd797);
      };
SOURCE(25730, 68)
   {
      W2 var←c36248;
      var←c36248.f0 = 5;
      var←c36248.f1 = (* (( (ptr) refTransformationRep←v6040)+9) );
      {
         word pd798;
         pd798 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd798 ))))(stream←v10568, var←c36248, pd798);
         };
      };
SOURCE(25802, 23)
   {
      word pd799;
      pd799 = (* (( (ptr) (* (( (ptr) gf←c38488)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd799 ))))(stream←v10568, (* (( (ptr) gf←c38488)+94) ), 0, 2147483647, pd799);
      };
SOURCE(24139, 1686)
   return(ok←v10640);
   }

static word REFOutlineRepPrinter←P1560(stream←v10700, ref←v10728)
   word stream←v10700;
   word ref←v10728;
   {
   register ptr gf←c38520 =  (ptr) &globalframe;
   word ok←v10772;
   word refOutlineRep←v6096;
   /* REFOutlineRepPrinter: */ 
SOURCE(25832, 768)
SOURCE(25832, 768)
   ok←v10772 = 1;
SOURCE(25882, 55)
   refOutlineRep←v6096 = XR←Narrow(ref←v10728, (* (( (ptr) gf←c38520)+29) ));
SOURCE(25941, 23)
   {
      word pd800;
      pd800 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd800 ))))(stream←v10700, (* (( (ptr) gf←c38520)+177) ), 0, 2147483647, pd800);
      };
SOURCE(25968, 29)
   {
      word pd801;
      pd801 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd801 ))))(stream←v10700, (* (( (ptr) gf←c38520)+157) ), 0, 2147483647, pd801);
      };
SOURCE(26001, 24)
   {
      word pd802;
      pd802 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd802 ))))(stream←v10700, (* (( (ptr) gf←c38520)+145) ), 0, 2147483647, pd802);
      };
SOURCE(26029, 64)
   {
      W2 var←c36280;
      var←c36280.f0 = 2;
      var←c36280.f1 = (*  (ptr) refOutlineRep←v6096 );
      {
         word pd803;
         pd803 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd803 ))))(stream←v10700, var←c36280, pd803);
         };
      };
SOURCE(26097, 24)
   {
      word pd804;
      pd804 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd804 ))))(stream←v10700, (* (( (ptr) gf←c38520)+126) ), 0, 2147483647, pd804);
      };
SOURCE(26125, 25)
   {
      word pd805;
      pd805 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd805 ))))(stream←v10700, (* (( (ptr) gf←c38520)+158) ), 0, 2147483647, pd805);
      };
SOURCE(26154, 24)
   {
      word pd806;
      pd806 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd806 ))))(stream←v10700, (* (( (ptr) gf←c38520)+145) ), 0, 2147483647, pd806);
      };
SOURCE(26182, 361)
   {
      word first←v6152 = 1;
SOURCE(26212, 23)
      {
         word pd807;
         pd807 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd807 ))))(stream←v10700, (* (( (ptr) gf←c38520)+50) ), 0, 2147483647, pd807);
         };
SOURCE(26239, 61)
      {
         W2 var←c36312;
         var←c36312.f0 = 5;
         var←c36312.f1 = (* (( (ptr) refOutlineRep←v6096)+1) );
         {
            word pd808;
            pd808 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+55) );
            (void) ( *( (fPt) ((*  (ptr) pd808 ))))(stream←v10700, var←c36312, pd808);
            };
         };
SOURCE(26304, 23)
      {
         word pd809;
         pd809 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd809 ))))(stream←v10700, (* (( (ptr) gf←c38520)+51) ), 0, 2147483647, pd809);
         };
SOURCE(26331, 23)
      {
         word pd810;
         pd810 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd810 ))))(stream←v10700, (* (( (ptr) gf←c38520)+177) ), 0, 2147483647, pd810);
         };
SOURCE(26358, 168)
      {
         register word i←v6196 = 0;
         register word noName←c36344;
         noName←c36344 = (* (( (ptr) refOutlineRep←v6096)+1) );
         if ((i←v6196 >= noName←c36344)) {
            goto lab←L100027;
            };
         lab←L100030: ;
SOURCE(26415, 57)
         if ((0 != first←v6152)) {
SOURCE(26429, 19)
            first←v6152 = 0;
            }
         else {
SOURCE(26448, 24)
            {
               word pd811;
               pd811 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd811 ))))(stream←v10700, (* (( (ptr) gf←c38520)+126) ), 0, 2147483647, pd811);
               };
            };
SOURCE(26478, 48)
         {
            word var←c36376;
            word pd812;
            word limit813;
            pd812 = (* (( (ptr) (* (( (ptr) gf←c38520)+242)/* var←c30520 */  ))+8) );
            var←c36376 = (word) ( *( (fPt) ((*  (ptr) pd812 ))))(stream←v10700, (* ((( (ptr) refOutlineRep←v6096)+2)+(
                     limit813 = (* (( (ptr) refOutlineRep←v6096)+1) ),
                     BCK(i←v6196, limit813)
                     )) ), pd812);
            };
         i←v6196 = (i←v6196 + 1);
         if ((i←v6196 < noName←c36344)) {
            goto lab←L100030;
            };
         lab←L100027: ;
         };
      };
SOURCE(26550, 23)
   {
      word pd814;
      pd814 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd814 ))))(stream←v10700, (* (( (ptr) gf←c38520)+94) ), 0, 2147483647, pd814);
      };
SOURCE(26577, 23)
   {
      word pd815;
      pd815 = (* (( (ptr) (* (( (ptr) gf←c38520)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd815 ))))(stream←v10700, (* (( (ptr) gf←c38520)+94) ), 0, 2147483647, pd815);
      };
SOURCE(25832, 768)
   return(ok←v10772);
   }

static word REFTrajectoryRepPrinter←P1620(stream←v10832, ref←v10860)
   word stream←v10832;
   word ref←v10860;
   {
   register ptr gf←c38552 =  (ptr) &globalframe;
   word ok←v10904;
   word refTrajectoryRep←v6240;
   /* REFTrajectoryRepPrinter: */ 
SOURCE(26607, 2102)
SOURCE(26607, 2102)
   ok←v10904 = 1;
SOURCE(26660, 61)
   refTrajectoryRep←v6240 = XR←Narrow(ref←v10860, (* (( (ptr) gf←c38552)+30) ));
SOURCE(26725, 23)
   {
      word pd816;
      pd816 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd816 ))))(stream←v10832, (* (( (ptr) gf←c38552)+177) ), 0, 2147483647, pd816);
      };
SOURCE(26752, 26)
   {
      word pd817;
      pd817 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd817 ))))(stream←v10832, (* (( (ptr) gf←c38552)+159) ), 0, 2147483647, pd817);
      };
SOURCE(26782, 24)
   {
      word pd818;
      pd818 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd818 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd818);
      };
SOURCE(26810, 53)
   {
      word var←c36408;
      word pd819;
      pd819 = (* (( (ptr) (* (( (ptr) gf←c38552)+242)/* var←c30520 */  ))+8) );
      var←c36408 = (word) ( *( (fPt) ((*  (ptr) pd819 ))))(stream←v10832, (*  (ptr) refTrajectoryRep←v6240 ), pd819);
      };
SOURCE(26867, 24)
   {
      word pd820;
      pd820 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd820 ))))(stream←v10832, (* (( (ptr) gf←c38552)+126) ), 0, 2147483647, pd820);
      };
SOURCE(26895, 28)
   {
      word pd821;
      pd821 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd821 ))))(stream←v10832, (* (( (ptr) gf←c38552)+103) ), 0, 2147483647, pd821);
      };
SOURCE(26927, 24)
   {
      word pd822;
      pd822 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd822 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd822);
      };
SOURCE(26955, 66)
   {
      W2 var←c36440;
      var←c36440.f0 = 5;
      var←c36440.f1 = (* (( (ptr) refTrajectoryRep←v6240)+1) );
      {
         word pd823;
         pd823 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd823 ))))(stream←v10832, var←c36440, pd823);
         };
      };
SOURCE(27025, 24)
   {
      word pd824;
      pd824 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd824 ))))(stream←v10832, (* (( (ptr) gf←c38552)+126) ), 0, 2147483647, pd824);
      };
SOURCE(27053, 24)
   {
      word pd825;
      pd825 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd825 ))))(stream←v10832, (* (( (ptr) gf←c38552)+160) ), 0, 2147483647, pd825);
      };
SOURCE(27081, 24)
   {
      word pd826;
      pd826 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd826 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd826);
      };
SOURCE(27109, 75)
   {
      word var←c36536;
      {
         word var←c36472;
         {
            word var←c36504;
            var←c36504 = XR←NewObject(8, (* (( (ptr) gf←c38552)+24) ));
            (*  (W2Pt) var←c36504 ) = (*  (W2Pt) (( (ptr) refTrajectoryRep←v6240)+2) );
            var←c36472 = var←c36504;
            };
         {
            word pd827;
            pd827 = (* (( (ptr) (* (( (ptr) gf←c38552)+242)/* var←c30520 */  ))+7) );
            var←c36536 = (word) ( *( (fPt) ((*  (ptr) pd827 ))))(stream←v10832, var←c36472, pd827);
            };
         };
      };
SOURCE(27188, 24)
   {
      word pd828;
      pd828 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd828 ))))(stream←v10832, (* (( (ptr) gf←c38552)+126) ), 0, 2147483647, pd828);
      };
SOURCE(27216, 29)
   {
      word pd829;
      pd829 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd829 ))))(stream←v10832, (* (( (ptr) gf←c38552)+161) ), 0, 2147483647, pd829);
      };
SOURCE(27249, 24)
   {
      word pd830;
      pd830 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd830 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd830);
      };
SOURCE(27277, 1405)
   {
      word var←c36568;
      var←c36568 = refTrajectoryRep←v6240;
      if ((var←c36568 == 0)) {
         goto lab←L100031;
         };
      {
         word var←c37016;
         var←c37016 = (* (( (ptr) var←c36568)+4) );
         switch (var←c37016) {
            case 0: 
               {
                  word x←v6296;
                  x←v6296 = var←c36568;
SOURCE(27360, 26)
                  {
                     word pd831;
                     pd831 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd831 ))))(stream←v10832, (* (( (ptr) gf←c38552)+162) ), 0, 2147483647, pd831);
                     };
SOURCE(27390, 23)
                  {
                     word pd832;
                     pd832 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd832 ))))(stream←v10832, (* (( (ptr) gf←c38552)+177) ), 0, 2147483647, pd832);
                     };
SOURCE(27417, 23)
                  {
                     word pd833;
                     pd833 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd833 ))))(stream←v10832, (* (( (ptr) gf←c38552)+94) ), 0, 2147483647, pd833);
                     };
                  };
               break;
            case 1: 
               {
                  word x←v6352;
                  x←v6352 = var←c36568;
SOURCE(27498, 26)
                  {
                     word pd834;
                     pd834 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd834 ))))(stream←v10832, (* (( (ptr) gf←c38552)+163) ), 0, 2147483647, pd834);
                     };
SOURCE(27528, 23)
                  {
                     word pd835;
                     pd835 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd835 ))))(stream←v10832, (* (( (ptr) gf←c38552)+177) ), 0, 2147483647, pd835);
                     };
SOURCE(27555, 23)
                  {
                     word pd836;
                     pd836 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd836 ))))(stream←v10832, (* (( (ptr) gf←c38552)+94) ), 0, 2147483647, pd836);
                     };
                  };
               break;
            case 2: 
               {
                  word x←v6408;
                  x←v6408 = var←c36568;
SOURCE(27637, 27)
                  {
                     word pd837;
                     pd837 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd837 ))))(stream←v10832, (* (( (ptr) gf←c38552)+164) ), 0, 2147483647, pd837);
                     };
SOURCE(27668, 23)
                  {
                     word pd838;
                     pd838 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd838 ))))(stream←v10832, (* (( (ptr) gf←c38552)+177) ), 0, 2147483647, pd838);
                     };
SOURCE(27695, 24)
                  {
                     word pd839;
                     pd839 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd839 ))))(stream←v10832, (* (( (ptr) gf←c38552)+165) ), 0, 2147483647, pd839);
                     };
SOURCE(27723, 24)
                  {
                     word pd840;
                     pd840 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd840 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd840);
                     };
SOURCE(27751, 60)
                  {
                     word var←c36664;
                     {
                        word var←c36600;
                        {
                           word var←c36632;
                           var←c36632 = XR←NewObject(8, (* (( (ptr) gf←c38552)+24) ));
                           (*  (W2Pt) var←c36632 ) = (*  (W2Pt) (( (ptr) x←v6408)+5) );
                           var←c36600 = var←c36632;
                           };
                        {
                           word pd841;
                           pd841 = (* (( (ptr) (* (( (ptr) gf←c38552)+242)/* var←c30520 */  ))+7) );
                           var←c36664 = (word) ( *( (fPt) ((*  (ptr) pd841 ))))(stream←v10832, var←c36600, pd841);
                           };
                        };
                     };
SOURCE(27815, 24)
                  {
                     word pd842;
                     pd842 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd842 ))))(stream←v10832, (* (( (ptr) gf←c38552)+126) ), 0, 2147483647, pd842);
                     };
SOURCE(27843, 24)
                  {
                     word pd843;
                     pd843 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd843 ))))(stream←v10832, (* (( (ptr) gf←c38552)+166) ), 0, 2147483647, pd843);
                     };
SOURCE(27871, 24)
                  {
                     word pd844;
                     pd844 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd844 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd844);
                     };
SOURCE(27899, 60)
                  {
                     word var←c36760;
                     {
                        word var←c36696;
                        {
                           word var←c36728;
                           var←c36728 = XR←NewObject(8, (* (( (ptr) gf←c38552)+24) ));
                           (*  (W2Pt) var←c36728 ) = (*  (W2Pt) (( (ptr) x←v6408)+7) );
                           var←c36696 = var←c36728;
                           };
                        {
                           word pd845;
                           pd845 = (* (( (ptr) (* (( (ptr) gf←c38552)+242)/* var←c30520 */  ))+7) );
                           var←c36760 = (word) ( *( (fPt) ((*  (ptr) pd845 ))))(stream←v10832, var←c36696, pd845);
                           };
                        };
                     };
SOURCE(27963, 23)
                  {
                     word pd846;
                     pd846 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd846 ))))(stream←v10832, (* (( (ptr) gf←c38552)+94) ), 0, 2147483647, pd846);
                     };
                  };
               break;
            case 3: 
               {
                  word x←v6464;
                  x←v6464 = var←c36568;
SOURCE(28045, 27)
                  {
                     word pd847;
                     pd847 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd847 ))))(stream←v10832, (* (( (ptr) gf←c38552)+167) ), 0, 2147483647, pd847);
                     };
SOURCE(28076, 23)
                  {
                     word pd848;
                     pd848 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd848 ))))(stream←v10832, (* (( (ptr) gf←c38552)+177) ), 0, 2147483647, pd848);
                     };
SOURCE(28103, 24)
                  {
                     word pd849;
                     pd849 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd849 ))))(stream←v10832, (* (( (ptr) gf←c38552)+165) ), 0, 2147483647, pd849);
                     };
SOURCE(28131, 24)
                  {
                     word pd850;
                     pd850 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd850 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd850);
                     };
SOURCE(28159, 60)
                  {
                     word var←c36856;
                     {
                        word var←c36792;
                        {
                           word var←c36824;
                           var←c36824 = XR←NewObject(8, (* (( (ptr) gf←c38552)+24) ));
                           (*  (W2Pt) var←c36824 ) = (*  (W2Pt) (( (ptr) x←v6464)+5) );
                           var←c36792 = var←c36824;
                           };
                        {
                           word pd851;
                           pd851 = (* (( (ptr) (* (( (ptr) gf←c38552)+242)/* var←c30520 */  ))+7) );
                           var←c36856 = (word) ( *( (fPt) ((*  (ptr) pd851 ))))(stream←v10832, var←c36792, pd851);
                           };
                        };
                     };
SOURCE(28223, 24)
                  {
                     word pd852;
                     pd852 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd852 ))))(stream←v10832, (* (( (ptr) gf←c38552)+126) ), 0, 2147483647, pd852);
                     };
SOURCE(28251, 23)
                  {
                     word pd853;
                     pd853 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd853 ))))(stream←v10832, (* (( (ptr) gf←c38552)+168) ), 0, 2147483647, pd853);
                     };
SOURCE(28278, 24)
                  {
                     word pd854;
                     pd854 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd854 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd854);
                     };
SOURCE(28306, 43)
                  {
                     W2 var←c36888;
                     var←c36888.f0 = 8;
                     var←c36888.f1 = (* (( (ptr) x←v6464)+7) );
                     {
                        word pd855;
                        pd855 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+55) );
                        (void) ( *( (fPt) ((*  (ptr) pd855 ))))(stream←v10832, var←c36888, pd855);
                        };
                     };
SOURCE(28353, 23)
                  {
                     word pd856;
                     pd856 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd856 ))))(stream←v10832, (* (( (ptr) gf←c38552)+94) ), 0, 2147483647, pd856);
                     };
                  };
               break;
            case 4: 
               {
                  word x←v6520;
                  x←v6520 = var←c36568;
SOURCE(28433, 25)
                  {
                     word pd857;
                     pd857 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd857 ))))(stream←v10832, (* (( (ptr) gf←c38552)+169) ), 0, 2147483647, pd857);
                     };
SOURCE(28462, 23)
                  {
                     word pd858;
                     pd858 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd858 ))))(stream←v10832, (* (( (ptr) gf←c38552)+177) ), 0, 2147483647, pd858);
                     };
SOURCE(28489, 24)
                  {
                     word pd859;
                     pd859 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd859 ))))(stream←v10832, (* (( (ptr) gf←c38552)+165) ), 0, 2147483647, pd859);
                     };
SOURCE(28517, 24)
                  {
                     word pd860;
                     pd860 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd860 ))))(stream←v10832, (* (( (ptr) gf←c38552)+145) ), 0, 2147483647, pd860);
                     };
SOURCE(28545, 60)
                  {
                     word var←c36984;
                     {
                        word var←c36920;
                        {
                           word var←c36952;
                           var←c36952 = XR←NewObject(8, (* (( (ptr) gf←c38552)+24) ));
                           (*  (W2Pt) var←c36952 ) = (*  (W2Pt) (( (ptr) x←v6520)+5) );
                           var←c36920 = var←c36952;
                           };
                        {
                           word pd861;
                           pd861 = (* (( (ptr) (* (( (ptr) gf←c38552)+242)/* var←c30520 */  ))+7) );
                           var←c36984 = (word) ( *( (fPt) ((*  (ptr) pd861 ))))(stream←v10832, var←c36920, pd861);
                           };
                        };
                     };
SOURCE(28609, 23)
                  {
                     word pd862;
                     pd862 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                     (void) ( *( (fPt) ((*  (ptr) pd862 ))))(stream←v10832, (* (( (ptr) gf←c38552)+94) ), 0, 2147483647, pd862);
                     };
                  };
               break;
            default: 
               lab←L100031: ;
SOURCE(28658, 24)
               {
                  word pd863;
                  pd863 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
                  (void) ( *( (fPt) ((*  (ptr) pd863 ))))(stream←v10832, (* (( (ptr) gf←c38552)+57) ), 0, 2147483647, pd863);
                  };
               break;
            };
         };
      };
SOURCE(28686, 23)
   {
      word pd864;
      pd864 = (* (( (ptr) (* (( (ptr) gf←c38552)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd864 ))))(stream←v10832, (* (( (ptr) gf←c38552)+94) ), 0, 2147483647, pd864);
      };
SOURCE(26607, 2102)
   return(ok←v10904);
   }

static word REFSCPairPrinter←P1680(stream←v10964, ref←v10992)
   word stream←v10964;
   word ref←v10992;
   {
   register ptr gf←c38584 =  (ptr) &globalframe;
   word ok←v11036;
   word refSCPair←v6576;
   /* REFSCPairPrinter: */ 
SOURCE(28716, 395)
SOURCE(28716, 395)
   ok←v11036 = 1;
SOURCE(28762, 47)
   refSCPair←v6576 = XR←Narrow(ref←v10992, (* (( (ptr) gf←c38584)+31) ));
SOURCE(28813, 23)
   {
      word pd865;
      pd865 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd865 ))))(stream←v10964, (* (( (ptr) gf←c38584)+177) ), 0, 2147483647, pd865);
      };
SOURCE(28840, 23)
   {
      word pd866;
      pd866 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd866 ))))(stream←v10964, (* (( (ptr) gf←c38584)+139) ), 0, 2147483647, pd866);
      };
SOURCE(28867, 24)
   {
      word pd867;
      pd867 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd867 ))))(stream←v10964, (* (( (ptr) gf←c38584)+145) ), 0, 2147483647, pd867);
      };
SOURCE(28895, 51)
   {
      W2 var←c37048;
      var←c37048.f0 = 8;
      var←c37048.f1 = (*  (ptr) refSCPair←v6576 );
      {
         word pd868;
         pd868 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd868 ))))(stream←v10964, var←c37048, pd868);
         };
      };
SOURCE(28950, 24)
   {
      word pd869;
      pd869 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd869 ))))(stream←v10964, (* (( (ptr) gf←c38584)+126) ), 0, 2147483647, pd869);
      };
SOURCE(28978, 23)
   {
      word pd870;
      pd870 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd870 ))))(stream←v10964, (* (( (ptr) gf←c38584)+142) ), 0, 2147483647, pd870);
      };
SOURCE(29005, 24)
   {
      word pd871;
      pd871 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd871 ))))(stream←v10964, (* (( (ptr) gf←c38584)+145) ), 0, 2147483647, pd871);
      };
SOURCE(29033, 51)
   {
      W2 var←c37080;
      var←c37080.f0 = 8;
      var←c37080.f1 = (* (( (ptr) refSCPair←v6576)+1) );
      {
         word pd872;
         pd872 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd872 ))))(stream←v10964, var←c37080, pd872);
         };
      };
SOURCE(29088, 23)
   {
      word pd873;
      pd873 = (* (( (ptr) (* (( (ptr) gf←c38584)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd873 ))))(stream←v10964, (* (( (ptr) gf←c38584)+94) ), 0, 2147483647, pd873);
      };
SOURCE(28716, 395)
   return(ok←v11036);
   }

static word REFSCRealBoxPrinter←P1740(stream←v11096, ref←v11124)
   word stream←v11096;
   word ref←v11124;
   {
   register ptr gf←c38616 =  (ptr) &globalframe;
   word ok←v11168;
   word refSCRealBox←v6632;
   /* REFSCRealBoxPrinter: */ 
SOURCE(29118, 476)
SOURCE(29118, 476)
   ok←v11168 = 1;
SOURCE(29167, 53)
   refSCRealBox←v6632 = XR←Narrow(ref←v11124, (* (( (ptr) gf←c38616)+32) ));
SOURCE(29224, 23)
   {
      word pd874;
      pd874 = (* (( (ptr) (* (( (ptr) gf←c38616)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd874 ))))(stream←v11096, (* (( (ptr) gf←c38616)+177) ), 0, 2147483647, pd874);
      };
SOURCE(29251, 25)
   {
      word pd875;
      pd875 = (* (( (ptr) (* (( (ptr) gf←c38616)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd875 ))))(stream←v11096, (* (( (ptr) gf←c38616)+140) ), 0, 2147483647, pd875);
      };
SOURCE(29280, 24)
   {
      word pd876;
      pd876 = (* (( (ptr) (* (( (ptr) gf←c38616)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd876 ))))(stream←v11096, (* (( (ptr) gf←c38616)+145) ), 0, 2147483647, pd876);
      };
SOURCE(29308, 85)
   {
      word var←c37176;
      {
         word var←c37112;
         {
            word var←c37144;
            var←c37144 = XR←NewObject(8, (* (( (ptr) gf←c38616)+31) ));
            (*  (W2Pt) var←c37144 ) = (*  (W2Pt) refSCRealBox←v6632 );
            var←c37112 = var←c37144;
            };
         {
            word pd877;
            pd877 = (* (( (ptr) (* (( (ptr) gf←c38616)+242)/* var←c30520 */  ))+7) );
            var←c37176 = (word) ( *( (fPt) ((*  (ptr) pd877 ))))(stream←v11096, var←c37112, pd877);
            };
         };
      };
SOURCE(29397, 24)
   {
      word pd878;
      pd878 = (* (( (ptr) (* (( (ptr) gf←c38616)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd878 ))))(stream←v11096, (* (( (ptr) gf←c38616)+126) ), 0, 2147483647, pd878);
      };
SOURCE(29425, 25)
   {
      word pd879;
      pd879 = (* (( (ptr) (* (( (ptr) gf←c38616)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd879 ))))(stream←v11096, (* (( (ptr) gf←c38616)+141) ), 0, 2147483647, pd879);
      };
SOURCE(29454, 24)
   {
      word pd880;
      pd880 = (* (( (ptr) (* (( (ptr) gf←c38616)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd880 ))))(stream←v11096, (* (( (ptr) gf←c38616)+145) ), 0, 2147483647, pd880);
      };
SOURCE(29482, 85)
   {
      word var←c37272;
      {
         word var←c37208;
         {
            word var←c37240;
            var←c37240 = XR←NewObject(8, (* (( (ptr) gf←c38616)+31) ));
            (*  (W2Pt) var←c37240 ) = (*  (W2Pt) (( (ptr) refSCRealBox←v6632)+2) );
            var←c37208 = var←c37240;
            };
         {
            word pd881;
            pd881 = (* (( (ptr) (* (( (ptr) gf←c38616)+242)/* var←c30520 */  ))+7) );
            var←c37272 = (word) ( *( (fPt) ((*  (ptr) pd881 ))))(stream←v11096, var←c37208, pd881);
            };
         };
      };
SOURCE(29571, 23)
   {
      word pd882;
      pd882 = (* (( (ptr) (* (( (ptr) gf←c38616)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd882 ))))(stream←v11096, (* (( (ptr) gf←c38616)+94) ), 0, 2147483647, pd882);
      };
SOURCE(29118, 476)
   return(ok←v11168);
   }

static word REFSCRegionPrinter←P1800(stream←v11228, ref←v11256)
   word stream←v11228;
   word ref←v11256;
   {
   register ptr gf←c38648 =  (ptr) &globalframe;
   word ok←v11300;
   word refSCRegion←v6688;
   /* REFSCRegionPrinter: */ 
SOURCE(29601, 434)
SOURCE(29601, 434)
   ok←v11300 = 1;
SOURCE(29649, 51)
   refSCRegion←v6688 = XR←Narrow(ref←v11256, (* (( (ptr) gf←c38648)+33) ));
SOURCE(29704, 23)
   {
      word pd883;
      pd883 = (* (( (ptr) (* (( (ptr) gf←c38648)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd883 ))))(stream←v11228, (* (( (ptr) gf←c38648)+177) ), 0, 2147483647, pd883);
      };
SOURCE(29731, 274)
   {
      word first←v6744 = 1;
SOURCE(29761, 227)
      {
         register word i←v6788 = 0;
         lab←L100035: ;
SOURCE(29868, 57)
         if ((0 != first←v6744)) {
SOURCE(29882, 19)
            first←v6744 = 0;
            }
         else {
SOURCE(29901, 24)
            {
               word pd884;
               pd884 = (* (( (ptr) (* (( (ptr) gf←c38648)+243)/* var←c30552 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd884 ))))(stream←v11228, (* (( (ptr) gf←c38648)+126) ), 0, 2147483647, pd884);
               };
            };
SOURCE(29931, 57)
         {
            W2 var←c37304;
            var←c37304.f0 = 2;
            var←c37304.f1 =  (unsigned) XR←ExtractField(refSCRegion←v6688, 28 + (word) i←v6788, 1);
            {
               word pd885;
               pd885 = (* (( (ptr) (* (( (ptr) gf←c38648)+243)/* var←c30552 */  ))+55) );
               (void) ( *( (fPt) ((*  (ptr) pd885 ))))(stream←v11228, var←c37304, pd885);
               };
            };
         if ((i←v6788 >= 3)) {
            goto lab←L100032;
            };
         i←v6788 = (i←v6788 + 1);
         goto lab←L100035;
         lab←L100032: ;
         };
      };
SOURCE(30012, 23)
   {
      word pd886;
      pd886 = (* (( (ptr) (* (( (ptr) gf←c38648)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd886 ))))(stream←v11228, (* (( (ptr) gf←c38648)+94) ), 0, 2147483647, pd886);
      };
SOURCE(29601, 434)
   return(ok←v11300);
   }

static word REFSCEdgeRepPrinter←P1860(stream←v11360, ref←v11388)
   word stream←v11360;
   word ref←v11388;
   {
   register ptr gf←c38680 =  (ptr) &globalframe;
   word ok←v11432;
   word refSCEdgeRep←v6832;
   /* REFSCEdgeRepPrinter: */ 
SOURCE(30042, 1053)
SOURCE(30042, 1053)
   ok←v11432 = 1;
SOURCE(30091, 53)
   refSCEdgeRep←v6832 = XR←Narrow(ref←v11388, (* (( (ptr) gf←c38680)+34) ));
SOURCE(30148, 23)
   {
      word pd887;
      pd887 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd887 ))))(stream←v11360, (* (( (ptr) gf←c38680)+177) ), 0, 2147483647, pd887);
      };
SOURCE(30175, 26)
   {
      word pd888;
      pd888 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd888 ))))(stream←v11360, (* (( (ptr) gf←c38680)+170) ), 0, 2147483647, pd888);
      };
SOURCE(30205, 24)
   {
      word pd889;
      pd889 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd889 ))))(stream←v11360, (* (( (ptr) gf←c38680)+145) ), 0, 2147483647, pd889);
      };
SOURCE(30233, 60)
   {
      W2 var←c37336;
      var←c37336.f0 = 5;
      var←c37336.f1 = (*  (ptr) refSCEdgeRep←v6832 );
      {
         word pd890;
         pd890 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd890 ))))(stream←v11360, var←c37336, pd890);
         };
      };
SOURCE(30297, 24)
   {
      word pd891;
      pd891 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd891 ))))(stream←v11360, (* (( (ptr) gf←c38680)+126) ), 0, 2147483647, pd891);
      };
SOURCE(30325, 28)
   {
      word pd892;
      pd892 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd892 ))))(stream←v11360, (* (( (ptr) gf←c38680)+171) ), 0, 2147483647, pd892);
      };
SOURCE(30357, 24)
   {
      word pd893;
      pd893 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd893 ))))(stream←v11360, (* (( (ptr) gf←c38680)+145) ), 0, 2147483647, pd893);
      };
SOURCE(30385, 62)
   {
      W2 var←c37368;
      var←c37368.f0 = 5;
      var←c37368.f1 = (* (( (ptr) refSCEdgeRep←v6832)+1) );
      {
         word pd894;
         pd894 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd894 ))))(stream←v11360, var←c37368, pd894);
         };
      };
SOURCE(30451, 24)
   {
      word pd895;
      pd895 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd895 ))))(stream←v11360, (* (( (ptr) gf←c38680)+126) ), 0, 2147483647, pd895);
      };
SOURCE(30479, 24)
   {
      word pd896;
      pd896 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd896 ))))(stream←v11360, (* (( (ptr) gf←c38680)+172) ), 0, 2147483647, pd896);
      };
SOURCE(30507, 24)
   {
      word pd897;
      pd897 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd897 ))))(stream←v11360, (* (( (ptr) gf←c38680)+145) ), 0, 2147483647, pd897);
      };
SOURCE(30535, 73)
   {
      word var←c37464;
      {
         word var←c37400;
         {
            word var←c37432;
            var←c37432 = XR←NewObject(4, (* (( (ptr) gf←c38680)+38) ));
            (*  (ptr) var←c37432 ) = (* (( (ptr) refSCEdgeRep←v6832)+2) );
            var←c37400 = var←c37432;
            };
         {
            word pd898;
            pd898 = (* (( (ptr) (* (( (ptr) gf←c38680)+242)/* var←c30520 */  ))+7) );
            var←c37464 = (word) ( *( (fPt) ((*  (ptr) pd898 ))))(stream←v11360, var←c37400, pd898);
            };
         };
      };
SOURCE(30612, 24)
   {
      word pd899;
      pd899 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd899 ))))(stream←v11360, (* (( (ptr) gf←c38680)+126) ), 0, 2147483647, pd899);
      };
SOURCE(30640, 24)
   {
      word pd900;
      pd900 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd900 ))))(stream←v11360, (* (( (ptr) gf←c38680)+174) ), 0, 2147483647, pd900);
      };
SOURCE(30668, 24)
   {
      word pd901;
      pd901 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd901 ))))(stream←v11360, (* (( (ptr) gf←c38680)+145) ), 0, 2147483647, pd901);
      };
SOURCE(30696, 73)
   {
      word var←c37560;
      {
         word var←c37496;
         {
            word var←c37528;
            var←c37528 = XR←NewObject(4, (* (( (ptr) gf←c38680)+38) ));
            (*  (ptr) var←c37528 ) = (* (( (ptr) refSCEdgeRep←v6832)+3) );
            var←c37496 = var←c37528;
            };
         {
            word pd902;
            pd902 = (* (( (ptr) (* (( (ptr) gf←c38680)+242)/* var←c30520 */  ))+7) );
            var←c37560 = (word) ( *( (fPt) ((*  (ptr) pd902 ))))(stream←v11360, var←c37496, pd902);
            };
         };
      };
SOURCE(30773, 24)
   {
      word pd903;
      pd903 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd903 ))))(stream←v11360, (* (( (ptr) gf←c38680)+126) ), 0, 2147483647, pd903);
      };
SOURCE(30801, 31)
   {
      word pd904;
      pd904 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd904 ))))(stream←v11360, (* (( (ptr) gf←c38680)+175) ), 0, 2147483647, pd904);
      };
SOURCE(30836, 24)
   {
      word pd905;
      pd905 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd905 ))))(stream←v11360, (* (( (ptr) gf←c38680)+145) ), 0, 2147483647, pd905);
      };
SOURCE(30864, 65)
   {
      W2 var←c37592;
      var←c37592.f0 = 5;
      var←c37592.f1 = (* (( (ptr) refSCEdgeRep←v6832)+4) );
      {
         word pd906;
         pd906 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+55) );
         (void) ( *( (fPt) ((*  (ptr) pd906 ))))(stream←v11360, var←c37592, pd906);
         };
      };
SOURCE(30933, 24)
   {
      word pd907;
      pd907 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd907 ))))(stream←v11360, (* (( (ptr) gf←c38680)+126) ), 0, 2147483647, pd907);
      };
SOURCE(30961, 26)
   {
      word pd908;
      pd908 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd908 ))))(stream←v11360, (* (( (ptr) gf←c38680)+176) ), 0, 2147483647, pd908);
      };
SOURCE(30991, 24)
   {
      word pd909;
      pd909 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd909 ))))(stream←v11360, (* (( (ptr) gf←c38680)+145) ), 0, 2147483647, pd909);
      };
SOURCE(31019, 49)
   {
      word var←c37624;
      word pd910;
      pd910 = (* (( (ptr) (* (( (ptr) gf←c38680)+242)/* var←c30520 */  ))+8) );
      var←c37624 = (word) ( *( (fPt) ((*  (ptr) pd910 ))))(stream←v11360, (* (( (ptr) refSCEdgeRep←v6832)+5) ), pd910);
      };
SOURCE(31072, 23)
   {
      word pd911;
      pd911 = (* (( (ptr) (* (( (ptr) gf←c38680)+243)/* var←c30552 */  ))+93) );
      (void) ( *( (fPt) ((*  (ptr) pd911 ))))(stream←v11360, (* (( (ptr) gf←c38680)+94) ), 0, 2147483647, pd911);
      };
SOURCE(30042, 1053)
   return(ok←v11432);
   }

/* file: ImagerTypesPrintImpl, module: ImagerTypesPrintImpl, compiled at: July 28, 1993 10:27:13 am PDT */ 
extern void XR←install←ImagerTypesPrintImpl() {
   NoName←Q3264();
   }
extern void XR←run←ImagerTypesPrintImpl() { XR←Start(&globalframe); }